Script para capturar tela

Descrição

Esconder código-fonte

#!/bin/bash --norc
#
# Capturando tela em modo gráfico
# Sandro Marcell (sandro_marcell@yahoo.com.br)
#
# Dependência: import (pacote ImageMagick)

# Funções de chamada rápida:
Qualidade() {
   QIM=$(xmessage -buttons Baixa,Media,Alta -print -center \
"Qual qualidade deseja para tela a ser capturada!")
case $QIM in
   Baixa) QLD=25  ;;
   Media) QLD=50  ;;
   Alta ) QLD=100 ;;
   *    ) exit 1  ;;
esac
}

Info() {
   xmessage -buttons Ok:0,Cancelar:1 -center \
"A tela capturada será salva em $HOME com o seguinte nome:
${0##*/}.jpg
Pressione 'Ok' para capturar ou 'Cancelar' para sair."
[[ $? != 0 ]] && exit 1
}

Teste() {
   if [[ $VLR == 0 ]]
   then
      xmessage -center "Tela capturada com sucesso"
      rm -f /tmp/$$ &>/dev/null
      exit
   else
      xmessage -center -file "/tmp/$$"
      rm -f /tmp/$$ &>/dev/null
      exit 1
   fi
}

# Opções para o usuário:
OPC=$(xmessage -buttons Sim,Nao,Cancelar -print -center \
      "Deseja capturar a tela inteira?")
      
# Verificando e executando a opção escolhida:
case $OPC in
   Sim)
   # Setando a qualidade da imagem com a função 'Qualidade':
   Qualidade
   # Chamando função 'Info':
   Info
   
   # Capturando...
   import -silent -dither -window root -quality $QLD \
   -pause 2 ~/${0##*/}.jpg 2>/tmp/$$
   VLR=$?
   
   # Testando resultado da operação com a função 'Teste':
   Teste ;;

   Nao)
   Qualidade
   Info
   
   # Aviso ao usuário:
   xmessage -buttons Ok:0 -center "Ao clicar em 'Ok' um cursor 
aparecerá, use-o para clicar sobre a janela desejada!"
   [[ $? != 0 ]] && exit 1

   import -silent -dither -screen -quality $QLD \
   -pause 2 ~/${0##*/}.jpg 2>/tmp/$$
   VLR=$?
   
   Teste ;;

   Cancelar) exit ;;
   
   *) exit 1 ;;
esac
# Fim