|
|
DataMuseum.dkPresents historical artifacts from the history of: RC9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: @ T d
Length: 1207 (0x4b7)
Types: TextFile
Notes: @(#)lp:model/dqp10 1.2
Names: »dqp10«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/spool/lp/model/dqp10«
#! /bin/sh # #ident "@(#)lp:model/dqp10 1.2" #ident "$Header: dqp10,v 1.3 87/03/11 18:54:02 bobj Exp $" # @(#)dqp10 13.1 (RC International) 91/02/02 # lp interface for DQP-10 Matrix Printer # # x="XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" stty -parenb -parodd 9600 cs8 cread clocal ixon 0<&1 stty -ignbrk -brkint -ignpar -parmrk -inpck -istrip 0<&1 stty -inlcr -igncr -iuclc -ixany 0<&1 stty opost -ocrnl onlcr -onlret tab3 0<&1 echo "\033N" echo "\033]" id=$1 name=$2 title=$3 copies=$4 shift; shift; shift; shift; shift files="$*" echo "\014\c" echo "\n\n\n\n\n\n\n\n\n\n" echo "$x\n$x\n$x\n$x\n\n\n\n\n" banner "$name" echo "\n" echo "Request id: $id" date echo "\n" if [ -n "$title" ] then banner $title fi echo "\n\n\n\n\n" echo "$x\n$x\n$x\n$x\n\n\n\n\n" echo "\014\c" i=1 while [ $i -le $copies ] do for file in $files do case $file in *.g|*.n|*.mm) stty -opost 0<&1 ;; esac cat "$file" 2>&1 stty opost -ocrnl onlcr -onlret tab3 0<&1 echo "\033N" echo "\033]" echo "\014\c" done i=`expr $i + 1` done echo "\n\n\n\n\n\n\n\n\n\n" echo "$x\n$x\n$x\n$x\n\n\n\n\n" banner "END" echo "$x\n$x\n$x\n$x\n\n\n\n\n" echo "\014\c" exit 0