• Replies 9 replies
  • Subscribers 85 subscribers
  • Views 6272 views
  • Users 0 members are here
Options
Related

Counting characters in a segment

Paul
over 3 years ago

I came across this script from Selcuk Akyuz in the Proz website a few weeks ago:

;------------------------------------------------------------------------------
; Count characters in a segment
;------------------------------------------------------------------------------
!c:: 
Send, ^c
ClipWait
Chars := StrLen(Clipboard)
RegExReplace(Clipboard,A_Space,"",Spaces)
MsgBox % "The highlighted text is " Chars " characters in length and contains " Spaces " spaces."
clipboard = ; Empty the clipboard
return

The way it works is you select some text in the source or target segment and press Alt+c.  You then get something like this with a small message box that contains the count including spaces:
Rate translation
×
Suggest better translation
×
Parents
  • 10 months ago

    Thanks !

    I ran into a problem with the script that I don't know how to solve. Maybe an IF no text is selected, then return, or IF no text selected, show 0 character?

    I have no problem running the script on selected text, but if I press the hotkeys without first selecting text, nothing happens, and the script no longer works.

    This script would be super useful to my team when translating social media content, but some of my translator are not that comfortable with computers, and I definitely anticipate one of them forgetting to select the text, and they would’nt know how to restart the script.

    Any idea how to work around this error?
  • 10 months ago in reply to Audrey Demers

    ClipWait with no parameter will wait indefinitely until the clipboard contains some data. Because there is nothing selected, the script doesn't ever get to the next line.

    Please change the ClipWait line to something like this:

    ClipWait, 1 ; wait for 1 sec max.

    and it will not hang up.

    Good luck!
  • 10 months ago in reply to Jesús Prieto

    Works perfectly and I learned a new thing! Thanks Jesús!

    Here’s my code now, with a different hot key :

    ^+!c::
    Send, ^c
    ClipWait, 1 ; wait for 1 sec max
    Chars := StrLen(Clipboard)
    RegExReplace(Clipboard,A_Space,"",Spaces)
    MsgBox % "The highlighted text is " Chars " characters in length and contains " Spaces " spaces."
    clipboard = ; Empty the clipboard
    return
Reply Children
No Data