2 votos

AppleScript para crear espaciado de formato como "S P a C I N G"?

Para dar formato a documentos de texto en una manera más legible sería bueno para dar formato a los textos seleccionados por un apple script que se ejecuta a través del menú contextual de los servicios de la siguiente manera:

  1. seleccione "texto" con el cursor
  2. seleccione menú contextual/servicios de Espaciado (a crearse)
  3. texto seleccionado va a ser formateado a "T E X T"

¿Alguien tiene los conocimientos para programar una secuencia de comandos?

3voto

Steve Evans Puntos 155

AppleScript para Ampliar Texto

El siguiente AppleScript fragmento agrega un espacio entre cada carácter de una cadena. Copia y pega este código en Aplicaciones > Utilidades > Editor de secuencias de Comandos para probarlo:

set myText to "hello world"
set myResult to ""

repeat with c in every character in myText
    set myResult to myResult & " " & c
end repeat

display dialog myResult

Automator Servicio

El uso de esta secuencia de comandos, puede utilizar Aplicaciones > Automator para crear su menú de contexto de servicio.

Automator workflow to expand selected text

New text expand service in TextEdit

  1. Lanzamiento De Automator.aplicación
  2. Crear un nuevo flujo de trabajo, seleccione el Servicio de
  3. Añadir un Ejecutar AppleScript acción
  4. Copiar y pegar en la secuencia de comandos:

    on run {input, parameters}
    
        set myText to input as string
        set myResult to ""
    
        repeat with c in every character in myText
            set myResult to ((myResult & " " & c) as string)
        end repeat
    
        -- Convert to upper case using `tr`
        set myResult to do shell script "echo " & quoted form of (myResult) & " | tr [:lower:] [:upper:]"
    
        return myResult
    end run
    
  5. Seleccione Salida reemplaza el texto seleccionado

  6. Guardar y probar su nuevo servicio

1voto

user3439894 Puntos 5883

Tener el texto seleccionado convierte a mayúscula, junto con tener un espacio adicional entre cada personaje, agregue la línea siguiente a la secuencia de comandos publicado por Graham Miln.

set myResult to do shell script "echo " & quoted form of (myResult) & " | tr [:lower:] [:upper:]"

Así, en Automator sería:

on run {input, parameters}

    set myText to input as string
    set myResult to ""

    repeat with c in every character in myText
        set myResult to ((myResult & " " & c) as string)
    end repeat

    set myResult to do shell script "echo " & quoted form of (myResult) & " | tr [:lower:] [:upper:]"

    return myResult

end run

AppleAyuda.com

AppleAyuda es una comunidad de usuarios de los productos de Apple en la que puedes resolver tus problemas y dudas.
Puedes consultar las preguntas de otros usuarios, hacer tus propias preguntas o resolver las de los demás.

Powered by:

X