|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 3334 (0xd06) Types: TextFile Names: »usr/spool/lp/model/5310 «
└─⟦307897ef0⟧ Bits:30004042/core1.imd SW95705I 386/ix Multi-user Release 1.2 └─⟦this⟧ »usr/spool/lp/model/5310 «
#ident "@(#)lp:model/5310 1.1" # # lp model for AT&T 5310/20 Matrix Printer # # # All output is passed through the /usr/bin/53filter filter unless # the -f option is specified (uses /bin/cat then). # If the filter is not executable or returns a exit code other than # 0, the printer will be disabled. # The options accepted are as follows: # # -f = Do not use filter # # -nc = Do not produce cover and trailer sheets # # -l6 or -l8 = Set Lines-per-inch accordingly # # -c10 or -c12 or -c16.7 = Set Characters-per-inch accordingly # # The printer options that should be set are as follows: # (all other options can be any value you prefer) # # WRAP: YES # EMUL: ANSI # LFON: NO # CRON: NO # CMOD: NOMD # PRTY: EVEN # BAUD: 9600 # FLOW: CHAR # DC24: NO # DEOT: NO # ECHO: NO # ABAA: NO # # Note: Tabs are not expanded to spaces by the TTY driver. Therefore # you should make sure the 5310/20 tab settings are what you wish. # The default values are compatible with UNIX default values. # stty parenb -parodd 9600 cs7 cread clocal ixon -ignbrk -brkint -ignpar\ -parmrk -inpck -istrip -inlcr -igncr -iuclc -ixany opost -ocrnl onlcr\ -onlret tab0 0<&1 x="\033P2q!750d\033\0134" printer=`basename $0` filter=/usr/bin/53filter CPI=10 LPI=6 id=$1 name=$2 title=$3 copies=$4 for i in $5 do case "$i" in 6 | -6 | -l6) LPI=6 ;; 8 | -8 | -l8) LPI=8 ;; 10 | -10 | -c10) CPI=10 ;; 12 | -12 | -c12) CPI=12 ;; 16.7 | 16 | -16.7 | -16 | -c16.7 | -c16) CPI=16 ;; f | -f) filter=/bin/cat ;; nc | -nc) cover=no ;; esac done if [ -n "$filter" -a ! -x $filter ] then disable -r"can't execute $filter filter" $printer exit 1 fi shift; shift; shift; shift; shift files="$*" echo "\014\c" if [ -z "$cover" ] then echo "\033[w\033[z\033[10e" echo "$x\n\n\n\n\n" banner "$name" echo "\n" echo "Request id: $id" date if [ -n "$title" ] then echo "\n" banner $title fi echo "\n\n\n\n\n" echo "$x" echo "\014\c" fi case $CPI in 10) echo "\033[w\c" ;; 12) echo "\033[2w\c" ;; 16) echo "\033[4w\c" ;; esac case $LPI in 6) echo "\033[z\c" ;; 8) echo "\033[2z\c" ;; esac i=1 while [ $i -le $copies ] do for file in $files do case $file in *.g|*.n|*.mm) stty -opost 0<&1 ;; esac $filter "$file" 2>&1 if [ $? -ne 0 ] then disable -r"Error code $? from $filter filter" $printer exit 1 fi stty opost -ocrnl onlcr -onlret tab0 0<&1 echo "\014\c" done i=`expr $i + 1` done if [ -z "$cover" ] then echo "\033[w\033[z\033[10e" echo "$x\n\n\n\n\n\n" banner "END" echo "\n\n\n\n\n$x" echo "\014\c" fi exit 0