Repositorio de scripts de irc.terrachat.cl desde los canales #TRAFFIC y #LATINWAREZ.
⬅️ Volver5.65 Final
;Leave above line alone =) it's the version # that the script reads for itself =P
;(easier than changing it throughout the script)
;
;*** DCC Send & Recieve Counter for SpR By Evil-Dragon (Adapted by |M|A|T|R|I|X| on Dalnet) ***
;*** This addon for mIRC & SpR requires mIRC Version 5.9 or higher! ***
;
; ** VERSION HISTORY MOVED TO WEBSITE: http://www.dragon.ukshells.co.uk/dcc-counter/versionhist.htm **
;
; 5.64 || Fixed a slight bug with the colour settings, users could not use different backgrounds in their left and right graphics.
; || This has now been changed so you can do this.
; 5.65 Final || The official end of development to the DCC-Counter series, hope you've enjoyed the ride as much as i have in making this.
; || I have not recieved anymore bug reports, so i've classed this as a stable script now and adding any other features would
; || just make it even more bloated and overpowering.
; || Last features added, Time spent and recieved statistics & 6 new themes!! Version checker removed due to
; || no more versions being released. Anyway, enjoy! Matthew - DCC-Counter Author
;
; IMPORTANT: To ensure official updates of this script always get this script from http://www.dragon.ukshells.co.uk/dcc-counter/
; Changed scripts could contain undesirable effects, virus/trojan code or unwanted changes.
;
; Suggestions/comments/bugs & special thanks to:
; Owner & Head Scripter: Evil-Dragon (solarstorm@blueyonder.co.uk) [Bug fixes and all other email to this address]
; Bug Fixes & Helper: |M|A|T|R|I|X| (No longer an active scripter for this project)
; Help, Support, BETA Tests: The #mp3z-techno-dance Operators on DALnet (yes that includes you Maxisaitech!)
; and also to anyone else who i didn't mention who took part on the project and made suggestions!
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::;;;;;;;;;;; Load and Start/Connect Remote ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
on *:LOAD: {
echo -a [Info] Loading DCC-Counter V $+ $DCC.ScriptVer $+ by Evil-Dragon (DALnet)
echo -a [Info] Access the DCC-Counter menu through right clicking in a channel
echo -a [Info] or via the main mIRC "Commands" menu.
DCC.Checkme
}
on *:CONNECT: { DCC.Checkme }
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: Local Alias(es) (-l) ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
alias -l DCC.Logfile { return $scriptdirdcc-counter.ini }
alias -l DCC.Checkme {
if ($version < 5.9) { echo -a Sorry DCC-Counter requires an mIRC Version of 5.9 or later! Go get the new mIRC from http://www.mirc.com | unload -rs $script }
if (%smp3.checkold = $null) { /dialog -m DCC_Counter_Upgrade DCC_Counter_Upgrade }
if ($isfile($DCC.Logfile) = $false) {
writeini $DCC.Logfile Totals TotalRecieved 0
writeini $DCC.Logfile Totals TotalSent 0
writeini $DCC.Logfile Totals TimeRecieved 0
writeini $DCC.Logfile Totals TimeSent 0
writeini $DCC.Logfile Totals Numsent 0
writeini $DCC.Logfile Totals Numrecieved 0
writeini $DCC.Logfile Date DateStart $date
writeini $DCC.Logfile ScriptSent Number 0
writeini $DCC.Logfile MaxSize Sent 0
writeini $DCC.Logfile MaxSize Recieved 0
}
DCC.ChkDate
if ($exists($scriptdirskins) = $false) { mkdir $scriptdirskins }
if (%SMP3.CNTR.date = $null) { set %SMP3.CNTR.date $date | writeini $DCC.Logfile Date DateStart $date }
if (%smp3.stats.timer = $null) || (%smp3.stats.timer !isnum) || (%smp3.stats.timer = 0) { set %smp3.stats.timer 3600 }
if (%smp3.ad.timer = $null) || (%smp3.ad.timer !isnum) || (%smp3.ad.timer = 0) { set %smp3.ad.timer 1900 }
if (%SMP3.CNTR.highlight = $null) { smp3.resetcolour }
if (%SMP3.CNTR.left = $null) { set %SMP3.CNTR.left 14«2§5[ }
if (%SMP3.CNTR.right = $null) { set %SMP3.CNTR.right 5]2§14» }
if (%smp3.dccountad = $null) { set %smp3.dccountad On }
if (%SMP3.CNTR.tbar = $null) { set %SMP3.CNTR.tbar Off }
if (%SMP3.msgstatus = $null) { set %SMP3.msgstatus On }
if (%SMP3.downloadlog = $null) { set %SMP3.downloadlog Off }
if (%SMP3.uploadlog = $null) { set %SMP3.uploadlog Off }
if (%smp3.dccountad = On) { .timersmp3.counterad 0 %smp3.ad.timer smp3.counteradvert }
if (%SMP3.CNTR.tbar = On) { .timersmp3.countertitle 0 1 smp3.dcctitlebar }
if (%SMP3.msgstatus = On) { .timersmp3.quickstats 0 %smp3.stats.timer smp3.displaysent }
set %SMP3.CNTR.b.recd $readini $DCC.Logfile Totals TotalRecieved
set %SMP3.CNTR.b.sent $readini $DCC.Logfile Totals TotalSent
set %SMP3.CNTR.f.sent $readini $DCC.Logfile Totals Numsent
set %SMP3.CNTR.f.recd $readini $DCC.Logfile Totals Numrecieved
set %smp3.CNTR.t.recd $readini $DCC.Logfile Totals TimeRecieved
set %smp3.CNTR.t.sent $readini $DCC.Logfile Totals TimeSent
set %smp3.scriptsent $readini $DCC.Logfile ScriptSent Number
set %smp3.CNTR.maxrecd $readini $DCC.Logfile MaxSize Recieved
set %smp3.CNTR.maxsent $readini $DCC.Logfile MaxSize Sent
; A few users had problems when they upgraded from V4.1 or earlier where an old timer was left running, the code below stops the timer.
.timerdcountertitle off
}
alias -l DCC.CheckOldCounter {
if ($isfile($DCC.Logfile) = $true) { /copy -o dcc-counter.ini dcc-counter.back | set %smp3.checkconv 0 }
echo -a Your old dcc-counter.ini has been backed up to dcc-counter.back should anything go wrong...
if ((%totalsent != $null) && (%SMP3.CNTR.b.sent = $null)) {
set %SMP3.CNTR.b.sent %totalsent
writeini $DCC.Logfile Totals TotalSent %SMP3.CNTR.b.sent
inc %smp3.checkconv 1
unset %totalsent
}
if ((%totalrecieved != $null) && (%SMP3.CNTR.b.recd = $null)) {
set %SMP3.CNTR.b.recd %totalrecieved
writeini $DCC.Logfile Totals TotalRecieved %SMP3.CNTR.b.recd
inc %smp3.checkconv 1
unset %totalrecieved
}
if ((%Numsent != $null) && (%SMP3.CNTR.f.sent = $null)) {
set %SMP3.CNTR.f.sent %Numsent
writeini $DCC.Logfile Totals Numsent %SMP3.CNTR.f.sent
inc %smp3.checkconv 1
unset %Numsent
}
if ((%dccrecieved != $null) && (%SMP3.CNTR.f.recd = $null)) {
set %SMP3.CNTR.f.recd %dccrecieved
writeini $DCC.Logfile Totals Numrecieved %SMP3.CNTR.f.recd
inc %smp3.checkconv 1
unset %dccrecieved
}
if ((%mp3countdate != $null) && (%SMP3.CNTR.date = $null)) {
set %SMP3.CNTR.date %mp3countdate
inc %smp3.checkconv 1
unset %mp3countdate
}
echo -a 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour Thank you! This process is now DONE! A total of $+ %SMP3.CNTR.highlight %smp3.checkconv $+ %SMP3.CNTR.txt.colour old variables had to be changed over to the new variable format! This will not be run again. 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
set %smp3.checkold done
unset %smp3.checkconv
}
alias -l DCC.CommonChannel {
if ($comchan($nick,1) = $null) { return $comchan($me,1) }
else { return $comchan($nick,1) }
}
alias -l DCC.ChkDate {
set %SMP3.dchk.date $readini $DCC.Logfile Date DateStart
if ((%SMP3.dchk.date = $null) && (%SMP3.CNTR.date != $null)) { writeini $DCC.Logfile Date DateStart %SMP3.CNTR.date }
if ((%SMP3.dchk.date != $null) && (%SMP3.CNTR.date = $null)) { set %SMP3.CNTR.date %SMP3.dchk.date }
unset %SMP3.dchk.date
}
alias -l DCC.ScriptVer { return $read -l1 $script }
alias -l DCC.Convert { return $str(0,$calc(2 - $len($$1))) $+ $$1 }
alias smp3.dcctitlebar { titlebar - Nick: $me - Data Sent/Recieved: $round(%SMP3.CNTR.b.sent,0) MB ( $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) GB) / $round(%SMP3.CNTR.b.recd,0) MB ( $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) GB) }
alias -l DCC.ScriptUnload {
.timersmp3.quickstats off
.timersmp3.counterad off
.timersmp3.countertitle off
unload -rs $script
}
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::: Dialogs and Events for Script :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
dialog DCC_Counter_Upgrade {
title "DCC-Counter Upgrade?"
size -1 -1 130 40
option dbu
text "Are you upgrading from a version earlier than V3.2?", 20, 5 5 130 20 tab 1
button "Yes", 21, 42 17 20 16, ok
button "No", 22, 72 17 20 16, cancel
}
on 1:dialog:DCC_Counter_Upgrade:sclick:21: { DCC.CheckOldCounter }
on 1:dialog:DCC_Counter_Upgrade:sclick:22: { set %smp3.checkold done }
dialog DCC_Counter_Config {
title "DCC-Counter Configuration Dialog"
size -1 -1 257 220
option dbu
box "Colour Configuration:", 1, 2 2 253 85
button "Save", 3, 12 198 37 12, default ok
button "Abandon", 4, 61 198 37 12, cancel
combo 5, 32 26 60 53, size drop
text "Text Colour", 6, 32 14 60 8, center
combo 7, 100 26 60 53, size drop
combo 8, 168 26 60 53, size drop
text "Highlight Colour", 9, 101 14 60 8, center
text "Background Colour", 10, 168 14 60 8, center
box "Message And DCC Status Configuration:", 11, 2 131 253 57
check "Titlebar Feature (Default: Off)", 14, 7 143 82 10
check "DCC-Counter Advert (Default: On)", 15, 7 157 93 10
check "DCC Send, Recieve And Fail Msgs (Default: On)", 16, 7 171 127 10
box "Left And Right Graphics", 12, 2 89 253 40
edit "", 13, 40 111 79 10, autohs center
text "Note: Use Ctrl+K to insert colour codes, use Ctrl+B for bold codes and use Ctrl+U for underline codes", 18, 7 97 243 8, center
text "Left Graphic:", 19, 8 112 32 8
text "Right Graphic:", 20, 126 112 35 8
edit "", 21, 161 111 79 10, autohs center
button "Preview Colours", 22, 202 198 44 12
check "Download Log (Default: Off)", 2, 159 144 82 10
check "Upload Log (Default: Off)", 17, 159 158 82 10
menu "File", 23
item "Load Theme", 24, 23
item "Save Theme", 25, 23
item "Reset Colours", 26, 23
menu "Theme List", 27
item "Default Theme", 28, 27
item "Matrix Theme", 29, 27
item "Blue Angel Theme", 30, 27
item "The MTD Theme", 31, 27
item "Orange Mp3z Theme", 32, 27
item "Dark Blue Sea Theme", 33, 27
item "Cold Aztec Theme", 34, 27
item "DCC-Counter Gold", 35, 27
item "Fading Fire Theme", 36, 27
item "Fading Blue Theme", 37, 27
item "Fading Green Theme", 38, 27
item "Fading Sea Grey Theme", 39, 27
item "Fading Purple Theme", 40, 27
}
on *:DIALOG:DCC_Counter_Config:init:0: {
if %SMP3.CNTR.tbar = On { did -c $dname 14 }
if %smp3.dccountad = On { did -c $dname 15 }
if %SMP3.msgstatus = On { did -c $dname 16 }
if %SMP3.downloadlog = On { did -c $dname 2 }
if %SMP3.uploadlog = On { did -c $dname 17 }
did -a DCC_Counter_Config 13 %SMP3.CNTR.left
did -a DCC_Counter_Config 21 %SMP3.CNTR.right
smp3.preview.theme
smp3.dbuildlist
}
on *:DIALOG:DCC_Counter_Config:menu:24: {
set %smp3.theme.load $sfile($scriptdirskins\*.txt,Select a theme to load...,Load Theme)
if ($read(%smp3.theme.load,1) = This_is_a_DCC-Counter_Theme) {
set %SMP3.CNTR.txt.colour $read(%smp3.theme.load,3)
set %SMP3.CNTR.highlight $read(%smp3.theme.load,4)
set %SMP3.CNTR.bg.colour $read(%smp3.theme.load,5)
set %SMP3.CNTR.left $read(%smp3.theme.load,6)
set %SMP3.CNTR.right $read(%smp3.theme.load,7)
did -c DCC_Counter_Config 5 $calc(%SMP3.CNTR.txt.colour + 1)
did -c DCC_Counter_Config 7 $calc(%SMP3.CNTR.highlight + 1)
did -c DCC_Counter_Config 8 $calc(%SMP3.CNTR.bg.colour + 1)
did -ra DCC_Counter_Config 13 %SMP3.CNTR.left
did -ra DCC_Counter_Config 21 %SMP3.CNTR.right
smp3.preview.theme
echo -a 14Loaded DCC-Counter Theme:12 $read(%smp3.theme.load,2)
}
else { echo -a 14Warning:12 This isn't a Valid DCC-Counter Theme! | halt }
}
on *:DIALOG:DCC_Counter_Config:menu:25: {
set %smp3.theme.save $scriptdirskins\ $+ $$?="Please specify a filename for this theme... e.g. darkredtheme" $+ .txt
write -c %smp3.theme.save
write %smp3.theme.save This_is_a_DCC-Counter_Theme
write %smp3.theme.save $$?="Please give this theme a name... e.g. My Dark Red Theme"
write %smp3.theme.save $did(5).text
write %smp3.theme.save $did(7).text
write %smp3.theme.save $did(8).text
write %smp3.theme.save $did(13).text
write %smp3.theme.save $did(21).text
echo -a 14Saved DCC-Counter Theme:12 $read(%smp3.theme.save,2)
}
on *:DIALOG:DCC_Counter_Config:menu:26: {
smp3.dresetcolours
}
on *:DIALOG:DCC_Counter_Config:menu:28: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 1 | did -c DCC_Counter_Config 7 9 | did -ra DCC_Counter_Config 13 14«2§5[ | did -ra DCC_Counter_Config 21 5]2§14» | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:29: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 4 | did -c DCC_Counter_Config 7 10 | did -ra DCC_Counter_Config 13 9«3§9[ | did -ra DCC_Counter_Config 21 9]3§9» | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:30: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 12 | did -c DCC_Counter_Config 7 13 | did -ra DCC_Counter_Config 13 11~12Å11~ | did -ra DCC_Counter_Config 21 11~12Å11~ | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:31: { did -c DCC_Counter_Config 8 1 | did -c DCC_Counter_Config 5 6 | did -c DCC_Counter_Config 7 8 | did -ra DCC_Counter_Config 13 7.: MTD :. | did -ra DCC_Counter_Config 21 7.: MTD :. | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:32: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 1 | did -c DCC_Counter_Config 7 8 | did -ra DCC_Counter_Config 13 7«Mp3z» | did -ra DCC_Counter_Config 21 7«Mp3z» | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:33: { did -c DCC_Counter_Config 8 16 | did -c DCC_Counter_Config 5 3 | did -c DCC_Counter_Config 7 13 | did -ra DCC_Counter_Config 13 12«2§12[ | did -ra DCC_Counter_Config 21 12]2§12» | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:34: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 11 | did -c DCC_Counter_Config 7 12 | did -ra DCC_Counter_Config 13 10«0§10[ | did -ra DCC_Counter_Config 21 10]0§10» | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:35: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 9 | did -c DCC_Counter_Config 7 5 | did -ra DCC_Counter_Config 13 8[0DCC-Counter8] | did -ra DCC_Counter_Config 21 8[0Final Gold Version8] | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:36: { did -c DCC_Counter_Config 8 5 | did -c DCC_Counter_Config 5 9 | did -c DCC_Counter_Config 7 12 | did -ra DCC_Counter_Config 13 8,0 ,%0,8%`7,8,%8,7%`4,7,%7,4%`8,4 | did -ra DCC_Counter_Config 21 7,4`%4,7%,8,7`%7,8%,0,8`%8,0%, | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:37: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 12 | did -c DCC_Counter_Config 7 13 | did -ra DCC_Counter_Config 13 12,0-æ0,12æ¸2,12`æ12,2æ¸1,2`æ2,1æ¸0,1 | did -ra DCC_Counter_Config 21 2,1`æ1,2æ¸12,2`æ2,12æ¸0,12`æ12,0æ- | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:38: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 10 | did -c DCC_Counter_Config 7 4 | did -ra DCC_Counter_Config 13 9,0æ0,9æ3,9æ9,3æ1,3æ3,1æ 9,1 | did -ra DCC_Counter_Config 21 3,1æ1,3æ9,3æ3,9æ0,9æ9,0æ | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:39: { did -c DCC_Counter_Config 8 2 | did -c DCC_Counter_Config 5 12 | did -c DCC_Counter_Config 7 13 | did -ra DCC_Counter_Config 13 16,15%,14,15`%15,14%,10,14`%14,10%,2,10`%10,2%,15,2 | did -ra DCC_Counter_Config 21 10,2`%2,10%,14,10`%10,14%,15,14`%14,1516,1514,15`% 16,15%, | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:menu:40: { did -c DCC_Counter_Config 8 7 | did -c DCC_Counter_Config 5 14 | did -c DCC_Counter_Config 7 1 | did -ra DCC_Counter_Config 13 15,0,%0,15%`13,15,%15,13%`6,13,%13,6%`5,6,% 8 | did -ra DCC_Counter_Config 21 5,6%,13,6`%6,13%,15,13`%13,15%,0,15`%15,0%, | smp3.generate.preview }
on *:DIALOG:DCC_Counter_Config:sclick:3: {
if ($did(DCC_Counter_Config,14).state == 1) { set %SMP3.CNTR.tbar On | .timersmp3.countertitle 0 1 smp3.dcctitlebar }
else { set %SMP3.CNTR.tbar Off | .timersmp3.countertitle off }
if ($did(DCC_Counter_Config,15).state == 1) { set %smp3.dccountad On | .timersmp3.counterad 0 %smp3.ad.timer smp3.counteradvert }
else { set %smp3.dccountad Off | .timersmp3.counterad off }
if ($did(DCC_Counter_Config,16).state == 1) { set %SMP3.msgstatus On | .timersmp3.quickstats 0 %smp3.stats.timer smp3.displaysent }
else { set %SMP3.msgstatus Off | .timersmp3.quickstats Off }
if ($did(DCC_Counter_Config,2).state == 1) { set %SMP3.downloadlog On }
else { set %SMP3.downloadlog Off }
if ($did(DCC_Counter_Config,17).state == 1) { set %SMP3.uploadlog On }
else { set %SMP3.uploadlog Off }
set %SMP3.CNTR.txt.colour $did(5).text
set %SMP3.CNTR.highlight $did(7).text
set %SMP3.CNTR.bg.colour $did(8).text
set %SMP3.CNTR.left $did(13).text
set %SMP3.CNTR.right $did(21).text
}
on *:DIALOG:DCC_Counter_Config:sclick:5,7,8,13,21: {
set %SMP3.preview.txt.colour $did(5).text
set %SMP3.preview.highlight $did(7).text
set %SMP3.preview.bg.colour $did(8).text
}
on *:DIALOG:DCC_Counter_Config:edit:13,21: {
set %SMP3.preview.left $did(13).text
set %SMP3.preview.right $did(21).text
}
on *:DIALOG:DCC_Counter_Config:sclick:22: {
echo -a 4,2DCC-COUNTER COLOUR TEST: 1, $+ %SMP3.preview.bg.colour $+ %SMP3.preview.left $+ $+ %SMP3.preview.txt.colour $+ , $+ %SMP3.preview.bg.colour I have just finished sending $+ %SMP3.preview.highlight A really big MP3 File.mp3 $+ %SMP3.preview.txt.colour $+ ( $+ 103 MB) to $+ %SMP3.preview.highlight Mr_Rogers $+ . $+ %SMP3.preview.txt.colour $+ I have now sent a total of $+ %SMP3.preview.highlight 4353 $+ %SMP3.preview.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.preview.highlight) $+ 4.3 $+ %SMP3.preview.txt.colour $+ GB) in $+ %SMP3.preview.highlight 3532 $+ $+ %SMP3.preview.txt.colour files since $+ %SMP3.preview.highlight 01/01/01 1, $+ %SMP3.preview.bg.colour $+ %SMP3.preview.right
}
alias -l smp3.dbuildlist {
did -a DCC_Counter_Config 5,7,8 0
did -a DCC_Counter_Config 5,7,8 1
did -a DCC_Counter_Config 5,7,8 2
did -a DCC_Counter_Config 5,7,8 3
did -a DCC_Counter_Config 5,7,8 4
did -a DCC_Counter_Config 5,7,8 5
did -a DCC_Counter_Config 5,7,8 6
did -a DCC_Counter_Config 5,7,8 7
did -a DCC_Counter_Config 5,7,8 8
did -a DCC_Counter_Config 5,7,8 9
did -a DCC_Counter_Config 5,7,8 10
did -a DCC_Counter_Config 5,7,8 11
did -a DCC_Counter_Config 5,7,8 12
did -a DCC_Counter_Config 5,7,8 13
did -a DCC_Counter_Config 5,7,8 14
did -a DCC_Counter_Config 5,7,8 15
did -c DCC_Counter_Config 5 $calc(%SMP3.CNTR.txt.colour + 1)
did -c DCC_Counter_Config 7 $calc(%SMP3.CNTR.highlight + 1)
did -c DCC_Counter_Config 8 $calc(%SMP3.CNTR.bg.colour + 1)
}
alias -l smp3.dresetcolours {
did -c DCC_Counter_Config 5 1
did -c DCC_Counter_Config 7 9
did -c DCC_Counter_Config 8 2
did -ra DCC_Counter_Config 13 14«2§5[
did -ra DCC_Counter_Config 21 5]2§14»
smp3.resetcolour
smp3.preview.theme
}
alias -l smp3.preview.theme {
set %SMP3.preview.txt.colour %SMP3.CNTR.txt.colour
set %SMP3.preview.highlight %SMP3.CNTR.highlight
set %SMP3.preview.bg.colour %SMP3.CNTR.bg.colour
set %SMP3.preview.left %SMP3.CNTR.left
set %SMP3.preview.right %SMP3.CNTR.right
}
alias -l smp3.generate.preview {
set %SMP3.preview.txt.colour $did(5).text
set %SMP3.preview.highlight $did(7).text
set %SMP3.preview.bg.colour $did(8).text
set %SMP3.preview.left $did(13).text
set %SMP3.preview.right $did(21).text
}
dialog DCC_Counter_Stats {
title "DCC-Counter Quick Stats"
size -1 -1 277 136
option dbu
text "Data Sent:", 12, 9 26 27 8
edit "", 13, 35 25 33 10, read autohs center
text "MB", 18, 68 26 12 8, center
edit "", 19, 35 36 33 10, read autohs center
text "GB", 20, 68 37 12 8, center
text "The collection of this data (statistics) was started on: ", 21, 48 12 125 8
edit "", 22, 172 11 37 10, read center
text "in", 23, 79 31 7 8, center
edit "", 25, 87 30 28 10, read center
text "files", 27, 116 31 12 8, center
text "Data Recieved:", 29, 134 26 38 8
edit "", 30, 172 25 33 10, read autohs center
text "MB", 31, 206 26 12 8, center
edit "", 32, 172 36 33 10, read autohs center
text "GB", 33, 206 37 12 8, center
text "in", 34, 217 31 7 8, center
edit "", 36, 225 30 28 10, read center
text "files", 38, 254 31 12 8, center
box "DCC-Counter Statistics:", 40, 2 1 273 133
button "OK", 3, 121 115 37 12, default ok cancel
text "Largest File Sent:", 1, 32 56 44 8, right
edit "", 2, 76 55 31 10, read center
text "Largest File Recieved:", 4, 21 70 56 8, right
edit "", 5, 76 69 31 10, read center
text "Average Size of files sent are", 6, 141 55 71 8
edit "", 7, 212 54 31 10, read center
text "MB", 8, 243 55 12 8, center
text "MB", 9, 107 56 12 8, center
text "MB", 10, 107 70 12 8, center
text "Average Size of files recieved are", 11, 130 70 82 8
edit "", 14, 212 69 31 10, read center
text "MB", 15, 243 70 12 8, center
text "Time Spent Recieving:", 16, 23 87 54 8, right
edit "", 17, 77 86 166 10, read center
text "Time Spent Sending:", 24, 23 99 54 8, right
edit "", 26, 77 98 166 10, read center
}
on *:DIALOG:DCC_Counter_Stats:init:0: {
smp3.dquickstats
}
alias -l smp3.dquickstats {
did -a DCC_Counter_Stats 13 $round(%SMP3.CNTR.b.sent,0)
did -a DCC_Counter_Stats 19 $round($calc(%SMP3.CNTR.b.sent /1000),2)
did -a DCC_Counter_Stats 30 $round(%SMP3.CNTR.b.recd,0)
did -a DCC_Counter_Stats 32 $round($calc(%SMP3.CNTR.b.recd /1000),2)
did -a DCC_Counter_Stats 25 %SMP3.CNTR.f.sent
did -a DCC_Counter_Stats 36 %SMP3.CNTR.f.recd
did -a DCC_Counter_Stats 22 %SMP3.CNTR.date
did -a DCC_Counter_Stats 2 %smp3.CNTR.maxsent
did -a DCC_Counter_Stats 5 %smp3.CNTR.maxrecd
did -a DCC_Counter_Stats 7 %SMP3.CNTR.avg.sent
did -a DCC_Counter_Stats 14 %SMP3.CNTR.avg.recd
did -a DCC_Counter_Stats 17 $duration(%SMP3.CNTR.t.recd)
did -a DCC_Counter_Stats 26 $duration(%SMP3.CNTR.t.sent)
}
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;:::::::::::::::::::::::::::::::::::::::::::::::::: Global Aliases for Displays :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
alias smp3.displaysent {
set %SMP3.CNTR.dispsent 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have sent a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.sent,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.sent $+ %SMP3.CNTR.txt.colour $+ files and leeched a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.recd,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.recd $+ %SMP3.CNTR.txt.colour $+ files since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
set %SMP3.CNTR.dispsent2 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have spent a total time of $+ %SMP3.CNTR.highlight $duration(%smp3.CNTR.t.sent) $+ %SMP3.CNTR.txt.colour $+ sending files and a total time of $+ %SMP3.CNTR.highlight $duration(%smp3.CNTR.t.recd) $+ %SMP3.CNTR.txt.colour $+ recieving files. 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
if (%SMP3.Main.Only = On) { if ($me ison %SMP3.Main.Chan) msg %SMP3.Main.Chan %SMP3.CNTR.dispsent | if ($me ison %SMP3.Main.Chan) msg %SMP3.Main.Chan %SMP3.CNTR.dispsent2 | return }
if (%SMP3.Main.Only = Multi) {
unset %Put.MCHad | set %i 0
:multich
set %Put.Temp %SMP3.MCH. [ $+ [ %i ] ]
if (%Put.Temp == $null) { unset %Put.Temp %i | goto end }
if ($me ison %Put.Temp) { set %Put.MCHad %Put.MCHad $+ $chr(44) $+ %Put.Temp }
inc %i 1 | goto multich
:end
if (%Put.MCHad) Smp3.Mass %Put.MCHad %SMP3.CNTR.dispsent | Smp3.Mass %Put.MCHad %SMP3.CNTR.dispsent2 | unset %Put.MCHad
}
}
alias smp3.counteradvert {
set %smp3.CNTR.counterad 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour Do you want to keep track of your $+ %SMP3.CNTR.highlight DCC Sends $+ %SMP3.CNTR.txt.colour and $+ %SMP3.CNTR.highlight Receives $+ %SMP3.CNTR.txt.colour with $+ %SMP3.CNTR.highlight MB's $+ %SMP3.CNTR.txt.colour and numbers sent? $+ %SMP3.CNTR.highlight DCC-Counter $+ %SMP3.CNTR.txt.colour will do that for you! To get DCC-Counter off me type $+ %SMP3.CNTR.highlight @ $+ $me $+ -Counter $+ %SMP3.CNTR.txt.colour ( $+ %SMP3.CNTR.highlight $+ Version: V $+ $DCC.ScriptVer $+ $+ %SMP3.CNTR.txt.colour $+ ) 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
if (%SMP3.Main.Only = On) { if ($me ison %SMP3.Main.Chan) msg %SMP3.Main.Chan %smp3.CNTR.counterad | return }
if (%SMP3.Main.Only = Multi) {
unset %Put.MCHad | set %i 0
:multich
set %Put.Temp %SMP3.MCH. [ $+ [ %i ] ]
if (%Put.Temp = $null) { unset %Put.Temp %i | goto end }
if ($me ison %Put.Temp) { set %Put.MCHad %Put.MCHad $+ $chr(44) $+ %Put.Temp }
inc %i 1 | goto multich
:end
if (%Put.MCHad) Smp3.Mass %Put.MCHad %smp3.CNTR.counterad | unset %Put.MCHad
}
}
alias smp3.resetcolour {
set %SMP3.CNTR.bg.colour 1
set %SMP3.CNTR.txt.colour 0
set %SMP3.CNTR.highlight 8
set %SMP3.CNTR.left 14«2§5[
set %SMP3.CNTR.right 5]2§14»
}
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;:::::::::::::::::::::::::::::::::::::::::::::::::::::::: File Events Remote ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
on *:FILERCVD:*: {
set %temprecieved $round($calc($lof($filename)/1024000),2)
if ((%temprecieved > %smp3.CNTR.maxrecd) || (%smp3.CNTR.maxrecd = $null)) { set %smp3.CNTR.maxrecd %temprecieved | writeini $DCC.Logfile MaxSize Recieved %smp3.CNTR.maxrecd }
set %SMP3.CNTR.b.recd $readini $DCC.Logfile Totals TotalRecieved
inc %SMP3.CNTR.b.recd %temprecieved
writeini $DCC.Logfile Totals TotalRecieved %SMP3.CNTR.b.recd
set %SMP3.CNTR.f.recd $readini $DCC.Logfile Totals Numrecieved
inc %SMP3.CNTR.f.recd 1
writeini $DCC.Logfile Totals Numrecieved %SMP3.CNTR.f.recd
set %smp3.CNTR.t.recd $readini $DCC.Logfile Totals TimeRecieved
inc %smp3.CNTR.t.recd $get($nick).secs
writeini $DCC.Logfile Totals TimeRecieved %smp3.CNTR.t.recd
set %SMP3.CNTR.avg.recd $round($calc(%SMP3.CNTR.b.recd / %SMP3.CNTR.f.recd),2)
if (%SMP3.downloadlog = On) $write $mircdirdownload.txt ( $+ $date $+ )( $+ $time $+ ) $nopath($filename) ( $+ %temprecieved MB) from $nick
if (%SMP3.msgstatus = On) {
msg $DCC.CommonChannel 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have just finished recieving $+ %SMP3.CNTR.highlight $nopath($filename) $+ %SMP3.CNTR.txt.colour $+ ( $+ %temprecieved MB) from $+ %SMP3.CNTR.highlight $nick $+ %SMP3.CNTR.txt.colour $+ in $+ %SMP3.CNTR.highlight $duration($get($nick).secs) $+ %SMP3.CNTR.txt.colour $+ at $+ %SMP3.CNTR.highlight $get($nick).cps $+ %SMP3.CNTR.txt.colour $+ CPS. $+ %SMP3.CNTR.txt.colour $+ I have now recieved a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.recd,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.recd $+ $+ %SMP3.CNTR.txt.colour files since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
}
}
on *:Filesent:*: {
if (dcc-counter.txt isin $nopath($filename)) {
set %smp3.scriptsent $readini $DCC.Logfile ScriptSent Number
inc %smp3.scriptsent 1
writeini $DCC.Logfile ScriptSent Number %smp3.scriptsent
if (%SMP3.msgstatus = On) msg $DCC.CommonChannel 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have just finished sending $+ %SMP3.CNTR.highlight DCC-Counter $+ %SMP3.CNTR.txt.colour $+ (Version: $+ %SMP3.CNTR.highlight V $+ $DCC.ScriptVer $+ $+ %SMP3.CNTR.txt.colour $+ ) to $+ %SMP3.CNTR.highlight $nick $+ . $+ %SMP3.CNTR.txt.colour $+ I have now sent DCC-Counter $+ %SMP3.CNTR.highlight %smp3.scriptsent $+ %SMP3.CNTR.txt.colour $+ times. 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
}
else {
set %tempsent $round($calc($lof($filename)/1024000),2)
if ((%tempsent > %smp3.CNTR.maxsent) || (%smp3.CNTR.maxsent = $null)) { set %smp3.CNTR.maxsent %tempsent | writeini $DCC.Logfile MaxSize Sent %smp3.CNTR.maxsent }
set %SMP3.CNTR.b.sent $readini $DCC.Logfile Totals TotalSent
inc %SMP3.CNTR.b.sent %tempsent
writeini $DCC.Logfile Totals TotalSent %SMP3.CNTR.b.sent
set %SMP3.CNTR.f.sent $readini $DCC.Logfile Totals Numsent
inc %SMP3.CNTR.f.sent 1
writeini $DCC.Logfile Totals Numsent %SMP3.CNTR.f.sent
set %smp3.CNTR.t.sent $readini $DCC.Logfile Totals TimeSent
inc %smp3.CNTR.t.sent $send($nick).secs
writeini $DCC.Logfile Totals TimeSent %smp3.CNTR.t.sent
set %SMP3.CNTR.avg.sent $round($calc(%SMP3.CNTR.b.sent / %SMP3.CNTR.f.sent),2)
if (%SMP3.uploadlog = On) write $scriptdiruploaded.txt ( $+ $date $+ )( $+ $time $+ ) $nopath($filename) ( $+ %tempsent MB) to $nick
if (%SMP3.msgstatus = On) {
msg $DCC.CommonChannel 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have just finished sending $+ %SMP3.CNTR.highlight $nopath($filename) $+ %SMP3.CNTR.txt.colour $+ ( $+ %tempsent MB) to $+ %SMP3.CNTR.highlight $nick $+ %SMP3.CNTR.txt.colour $+ in $+ %SMP3.CNTR.highlight $duration($send($nick).secs) $+ %SMP3.CNTR.txt.colour $+ at $+ %SMP3.CNTR.highlight $send($nick).cps $+ %SMP3.CNTR.txt.colour $+ CPS. $+ %SMP3.CNTR.txt.colour $+ I have now sent a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.sent,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.sent $+ $+ %SMP3.CNTR.txt.colour files since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
}
}
}
on *:SENDFAIL:*: if (%SMP3.msgstatus = On) { msg $DCC.CommonChannel 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour DCC Send $+ %SMP3.CNTR.highlight Failed $+ %SMP3.CNTR.txt.colour of $+ %SMP3.CNTR.highlight $nopath($filename) $+ $+ %SMP3.CNTR.txt.colour to $+ %SMP3.CNTR.highlight $nick $+ . 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right }
on *:GETFAIL:*: if (%SMP3.msgstatus = On) { msg $DCC.CommonChannel 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour DCC Get $+ %SMP3.CNTR.highlight Failed $+ %SMP3.CNTR.txt.colour of $+ %SMP3.CNTR.highlight $nopath($filename) $+ $+ %SMP3.CNTR.txt.colour from $+ %SMP3.CNTR.highlight $nick $+ . 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right }
on *:TEXT:@*:#: {
if ($me isin $1) && ($right($1,7) = Counter) {
.msg $nick 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour REMEMBER to $+ %SMP3.CNTR.highlight $+ UNLOAD $+ %SMP3.CNTR.txt.colour $+ your old DCC-Counter script if you have used previous versions, once this file has been sent to you make sure you put it in your mIRC Directory and don't change the filename please. Type /load -rs dcc-counter.txt to load it! Thanks... $+ %SMP3.CNTR.highlight $+ DCC-Counter Author $+ %SMP3.CNTR.txt.colour $+ : ( $+ %SMP3.CNTR.highlight $+ Evil-Dragon $+ %SMP3.CNTR.txt.colour $+ on DALnet) ( $+ %SMP3.CNTR.highlight $+ Queries? $+ %SMP3.CNTR.txt.colour $+ E-mail: $+ %SMP3.CNTR.highlight $+ solarstorm@blueyonder.co.uk $+ %SMP3.CNTR.txt.colour $+ ) 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
dcc send $nick $script
}
}
ctcp *:VERSION:*: .ctcpreply $nick VERSION 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I'm using $+ %SMP3.CNTR.highlight $+ DCC-Counter $+ %SMP3.CNTR.txt.colour $+ (Version: $+ %SMP3.CNTR.highlight V $+ $DCC.ScriptVer $+ $+ %SMP3.CNTR.txt.colour $+ ) $+ %SMP3.CNTR.txt.colour $+ Author: ( $+ %SMP3.CNTR.highlight $+ Evil-Dragon $+ %SMP3.CNTR.txt.colour $+ on DALnet) 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right | halt
on *:UNLOAD: { DCC.ScriptUnload }
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;:::::::::::::::::::::::::::::::::::::::::::::::::::::: User Menuing Remote :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
menu channel,menubar {
-
-[DCC Counter]-
.@=- DCC Counter V $+ $DCC.ScriptVer -=@: /run http://www.dragon.ukshells.co.uk/dcc-counter/
.-
.All Quick Stats: {
say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour All Statistics collected since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have sent a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.sent,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.sent $+ %SMP3.CNTR.txt.colour $+ files 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have recieved a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.recd,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.recd $+ %SMP3.CNTR.txt.colour $+ files 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The largest file I have sent/recieved was $+ %SMP3.CNTR.highlight %smp3.CNTR.maxsent $+ $+ %SMP3.CNTR.txt.colour $+ / $+ $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ %smp3.CNTR.maxrecd $+ %SMP3.CNTR.txt.colour $+ MB 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The average size of a file sent/recieved is $+ %SMP3.CNTR.highlight %SMP3.CNTR.avg.sent $+ $+ %SMP3.CNTR.txt.colour $+ / $+ $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ %SMP3.CNTR.avg.recd $+ %SMP3.CNTR.txt.colour $+ MB 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
}
.Individual Quick Stats:
..Total of $round(%SMP3.CNTR.b.sent,0) MB ( $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) GB) in %SMP3.CNTR.f.sent files sent since %SMP3.CNTR.date: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have sent a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.sent,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.sent /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.sent $+ %SMP3.CNTR.txt.colour $+ files since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..Total of $round(%SMP3.CNTR.b.recd,0) MB ( $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) GB) in %SMP3.CNTR.f.recd files recieved since %SMP3.CNTR.date: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have leeched/recieved a total of $+ %SMP3.CNTR.highlight $round(%SMP3.CNTR.b.recd,0) $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ $round($calc(%SMP3.CNTR.b.recd /1000),2) $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight %SMP3.CNTR.f.recd $+ %SMP3.CNTR.txt.colour $+ files since $+ %SMP3.CNTR.highlight %SMP3.CNTR.date 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..-
..The largest file sent was %smp3.CNTR.maxsent MB: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The largest file I have sent was $+ %SMP3.CNTR.highlight %smp3.CNTR.maxsent $+ %SMP3.CNTR.txt.colour $+ MB 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..The largest file recieved was %smp3.CNTR.maxrecd MB: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The largest file I have recieved/leeched was $+ %SMP3.CNTR.highlight %smp3.CNTR.maxrecd $+ %SMP3.CNTR.txt.colour $+ MB 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..-
..The average size of files sent is %SMP3.CNTR.avg.sent MB: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The average size of a file sent is $+ %SMP3.CNTR.highlight %SMP3.CNTR.avg.sent $+ %SMP3.CNTR.txt.colour $+ MB (The total number of MB's sent divided by the number of files sent) 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..The average size of files recieved is %SMP3.CNTR.avg.recd MB: say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour The average size of a file recieved is $+ %SMP3.CNTR.highlight %SMP3.CNTR.avg.recd $+ %SMP3.CNTR.txt.colour $+ MB (The total number of MB's recieved divided by the number of files recieved) 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..-
..The total time spent sending files was $duration(%smp3.CNTR.t.sent) $+ : say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have spent a total of $+ %SMP3.CNTR.highlight $duration(%smp3.CNTR.t.sent) $+ %SMP3.CNTR.txt.colour $+ sending files using mIRC. 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..The total time spent recieving files was $duration(%smp3.CNTR.t.recd) $+ : say 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have spent a total of $+ %SMP3.CNTR.highlight $duration(%smp3.CNTR.t.recd) $+ %SMP3.CNTR.txt.colour $+ recieving files using mIRC. 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
..-
..DCC-Counter Script has been sent %smp3.scriptsent times::
.-
.Dialogs And Configuration
..Configure Settings And Colours: /dialog -m DCC_Counter_Config DCC_Counter_Config
..Quick Statistics: /dialog -m DCC_Counter_Stats DCC_Counter_Stats
.Test DCC-Counter Colours: echo -a 4,2DCC-COUNTER COLOUR TEST: 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.left $+ $+ %SMP3.CNTR.txt.colour $+ , $+ %SMP3.CNTR.bg.colour I have just finished sending $+ %SMP3.CNTR.highlight A really big MP3 File.mp3 $+ %SMP3.CNTR.txt.colour $+ ( $+ 103 MB) to $+ %SMP3.CNTR.highlight Mr_Rogers $+ . $+ %SMP3.CNTR.txt.colour $+ I have now sent a total of $+ %SMP3.CNTR.highlight 4353 $+ %SMP3.CNTR.txt.colour $+ MB ( $+ $DCC.Convert(%SMP3.CNTR.highlight) $+ 4.3 $+ %SMP3.CNTR.txt.colour $+ GB) in $+ %SMP3.CNTR.highlight 3532 $+ $+ %SMP3.CNTR.txt.colour files since $+ %SMP3.CNTR.highlight 01/01/01 1, $+ %SMP3.CNTR.bg.colour $+ %SMP3.CNTR.right
.-
.Reset
..Reset DCC Counter Values
...Clear All Values: {
set %SMP3.CNTR.b.sent 0
set %SMP3.CNTR.f.sent 0
set %SMP3.CNTR.b.recd 0
set %SMP3.CNTR.f.recd 0
set %smp3.CNTR.t.recd 0
set %smp3.CNTR.t.sent 0
set %SMP3.Scriptsent 0
set %smp3.CNTR.maxrecd 0
set %smp3.CNTR.maxsent 0
set %SMP3.CNTR.date $date
writeini $DCC.Logfile Totals TotalRecieved 0
writeini $DCC.Logfile Totals TotalSent 0
writeini $DCC.Logfile Totals Numsent 0
writeini $DCC.Logfile Totals Numrecieved 0
writeini $DCC.Logfile Totals TimeSent 0
writeini $DCC.Logfile Totals TimeRecieved 0
writeini $DCC.Logfile Date DateStart $date
writeini $DCC.Logfile ScriptSent Number 0
writeini $DCC.Logfile MaxSize Sent 0
writeini $DCC.Logfile MaxSize Recieved 0
}
.-
.Unload This!: { DCC.ScriptUnload }
}
👁️ 4 vistas • 📥 0 descargas