shithub: sce

Info  •  Files  •  Log  •  Branches

utils: remove deprecated scerot

--- a/utils/scerot

+++ /dev/null

@@ -1,18 +1,0 @@

-#!/bin/rc -e

-if(! ~ $#* 3){

-	echo usage: sceass radix nrot chan

-	exit usage

-}

-id=`{awk 'BEGIN{for(i=1; i<='^$2^'/2-1; i++) printf "%02d\n", i}'}

-rev=`{awk 'BEGIN{for(i='^$2^'-1; i>='^$2^'/2+1; i--) printf "%02d\n", i}'}

-n=`{seq 1 $#id}

-echo `"{for(i in $n){

-	echo !r $1^.^$id($i)^.bit s

-	echo 'm = s[X-x-1,y,z]'

-	echo !w m $1^.$rev($i)^.bit

-}} | pico

-for(i in $n){

-	t=`{read -c 46 $1^.^$id($i)^.bit | awk '{print $2, $3}'}

-	f=$1^.^$rev($i)^.bit

-	iconv -c $3 $f | crop -t $t > a && mv a $f

-}