3D text

Platform: mIRC

Published May 11, 2011

Updated May 11, 2011

906 17

As the title says its a 3D text talker. turn it on and select the colors you want and you get 3D looking text the original version was made by Jethro_ me and lucius did some edits to it though so that you can choose diff colors for the text instead of it always being the same can also do underline and bold. put into a new remotes then right click in the nicklist,query or channel go to 3d text choose your color and turn it on.

alias -l spaces { return %3d.3 ( }

Menu Nicklist,query,channel {

  .3dtext

  ..on: { set %3dtext on }

  ..off: { set %3dtext off }

  ..Blue: { .set %3d.1 02 | .set %3d.2 12 | .set %3d.3 2,2 | .set %3d.4 00 | .set %3d.5 01 }

  ..Green: { .set %3d.1 03  | .set %3d.2 09 | .set %3d.3 3,3 |  .set %3d.4 00 | .set %3d.5 01 }

  ..Red: { .set %3d.1 05  | .set %3d.2 04 | .set %3d.3 01 | .set %3d.4 07 | .set %3d.5 01 }

  ..Gray: { .set %3d.1 14 | .set %3d.2 15 | .set %3d.3 14 | .set %3d.4 00 | .set %3d.5 01 }

  ..Pink: { .set %3d.1 13 | .set %3d.2 07 | .set %3d.3 13 | .set %3d.4 08 | .set %3d.5 12 } 

  .Bold

  ..On: { .set %bold  }

  ..Off: { .set %bold  }

  .underline

  ..On: { .set %underline  }

  ..Off: { .set %underline }

}

on *:Input:*: {

  if (%3dtext == on) {



    msg $active %underline %bold $regsubex($regsubex($1-,/(?!\s)(.)/g,$+($chr(3),%3d.2,$chr(44),%3d.1,$chr(40),$&

      $+($chr(3),%3d.4,$chr(44),%3d.1,\1),$+($chr(3),%3d.5,$chr(41),$chr(3)))),/(\s)/g,$spaces(\1)))

    haltdef

  }

}

Comments

blackvenomm666 - May 12, 2011

colour talker will mess with it as well turn off your colour talker

Respond

Zmodem - May 12, 2011

You may be using another addon/snippet/script loaded that is also doing something with the ON INPUT events. Make sure you don't have any themes loaded, like MTS, or the like. Make sure the only script loaded is this one.

Respond

}{exer - May 12, 2011

Nice :)
but
if turned on and I write something it poste two lines
the original and your modificated
What to do ?

Respond

Zmodem - May 12, 2011

I'd actually prefer yours, Jethro_, the most :) Tokens always slip my mind haha.

Respond

Jethro - May 12, 2011

Or this:

		Code 			
if ($istok(/ ! .,$left($1,1),32)) { return }	

Respond

Zmodem - May 12, 2011

You don't need the 'goto skipper' or the :skipper jump point. Example:

Instead of this:

		Code 			
if ($left($1,1) == /) || ($left($1,1) == !) || ($left($1,1) == .) { goto skipper }	

Use this:

		Code 			
if ($left($1,1) == /) || ($left($1,1) == !) || ($left($1,1) == .) { return }	

The 'return' alias allows you to exit out of a function without halting things, only skipping the rest of the code if the if-then-else statement is TRUE. Enjoy! :)

Respond

Lucius - May 11, 2011

Nicely spotted.
Here's my version.

		Code 			
alias -l spaces { return $+(,%3d.2,$chr(44),%3d.2,_)   }
Menu Nicklist,query,channel {
  .3dtext
  ..on: set %3dtext on 
  ..off: unset %3dtext  
  ...Bold
  ....On: set %3dbold 
  ....Off: unset %3dbold
  .Scheme
  ;####         v-text-v        v-background-v   v-endbrack-v   v-1stbrack-v
  ..Red (d):  set %3d.1 07 | set %3d.2 05 | set %3d.3 01 | set %3d.4 04
  ..Red (l):  set %3d.1 01 | set %3d.2 04 | set %3d.3 05 | set %3d.4 07
  ..Green..:  set %3d.1 00 | set %3d.2 03 | set %3d.3 01 | set %3d.4 09
  ..Blue...:  set %3d.1 14 | set %3d.2 02 | set %3d.3 01 | set %3d.4 12
  ..Teal...:  set %3d.1 00 | set %3d.2 10 | set %3d.3 02 | set %3d.4 11
  ..White..:  set %3d.1 00 | set %3d.2 14 | set %3d.3 01 | set %3d.4 15
  ..Pink...:  set %3d.1 08 | set %3d.2 13 | set %3d.3 12 | set %3d.4 07
  ..BLIND..:  set %3d.1 01 | set %3d.2 08 | set %3d.3 14 | set %3d.4 00
}
on *:Input:*: {
  if (%3dtext) && ($len($1-) < 49) {
    if ($left($1,1) == /) || ($left($1,1) == !) || ($left($1,1) == .) { goto skipper }
    msg $active %3dbold $regsubex($regsubex($1-,/(?!\s)(.)/g,$+($chr(3),%3d.4,$chr(44),%3d.2,$chr(40),$&
      $+($chr(3),%3d.1,$chr(44),%3d.2,\1),$+($chr(3),%3d.3,$chr(41),$chr(3)))),/(\s)/g,$spaces(\1)))
    haltdef

  }
  :skipper
}
 	

Both ryan and I ended up with pretty much the same script. three extra colour schemes (added later) and the command triggers as well as a length check. More than 48 letters/numbers/spaces and it messed up the regex, so I set it to just skip and save the error message. (mine does not have the underline though)
(the bold variable was simply the CTRL+B bold character but hawkee doesn't recognise it, remember to add it in when/if you copy it (line 7) hehe)
Enjoy!
And remember Jethro did the hard work, we just played with it a bit. ;]

Respond

Zmodem - May 11, 2011

Should change your ON INPUT event to include this:

		Code 			
  if ((%3dtext == on) && ($left($1-,1) != /)) {	

This will make sure that commands, like '/clear', won't be parsed.

Respond

blackvenomm666 - May 11, 2011

as i said sunny i can't take all the credit haha all i did was change the original version from an alias to an on text and then me and lucius found diff color combo's that look 3D the original color combo was the green one

Respond

SunnyD - May 11, 2011

Agreed looks very nice Venom. Points for originality and design. ^^

Respond

Lucius - May 11, 2011

It looks better in bold, and I also think the blue is the most effective for the 3d.
I prefer the dark red (brown) but then thats my usual colour so yeah.
Was a fun hour or two. Thanks again jethro for the original code, it kept boredom at bay.

Respond

JFK - May 11, 2011

Well, I'm still not so good in mirc-scripting

Respond

blackvenomm666 - May 11, 2011

this is a regular remote code jfk the alias is just for the spaces

Respond

JFK - May 11, 2011

Ah, really nice code here!
I personally would like it as a regular remotecode, and not a alias. But that's just me ;)

8.5/10 since it didn't look to well all the time

Respond

ShaferBatman - May 11, 2011

very nice snipplet. good effect 10/10

Respond

blackvenomm666 - May 11, 2011

yea could do it that way to but if you look it sets bold and underline to have no value therefore it works either way haha. but yes unset woulda been the proper way to go about it. and as for the real off switch. it checks to see if the var is set to on so technically i could have the off switch set the var to f|_|ckyou and it would still work properly haha

Respond

Jethro - May 11, 2011

Nice effort to include more colors the ability to bold or underline the text. One question I do have: shouldn't the off switch be unset rather than set?

Respond