tai's ascii browser and clipboard

By tai on Oct 07, 2007

Simple and easy to use dialog that lists the ascii characters and gives you multiple clipboard options. The only thing you need to know about it the C button. That stands for clipboard. It just copies the basic format of the value. Everything else should be self-explanatory. Type /ascii to open the dialog.

dialog ascii {
  title "ascii table"
  size -1 -1 136 84
  option dbu
  list 1, 3 4 128 56, size
  text "Character:", 2, 3 63 32 8
  text "", 3, 38 63 25 8
  text "asc value:", 4, 71 63 31 8
  text "", 5, 106 63 25 8
  button "C", 6, 7 73 16 9
  button "C", 7, 71 73 17 9
  button "Clip. w/ $chr", 8, 23 73 39 9
  button "Clip. w/ $asc", 9, 88 73 39 9
}

on *:dialog:ascii:init:0:{ 
  var %x = 1
  while %x <= 256 { 
    did -a $dname 1 Character: $+(%x,:) $chr(%x)
    inc %x 
  }
}

on *:dialog:ascii:sclick:1:{
  did -ra $dname 3 $gettok($did($dname,1).seltext,3,32) 
  did -ra $dname 5 $asc($gettok($did($dname,1).seltext,3,32))
}

on *:dialog:ascii:sclick:*:{
  if ($did = 6) clipboard $gettok($did($dname,1).seltext,3,32)
  if ($did = 7) clipboard $asc($gettok($did($dname,1).seltext,3,32))
  if ($did = 8) clipboard $+($,chr,$chr(40),$did($dname,5).text,$chr(41))
  if ($did = 9) clipboard $+($,asc,$chr(40),$did($dname,3).text,$chr(41))
}

alias ascii $iif(!$dialog(ascii),dialog -m,dialog -v) ascii ascii

Comments

Sign in to comment.
napa182   -  Oct 07, 2007

i concur with RubixCube. I like this .. nice work

 Respond  
tai   -  Oct 07, 2007

thanks. :)

 Respond  
RubixCube   -  Oct 07, 2007

.. nice!

 Respond  
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.