Custom Pre/Post Fix & Modes Colours v0.3

By OrFeAsGr on Jun 24, 2016

SCRIPT ID: PPC
Hi!
Unlike my ,so far, mIRC Scripts this is a user wise script and not a Bot Script.
Not something you haven't seen before but it will be more updated, i think. And if you request more stuff i could try and add them :)
What you can do with it is:

  1. change the prefix and postfix of the nicks
  2. Change the colour for each mode

/prepost
Changes the prefix and postfix to whatever you want
/setmodcol mode colour-id
Mode can be one of these: ! + % @ & ~
or n (for normal users (no op or voice or whatever))
and colour-id a number between 1 and 15 (aka the colour you want, Hit Ctrl+K to see the colours)

ONE LITTLE DETAIL Because there thousands of scripts that use ON INPUT event, in case you are using one dont copy the second code below because it will probably lead into seeing or sending messages you send TWICE
Check Out my website for more scripts: http://humanity.ucoz.com and to help me make some cents without paying for anything.

Or do you want to donate some bucks because you like my scripts??? Visit https://www.paypal.me/OrFeAsGr
Thx! ^_^

;;;;;;;; Script by OrFeAsGr ;;;;;;;;;;
;;;;;;; For More Visit: http://humanity.ucoz.com ;;;;;;;;;
;;;;;;SCRIPT ID: PPC ;;;;;
;;;;;; v0.3 ;;;;;;;;;;;;;;
;;; http://hawkee.com/snippet/17126/ ;;;;;

ON ^*:TEXT:*:*: { 
  if (!%PPCVERSION) || (%PPCVERSION != v0.3) { set %PPCVERSION v0.3 }
  echo -m $iif($chan, $v1, $nick) $timestamp $+($iif(%npre, $v1, <),$iif($istok(! ~ & @ % +,$left($nick($chan,$nick).pnick,1),32), $modcol($left($nick($chan,$nick).pnick,1)), $modcol(n)),$nick,$+($chr(15),$iif(%npos, $v1, >)))  $1-
  if (!$chan) { flash -r $nick $nick has messaged you }
  haltdef 
}

alias prepost { 
  set %npre $1 
  set %npos $2 
}

alias msg { 
  if (!$1) {
    echo -at 4Error14: /msg 14: No Channel Or NickName And Text Given
  }
  if ($1) {
    if (!$2) && ($2 != $chr(48)) {
      echo -at 4Error14: /msg 14: No Text Given To Send To $replace($1,$chr(35),$+($chr(03),14,$chr(35),$chr(03),06))
    }
    !.msg $1 $2-
    ; if ($left($1,1) == #) {
    echo $1 $timestamp $+($iif(%npre, $v1, <),$iif($istok(! ~ & @ % +,$left($nick($chan,$me).pnick,1),32), $modcol($left($nick($chan,$me).pnick,1)), $modcol(n)),$me,$+($chr(15),$iif(%npos, $v1, >)))  $2-
    ; }
  }
}

alias modcol { 
  if ($1 == +) { return $iif(%vprcol, $+($chr(03),$v1,$1), $1) }
  if ($1 == %) { return $iif(%hprcol, $+($chr(03),$v1,$1), $1) }
  if ($1 == @) { return $iif(%oprcol, $+($chr(03),$v1,$1), $1) }
  if ($1 == &) { return $iif(%soprcol, $+($chr(03),$v1,$1), $1) }
  if ($1 == ~) { return $iif(%ownprcol, $+($chr(03),$v1,$1), $1) }
  if ($1 == !) { return $iif(%adminprcol, $+($chr(03),$v1,$1), $1) }
  else { return $iif(%normalcol, $+($chr(03),$v1), $null) }
}

alias setmodcol {
  if ($2 isnum 1-15) { 
    if ($istok(! ~ & @ % + n,$1,32)) {
      if ($1 == +) { set %vprcol $2 }
      if ($1 == %) { set %hprcol $2 }
      if ($1 == @) { set %oprcol $2 }
      if ($1 == &) { set %soprcol $2 }
      if ($1 == ~) { set %ownprcol $2 }
      if ($1 == n) { set %normalcol $2 }
      if ($1 == !) { set %adminprcol $2 }
      echo -at 3Colour for prefix: $iif($1 == n, normal users, $1) was changed to $+($chr(03),$2,this)
    }
  }
}

DO NOT COPY THIS, BELOW, IF YOU USE AN OTHER SCRIPT WITH ON INPUT EVENT

ON *:INPUT:*: {
  if ($left($1,1) != /) || ($left($1,4) == /msg) {
    msg $iif($1 == /msg, $2 $3-, $active $1-)
    halt
  }
}

27/7/2016
UPDATE: v0.3 : Added mIRC Window Flash When Someone PM's you (IF mIRC is not active) And Red Highlight On Channel Window On Channel Message

Comments

Sign in to comment.
dma   -  Jul 18, 2016

i get double results when some one talks and no color

OrFeAsGr  -  Jul 26, 2016

you have loaded some other script that uses on text event to customize the display of messages.
If you want only mine to work you need to unload that other script.

dma  -  Jul 27, 2016

where are yours?

Sign in to comment

Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.