AniDB O'Matic - mIRC script for statistics: Difference between revisions

Jump to navigation Jump to search

AniDB O'Matic - mIRC script for statistics (view source)

Revision as of 11:58, 23 January 2010

659 bytes removed ,  23 January 2010
m
Changed the way the state shows. It will hide it when the state is 0
No edit summary
m (Changed the way the state shows. It will hide it when the state is 0)
 
(10 intermediate revisions by 4 users not shown)
Line 1: Line 1:
<pre>
Copy the text and put it in notepad or so and name it StatWhoreing.mrc or a othername.mrc then do /load -rs othername.mrc to load it. After you copy the file into your mIRC directory.
#                    Made By AnimeNeko Thx to PetriW For this Option                      #
#                              Enable statwhoring in aom                                  #
# Replace e:\aom\MyStats.ini to the correct Directory and filename. But choose INI in aom. #
#                        You can use it in the ChatChannel and PM                        #
 
menu channel,query {
  - 
  AniDb Mystats: mystats
}
alias mystats {
  var %aom.file e:\aom\MyStats.ini
  if ($exists(%aom.file)) {
    var %username $readini(%aom.file, anidb, username)
    var %anidbepcount $readini(%aom.file, anidb, episodecount)
    var %animecount $readini(%aom.file, mylist, animecount)
    var %totaleps $readini(%aom.file, mylist, episodecount)
    var %Tfilescount $readini(%aom.file, mylist, filecount)
    var %fileswatched $readini(%aom.file, mylist, fileswatched)
    var %mylistsize $readini(%aom.file, mylist, size)
    var %epswatched $readini(%aom.file, mylist, episodeswatched)
    var %watchedsize $readini(%aom.file, mylist, watchedsize)
    say %username has %animecount Animes, %totaleps Episodes, %Tfilescount files, Total $bytes(%mylistsize,g).suf $+ ( $+ $round($calc(%totaleps / %anidbepcount * 100 ),3) $+ % $+ ) of AniDB, %username Watched %epswatched Eps, $round($calc(%epswatched / %totaleps * 100 ),3) $+ % of mylist $+ , $bytes(%watchedsize,g).suf $+ , %fileswatched files, Which is $round($calc(%epswatched / %anidbepcount * 100 ),3) $+ % Of AniDB
  }
}
</pre>
 
Copy the text and put it in notepad or so and name it StatWhoreing.mrc or a othername.mrc then do /load -rs othername.mrc to load it. After you copy the file into your mirc dir.


If you want your mylist size in GB. and not that it automatic converts to mb,gb,tb  
If you want your MyList size in GB. and not that it automatic converts to mb,gb,tb  
change $bytes(%mylistsize).suf into $bytes(%mylistsize,g).suf
change $bytes(%mylistsize).suf into $bytes(%mylistsize,g).suf
then it will only show the size of your mylist in GB's
then it will only show the size of your MyList in GB's
 
*Update/debug
fixed a small calculating error in the stats part.
 
edit: Adjusted the script for AOM 0.5.10+ and higher.
      Cleaned the code a little bit also Thx to light


<pre>
<pre>
#                    Made By AnimeNeko Thx to PetriW For this Option                            #
#                    Made By AnimeNeko Thx to PetriW For this Option                            #
#              Enable statwhoring in aom Use version 0.5.10.x or higher                        #
#              Enable statwhoring in aom Use version 0.5.10.x or higher                        #
#    Replace e:\aom\MyStats.ini to the correct Directory and filename. But choose INI in aom.   #
#                                        v0.4                                                    #
#                      Works In chat Channel and in Private Message                             #
#    Replace XX:\aom\MyStats.ini to the correct Directory and filename. But choose INI in aom.   #
#                      Works In chat Channel and in Private Message.                            #
# Note in the Partially Watched status if you have everything seen and none partially seen it    #
# Note in the Partially Watched status if you have everything seen and none partially seen it    #
# will only show Partially seen . The script hides the types where you dont have anything        #
# will only show Partially seen. The script hides the types where you don't have anything        #
#                                  partially seen in                                             #
#                                  partially seen in.                                            #


on *:load: { set %aom.file y:\aom\MyStats.ini }


menu channel,query {
menu channel,query {
Line 66: Line 35:


alias Anidbstats {
alias Anidbstats {
  var %aom.file e:\aom\MyStats.ini
   if ($exists(%aom.file)) {  
   if ($exists(%aom.file)) {  
     var %animecountt $readini(%aom.file, anidb, animecount)
     var %animecountt $readini(%aom.file, anidb, animecount)
Line 82: Line 50:
     var %unknowntotal $readini(%aom.file, animetypeUnknown, total)
     var %unknowntotal $readini(%aom.file, animetypeUnknown, total)
     var %year $int($calc( (%length ) / (60*60*24*365) ))
     var %year $int($calc( (%length ) / (60*60*24*365) ))
     var %weeks $int($calc( (%length )/ ( 60*60*24*7) - (%year * 365/7)  ))  
     var %weeks $int($calc( (%length ) / ( 60*60*24*7) - (%year * 365/7)  ))  
     var %days $int($calc( (%length )/ (60*60*24) - (%year *365 ) - (%weeks *7) ))
     var %days $int($calc( (%length ) / (60*60*24) - (%year *365 ) - (%weeks *7) ))
     var %hour $int($calc( (%length ) / (60*60) - (%year *365*24) - (%weeks *7*24) - (%days *24) ))
     var %hour $int($calc( (%length ) / (60*60) - (%year *365*24) - (%weeks *7*24) - (%days *24) ))
     var %mins $int($calc( (%length ) / (60) - (%year *365*24*60) - (%weeks *7*24*60) - (%days *24*60) - (%hour *60)) )
     var %mins $int($calc( (%length ) / (60) - (%year *365*24*60) - (%weeks *7*24*60) - (%days *24*60) - (%hour *60)) )
Line 91: Line 59:


alias mystats {
alias mystats {
  var %aom.file e:\aom\MyStats.ini
   if ($exists(%aom.file)) {  
   if ($exists(%aom.file)) {  
     var %username $readini(%aom.file, anidb, username)
     var %username $readini(%aom.file, anidb, username)
Line 111: Line 78:
     var %othermylist $readini(%aom.file, animetypeOther, inmylist)
     var %othermylist $readini(%aom.file, animetypeOther, inmylist)
     var %unknownmylist $readini(%aom.file, animetypeUnknown, inmylist)
     var %unknownmylist $readini(%aom.file, animetypeUnknown, inmylist)
     say I have %animecount Animes( $+ $iif(%tvmylist = 0,,%tvmylist Series $+ $chr(44)) $iif(%specialsmylist = 0,,%specialsmylist Specials $+ $chr(44)) $iif(%moviemylist = 0,,%moviemylist Movies) $+ $iif(%ovamylist = 0,,$+ $chr(44) %ovamylist OVA's) $+ $iif(%webmylist = 0,,$+ $chr(44) %webmylist Web) $+ $iif(%othermylist = 0,,$+ $chr(44) %othermylist Other) $+ $iif(%unknownmylist = 0,,$+ $chr(44) %unknownmylist Unknown) $+ ), %totaleps Episodes, %Tfilescount files, Total $bytes(%mylistsize,g).suf $+ ( $+ $round($calc(%totaleps / %anidbepcount * 100 ),3) $+ % $+ ) of AniDB.
     say I have %animecount Animes( $+ $iif(%tvmylist = 0,,%tvmylist Series $+ $chr(44)) $iif(%specialsmylist = 0,,%specialsmylist Specials $+ $chr(44)) $iif(%moviemylist = 0,,%moviemylist Movies) $+ $iif(%ovamylist = 0,,$+ $chr(44) %ovamylist OVA's) $+ $iif(%webmylist = 0,,$+ $chr(44) %webmylist Web) $+ $iif(%othermylist = 0,,$+ $chr(44) %othermylist Other) $+ $iif(%unknownmylist = 0,,$+ $chr(44) %unknownmylist Unknown) $+ ), %totaleps Episodes( $+ $round($calc(%totaleps / %anidbepcount * 100 ),3) $+ % $+ ) of AniDB, %Tfilescount files, Total $bytes(%mylistsize,g).suf $+ .
   }
   }
}
}


alias watched {
alias watched {
  var %aom.file e:\aom\MyStats.ini
   if ($exists(%aom.file)) {  
   if ($exists(%aom.file)) {  
     var %username $readini(%aom.file, anidb, username)
     var %username $readini(%aom.file, anidb, username)
Line 129: Line 95:
     var %fileswatched $readini(%aom.file, mylist, fileswatched)
     var %fileswatched $readini(%aom.file, mylist, fileswatched)
     var %watchedsize $readini(%aom.file, mylist, watchedsize)
     var %watchedsize $readini(%aom.file, mylist, watchedsize)
    var %watchedlength $readini(%aom.file, mylist, lengthwatched)
     var %tvw $readini(%aom.file, animetypeTVSeries, allwatched)
     var %tvw $readini(%aom.file, animetypeTVSeries, allwatched)
     var %spw $readini(%aom.file, animetypeTVSpecials, allwatched)
     var %spw $readini(%aom.file, animetypeTVSpecials, allwatched)
Line 143: Line 110:
     var %otpw $readini(%aom.file, animetypeOther, partwatched)
     var %otpw $readini(%aom.file, animetypeOther, partwatched)
     var %unpw $readini(%aom.file, animetypeUnknown, partwatched)
     var %unpw $readini(%aom.file, animetypeUnknown, partwatched)
     say i have seen $iif(%tvw = 0,,%tvw Series $+ $chr(44)) $iif(%spw = 0,,%spw Specials $+ $chr(44)) $iif(%mw = 0,,%mw Movies) $+ $iif(%ovaw = 0,,$+ $chr(44) %ovaw OVA's) $+ $iif(%webw = 0,,$+ $chr(44) %webw Web) $+ $iif(%otw = 0,,$+ $chr(44) %otw Other) $+ $iif(%unw = 0,,$+ $chr(44) %unw Unknown) $+ , Partially seen $iif(%tvpw = 0,,%tvpw Series $+ $chr(44)) $iif(%sppw = 0,,%sppw Specials $+ $chr(44)) $iif(%mpw = 0,,%mpw Movies) $+ $iif(%ovpw = 0,,$+ $chr(44) %ovpw OVA's) $+ $iif(%wpw = 0,,$+ $chr(44) %wpw Web) $+ $iif(%otpw = 0,,$+ $chr(44) %otpw Other) $+ $iif(%unpw = 0,,$+ $chr(44) %unpw Unknown) $+ . Total $calc(%animewatched + %animepartw) Animes, %epswatched Episodes( $+ $round($calc(%epswatched / %totaleps * 100 ),3) $+ % of Mylist), %Tfilescount Files, $bytes(%watchedsize,g).suf $+ , Which is $round($calc(%epswatched / %anidbepcount * 100 ),3) $+ % Of AniDB
    var %days $int($calc( (%watchedlength ) / (60*60*24)) )
    var %hour $int($calc( (%watchedlength ) / (60*60) - (%days *24) ))
    var %mins $int($calc( (%watchedlength ) / (60) - (%days *24*60) - (%hour *60)) )
     say Seen $calc(%animewatched + %animepartw) Animes ( $+ $iif(%tvw = 0,,%tvw Series $+ $chr(44)) $iif(%spw = 0,,%spw Specials $+ $chr(44)) $iif(%mw = 0,,%mw Movies) $+ $iif(%ovaw = 0,,$+ $chr(44) %ovaw OVA's) $+ $iif(%webw = 0,,$+ $chr(44) %webw Web) $+ $iif(%otw = 0,,$+ $chr(44) %otw Other) $+ $iif(%unw = 0,,$+ $chr(44) %unw Unknown) $+ ) Partially seen $iif(%tvpw = 0,,%tvpw Series) $+ $iif(%sppw = 0,,$+ $chr(44) %sppw Specials) $+ $iif(%mpw = 0,,$+ $chr(44) %mpw Movies) $+ $iif(%ovpw = 0,,$+ $chr(44) %ovpw OVA's) $+ $iif(%wpw = 0,,$+ $chr(44) %wpw Web) $+ $iif(%otpw = 0,,$+ $chr(44) %otpw Other) $+ $iif(%unpw = 0,,$+ $chr(44) %unpw Unknown) $+ . Total %epswatched Episodes( $+ $round($calc(%epswatched / %totaleps * 100 ),3) $+ % of Mylist, $round($calc(%epswatched / %anidbepcount * 100 ),3) $+ % of AniDB), %fileswatched Files, $bytes(%watchedsize,g).suf $+ , Time wasted %days Days %hour Hour and %mins Minutes
   }
   }
}
}


alias storage {
alias storage {
  var %aom.file e:\aom\MyStats.ini
   if ($exists(%aom.file)) {  
   if ($exists(%aom.file)) {  
     var %StateUnknownc $readini(%aom.file, statusUnknown, count)
     var %StateUnknownc $readini(%aom.file, statusUnknown, count)
Line 162: Line 131:
     var %Statedels $readini(%aom.file, statusDeleted, size)
     var %Statedels $readini(%aom.file, statusDeleted, size)
     var %Statedelw $readini(%aom.file, statusDeleted, watched)
     var %Statedelw $readini(%aom.file, statusDeleted, watched)
 
     Say State: $iif(%StateUnknownc = 0,,Unknown: %StateUnknownc File's $+ $chr(44) $bytes(%StateUnknowns).suf $+ $chr(44) Episodes Watched %StateUnknownw $+ $chr(44)) $iif(%Statehddc = 0,,On HDD: %Statehddc File's $+ $chr(44) $bytes(%Statehdds).suf $+ $chr(44) Episodes Watched %Statehddw $+ $chr(44)) $iif(%Statecdc = 0,,On CD/DVD: %Statecdc File's $+ $chr(44) $bytes(%Statecds).suf $+ $chr(44) Episodes Watched %Statecdw $+ ) $iif(%Statedelc = 0,, $chr(44) $+ Deleted: %Statedelc File's $+ $chr(44) $bytes(%Statedels).suf $+ $chr(44) Episodes Watched %Statedelw $+ .)
     say State: Unknown: %StateUnknownc File's, $bytes(%StateUnknowns).suf $+ , Episodes Watched %StateUnknownw $+ , On HDD: %Statehddc File's, $bytes(%Statehdds).suf $+ , Episodes Watched %Statehddw $+ , On CD/DVD: %Statecdc File's, $bytes(%Statecds).suf $+ , Episodes Watched %Statecdw $+ , Deleted: %Statedelc File's, $bytes(%Statedels).suf $+ , Episodes Watched %Statedelw $+ .
   }
   }
}
}
Line 196: Line 164:


alias AnimeTypeSay {
alias AnimeTypeSay {
  var %aom.file e:\aom\MyStats.ini
   if ($exists(%aom.file)) {
   if ($exists(%aom.file)) {
    var %animetypeUnknown $$2
     var %total $readini(%aom.file, $2, total)
     var %total $readini(%aom.file, %animetypeUnknown, total)
     var %m $readini(%aom.file, $2, inmylist)
     var %m $readini(%aom.file, %animetypeUnknown, inmylist)
     var %w1 $readini(%aom.file, $2, allwatched)
     var %w1 $readini(%aom.file, %animetypeUnknown, allwatched)
     var %pw1 $readini(%aom.file, $2, partwatched)
     var %pw1 $readini(%aom.file, %animetypeUnknown, partwatched)
    var %tw1 $readini(%aom.file, $2, lengthwatched)
     say $$1: In AniDB: %total - In Mylist: %m - Watched: %w1 - Partially Watched: %pw1
    var %days $int($calc( (%tw1 ) / (60*60*24)) )
    var %hour $int($calc( (%tw1 ) / (60*60) - (%days *24) ))
    var %mins $int($calc( (%tw1 ) / (60) - (%days *24*60) - (%hour *60)) )
     say $$1: In AniDB: %total - In Mylist: %m - Watched: %w1 - Partially Watched: %pw1 - Time wasted: %days Days %hour Hour and %mins Minutes
 
     return 0
     return 0
   }
   }
}
}
</pre>
*Update/debug
fixed a small calculating error in the stats part.
edit: Adjusted the script for AOM 0.5.10+ and higher. Cleaned the code a little bit also Thx to light
* v0.2 : fixed script so it will work with older mIRC versions


Here I added a menu to show the AniDB stats, your own stats, and the state of the files. Like X files unknown on HDD on CD and deleted.


</pre>
* v0.4 : Fixed some little bugs
here i added a menu to show the AniDB stats, your own stats, and the state of the files. like X files unknown on hdd on cd and deleted.
      : Added the Time Wasted to some stats.
might still have bugs or so :P
      : Reorded some things


[[Category:AniDB O'Matic]]
[[Category:AniDB O'Matic]]
[[Category:IRC]]
[[Category:IRC]]
AnimeNeko
20

edits

Retrieved from "https://wiki.anidb.net/Special:MobileDiff/8662...14690"

Navigation menu

MediaWiki spam blocked by CleanTalk.
MediaWiki spam blocked by CleanTalk.