Extra Character Insert Dialog

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	Jul 10, 2008
Last Updated	Jul 12, 2008
Tags	character copy dialog extra insert language mirc paste remote remotes unusual

Introduction

Allows you to copy a character which is not found on a standard American keyboard to the clipboard and simply just copy/paste it into your message.

If I'm missing any, please PM me them, thanks!

Grab the Code

menu status,channel,nicklist {
  [Extra Characters]: $iif(!$dialog(ExtraChars),dialog -mied ExtraChars ExtraChars, halt)
}
alias ExtraChars $iif(!$dialog(ExtraChars),dialog -mied ExtraChars ExtraChars, halt)
dialog ExtraChars {
  title "Extra Character Insert"
  size -1 -1 240 140
  radio "LowerCase", 1, 10 10 80 20
  radio "Caps", 2, 10 40 80 20
  radio "Punctuation", 99, 10 70 80 20
  button "", 3, 90 10 18 17
  button "", 4, 108 10 18 17
  button "", 5, 126 10 18 17
  button "", 6, 143 10 18 17
  button "", 7, 160 10 18 17
  button "", 8, 177 10 18 17
  button "", 9, 194 10 18 17
  button "", 10, 211 10 18 17
  button "", 11, 90 30 18 17
  button "", 12, 108 30 18 17
  button "", 13, 126 30 18 17
  button "", 14, 143 30 18 17
  button "", 15, 160 30 18 17
  button "", 16, 177 30 18 17
  button "", 17, 194 30 18 17
  button "", 18, 211 30 18 17
  button "", 19, 90 50 18 17
  button "", 20, 108 50 18 17
  button "", 21, 126 50 18 17
  button "", 22, 143 50 18 17
  button "", 23, 160 50 18 17
  button "", 24, 177 50 18 17
  button "", 25, 194 50 18 17
  button "", 26, 211 50 18 17
  button "", 27, 90 70 18 17
  button "", 28, 108 70 18 17
  button "", 29, 126 70 18 17
  button "", 30, 143 70 18 17
  button "", 31, 160 70 18 17
  button "", 32, 177 70 18 17
  button "", 33, 194 70 18 17
  button "", 34, 211 70 18 17
  edit "", 35, 10 95 220 20, disable
}
on *:dialog:ExtraChars:init:*: {
  did -b $dname 3-34
  var %x à á â ã ä ç è é ê ë ì í î ï ñ ò ó ô ö ø ù ú û ü ÿ œ, %t 0, %y 2
  while (%t < $numtok(%x,32)) {
    inc %y | inc %t
    did -ie $dname %y 1 $gettok(%x,$calc(%y - 2),32)
  }
  did -c $dname 1
}
on *:dialog:ExtraChars:sclick:*: {
  if (($did == 1) || ($did == 2) || ($did == 99)) {
    did -br $dname 3-34
    var %x $iif($did == 1,à á â ã ä ç è é ê ë ì í î ï ñ ò ó ô ö ø ù ú û ü ÿ œ,) $iif($did == 2,ß Á Â Ã Ä Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Ö,) $iif($did == 99,¿ ¡ ? !,), %t 0, %y 2
    while (%t < $numtok(%x,32)) {
      inc %y | inc %t
      did -ie $dname %y 1 $gettok(%x,$calc(%y - 2),32)
    }
  }
  else {
    clipboard $did($dname,$did).text
    did -o $dname 35 1 ' $+ $did($dname,$did).text $+ ' has been selected in clipboard.
  }
}

Comments

(1) RSS

Go to Bottom

BlueThen

Comments: 320

mIRC Snippet: Extra Character Insert Dialog
Posted on Jul 10, 2008 5:48 pm

ÿ þ ý ü û ú ù ø ÷ ö õ ô ó ò ñ ð ï î í ì ë ê é è ç æ å ä ã â á à ß Þ Ý Ü Û Ú Ù Ø × Ö Õ Ô Ó Ò Ñ Ð Ï Î Í Ì Ë Ê É È Ç Æ Å Ä Ã Â Á À ¿ ¾ ½ ¼ » º ¹ ¸ · ¶ µ ´ ³ ² ± ° ¯ ® ¬ « ª © ¨ § ¦ ¥ ¤ £ ¢ ¡

That's pretty much all my mirc supports

Extra Character Insert Dialog

Introduction

Grab the Code

Comments

vaseline28

My Snippet Tags

Contact

Friends (8)

Sponsors

		Caelestia.net
Last seen: Oct 06, 2008 Profile \| Website Likes (9) Friends (8) Snippets (19) Images (8) Comments Received (111) Comments Submitted (154) Forum Posts (85)