Return to 630lfk CVS log

Up to [Research Unix] / researchv10dc / 630 / bin

Annotation of researchv10dc/630/bin/630lfk, revision 1.1

1.1     ! root        1: #! /bin/sh
        !             2: #
        !             3: #      630lfk - load function key
        !             4: #
        !             5: #      630lfk key 'string in echo -e format' ...
        !             6: 
        !             7: while :
        !             8: do
        !             9:        case $# in
        !            10:        0)      exit 0;;
        !            11:        2)      ;;
        !            12:        *)      echo "usage: $0 [1-8] 'string' ..."; exit 1;;
        !            13:        esac
        !            14: 
        !            15:        case $1 in
        !            16:        [1-8])  key=$1;;
        !            17:        *)      echo "Bad function key - $1"
        !            18:                echo "usage: $0 [1-8] 'string' ..."; exit 2;;
        !            19:        esac
        !            20: 
        !            21:        string=`echo -e -n $2`
        !            22:        length=`echo -n "$string" | wc -c | tr -d " "`
        !            23:        echo -e -n "\033["$key";${length}q$string"
        !            24: 
        !            25:        shift 2
        !            26: done

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.