Chat filtering

lestatzero · Post by **lestatzero** » Sun Jul 15, 2012 11:49 am

This is a post by request on how to filter out the ingame chat so you can see only what you want to see.

Turn the speech delay time to the smallest available in your preference and use

the following to see everyting...
Chat viewer

Code: Select all

;============================================
; Script: Excelsior's Chat Viewer
; Author: Praxiiz Spectreon
; Purpose: Records Guild OR Global Chat and
; displays it in a separate window for easy reading.
; Version: 0.7
; Made to work with Excelsior Shard by Elron/Datguy
; Further revisions by BlaZe Budd[le]
;=============================================

set %symb [ ;use [ for global and < for guild


set #menubutton N/A
set %index 0
set %newLine #journal

menu clear
menu Window Title World Chat
menu Window Color blue
menu Window Size 700 150
menu List Create mainBuffer 0 0 700 150
menu Show

loop:
scanJournal 1
if #menubutton = CLOSED
  stop
if %newLine <> #journal
{
set %temp #journal
str pos %temp < p
str Left %temp 1
if #STRRES = %symb
{
set %string #journal
loop2:
str Pos %string _
set %pos #strRes
str Del %string #strRes 1
str Ins #strRes #spc %pos
set %string #strRes
str Count %string _
if #strRes > 0
  goto loop2
menu List Add mainBuffer %string
set %newLine #journal
set %index %index + 1
menu List Select mainBuffer %index
}
}
goto loop:
halt

Guild viewer

Code: Select all

 set %symb < ;use [ for global and < for guild


set #menubutton N/A
set %index 0
set %newLine #journal

menu clear
menu Window Title Guild Chat
menu Window Color blue
menu Window Size 700 75
menu List Create mainBuffer 0 0 700 75
menu Show

loop:
scanJournal 1
if #menubutton = CLOSED
  stop
if %newLine <> #journal
{
set %temp #journal
str pos %temp < p
str Left %temp 1
if #STRRES = %symb
{
set %string #journal
loop2:
str Pos %string _
set %pos #strRes
str Del %string #strRes 1
str Ins #strRes #spc %pos
set %string #strRes
str Count %string _
if #strRes > 0
  goto loop2
menu List Add mainBuffer %string
set %newLine #journal
set %index %index + 1
menu List Select mainBuffer %index
}
}
goto loop:
halt

and Journal viewer
(This has been edited from the origional to disable some features works good)

Code: Select all

; Script Name: TIM's Journal Scanner
; Author: TIM (timginter)
; Version: 1.1
; Client Tested with: 5.0.1j
; EUO version tested with: 1.5 v. 102
; Shard OSI / FS:  OSI/FS
; Revision Date: 28/01/09
; Public Release: 28/01/09
; Purpose: Shows journal entries via resizeable menu. Saves journal entries to a specified file.

gosub menuBody

; magery
set %wordsOfPower Uus_Jux__In_Mani_Ylem__Rel_Wis__In_Mani__In_Por_Ylem__In_Lor__Flam_Sanct__Des_Mani__Ex_Uus__Uus_Wis__An_Nox__An_Mani__In_Jux__An_Jux__Uus_Sanct__Uus_Mani__
set %wordsOfPower %wordsOfPower , Rel_Sanct__Vas_Flam__An_Por__In_Nox__Ort_Por__Rel_Por__Ex_Por__In_Sanct_Ylem__Vas_An_Nox__Vas_Uus_Sanct__Des_Sanct__In_Flam_Grav__In_Vas_Mani__
set %wordsOfPower %wordsOfPower , Por_Ort_Grav__Ort_Rel__Kal_Ort_Por__In_Jux_Hur_Ylem__An_Grav__Kal_In_Ex__In_Jux_Sanct__Por_Corp_Wis__An_Ex_Por__In_Nox_Grav__Kal_Xen__An_Ort__
set %wordsOfPower %wordsOfPower , Corp_Por__Vas_Ort_Flam__An_Lor_Xen__Kal_Por_Ylem__Vas_Des_Sanct__In_Ex_Grav__Wis_Quas__Vas_Ort_Grav__In_Sanct_Grav__Kal_Vas_Flam__Vas_Rel_Por__
set %wordsOfPower %wordsOfPower , Ort_Sanct__Vas_An_Ort__Flam_Kal_Des_Ylem__Vas_Ylem_Rel__In_Vas_Por__Vas_Corp_Por__An_Corp__Kal_Vas_Xen_Hur__Kal_Vas_Xen_Corp__Kal_Vas_Xen_Ylem__
set %wordsOfPower %wordsOfPower , Kal_Vas_Xen_Flam__Kal_Vas_Xen_An_Flam__
; necromancy
set %wordsOfPower %wordsOfPower , Uus_Corp__In_Jux_Mani_Xen__In_Agle_Corp_Ylem__An_Sanct_Gra_Char__Pas_Tym_An_Sanct__Rel_Xen_Vas_Bal__Rel_Xen_Corp_Ort__Wis_An_Ben__In_Sar__
set %wordsOfPower %wordsOfPower , In_Vas_Nox__In_Bal_Nox__Kal_Xen_Bal__Rel_Xen_An_Sanct__Kal_Xen_Bal_Beh__Kal_Vas_An_Flam__Rel_Xen_Um__Ort_Corp_Grav__
; chivlary
set %wordsOfPower %wordsOfPower , Expor_Flamus__Obsu_Vulni__Consecrus_Arma__Dispiro_Malas__Divinum_Furis__Forul_Solum__Augus_Luminos__Dium_Prostra__Extermo_Vomica__Sanctum_Viatas__
; spellweaving
set %wordsOfPower %wordsOfPower , Myrshalee__Olorisstra__Thalshara__Haeldril__Erelonia__Rauvvrae__Alalithra__Nylisstra__Tarisstree__Haelyn__Anathrae__Rathril__Orlavdra__Nyraxle__
set %wordsOfPower %wordsOfPower , Illorae__Aslavdra__

set %jEntry #jIndex
set %listIndex 0
  mainLoop:
if ( %jEntry < #jIndex || %jEntry = N/A )
{
  set %scanLine #jIndex - %jEntry
  scanJournal %scanLine
  set %journal #journal
  menu get filter_spam
  set %filterSpam #menuRes
  menu get filter_spells
  set %filterSpells #menuRes
  if %filterSpells = #true
  {
    str pos %journal : 1
    str del %journal 1 #strRes
    set %spellCheckStr #strRes
  }
  if ( %journal <> %lastEntry || %filterSpam = #false ) && ( %spellCheckStr notIn %wordsOfPower || %filterSpells = #false )
  {
    set %lastEntry %journal
    str count %journal _
    while #strRes > 0
    {
      str pos %journal _
      set %underscorePos #strRes
      str del %journal #strRes 1
      str ins #strRes #spc %underscorePos
      set %journal #strRes
      str count %journal _
    }
    set %listIndex %listIndex + 1
    gosub time
    set %line_ . %listIndex %time , #spc , %journal
    menu list add journal %line_ . %listIndex
    menu list select journal %listIndex
  }
  set %jEntry %jEntry + 1
}
if #menuButton <> NONE
{
  gosub #menuButton
  set #menuButton NONE
}
goto mainLoop

; ------------------------------------------------------

sub save
  menu get path
  set %file #menuRes
  gosub time
  set %listIndex %listIndex + 1
  set %line_ . %listIndex %time , #spc , SAVING , #SPC , TO: , #SPC , %file
  menu list add journal %line_ . %listIndex
  menu list select journal %listIndex
  set %jEntry %jEntry + 1
  if %saveIndex = N/A
  {
    set %saveIndex 1
  }
  set %saveGroupIndex 1
  set %groups ( %listIndex - %saveIdex ) / 20
  event sysMessage %groups
    saveLoop:
  set %params %listIndex - %saveIndex
  if %params > 20
  {
    set %params %saveIndex + 18
    set %lastParam %saveIndex + 19
    set %saveGroup . %saveGroupIndex
    for %save_i %saveIndex %params
    {
      set %saveLine %line_ . %save_i
      set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file , #SPC , && , #SPC , echo
    }
    set %saveLine %line_ . %lastParam
    set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file
    set %saveGroupIndex %saveGroupIndex + 1
    set %saveIndex %params + 1
    goto saveLoop
  }
  else
  {
    set %params %params - 1
    set %params %saveIndex + %params
    set %lastParam %saveIndex + %params + 1
    set %saveGroup . %saveGroupIndex
    for %save_i %saveIndex %params
    {
      set %saveLine %line_ . %save_i
      set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file , #SPC , && , #SPC , echo
    }
    set %saveLine %line_ . %lastParam
    set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file
  }
  for %save_i 1 %saveGroupIndex
  {
    execute cmd.exe /c echo %saveGroup . %save_i
  }
  gosub time
  set %listIndex %listIndex + 1
  set %line_ . %listIndex %time , #spc , SAVING , #SPC , DONE
  menu list add journal %line_ . %listIndex
  menu list select journal %listIndex
  set %jEntry %jEntry + 1
return

sub left
  if %width > 300
  {
    gosub menuBody -100 0
  }
  gosub rewriteList
return

sub right
  if %width < 1200
  {
    gosub menuBody 100 0
  }
  gosub rewriteList
return

sub rewriteList
  menu list clear journal
  for %restoreList_i 1 %listIndex
  {
      menu list add journal %line_ . %restoreList_i
  }
  menu list select journal %listIndex
return

sub closed
  stop
return

; -----------------------------------------------------

sub time
  set %time #time
  str ins %time : 5
  str ins #strRes : 3
  set %time [ , #strRes , ]
return

sub menuBody
  menu Clear
  menu Font Name Comic Sans MS
  menu Window title TIM's Journal
  menu Window color black
  menu Font Name Verdana
  menu Font color green
  menu Font bgcolor black
  menu Font size 8
  if %width = N/A
  {
     set %width 500
  }
  if %height = N/A
  {
     set %height 120
  }
  set %yCoordinate 5
  if %0 > 0
  {
    set %width %width + %1
  }
  menu list create journal 5 %yCoordinate %width %height

  menu Font Name Comic Sans MS
  set %yCoordinate %yCoordinate + %height
  set %yCoordinate %yCoordinate + 5
  if %filterSpam = N/A || %filterSpells = N/A
  {
    set %filterSpam #false
    set %filterSpells #true
  }
 ; menu check filter_spam 5 %yCoordinate 100 20 %filterSpam Filter spam?
  ;menu check filter_spells 100 %yCoordinate 100 20 %filterSpells Filter spells?

  set %yCoordinate %yCoordinate + 20
  ; menu button save 5 %yCoordinate 100 20 SAVE
  ; menu edit path 110 %yCoordinate 150 C:\journal.txt

  menu button left 265 %yCoordinate 20 20 <
  menu button right 287 %yCoordinate 20 20 >

  set %yCoordinate %yCoordinate + 25
  set %windowSize %width + 10
  menu Window Size %windowSize %yCoordinate
  menu Show
  set #menuButton NONE
return

anarchy · Post by **anarchy** » Sun Jul 15, 2012 4:57 pm

does this filter out system message? or do i have to razor it to go away in like 1ms?

lestatzero · Post by **lestatzero** » Sun Jul 15, 2012 7:06 pm

the journal viewer shows everything you turn the filter on in razor or ingame preferences so it does not show up in game for a long period of time... but this gives you the option to still view things if needed cause it is all loggedin the journal ... the journal viewer can be modified to filter out the system messages though if needed ...

Devlin · Post by **Devlin** » Fri Jul 20, 2012 3:29 pm

that script looks familiar =)
I have an alpha script somewhere, to record [c, [g and in game chat, as well as allowing you to cycle through those. But scripting sucks.

Excelsior

Chat filtering

Chat filtering

Re: Chat filtering

Re: Chat filtering

Re: Chat filtering