DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ T d

⟦2f406c01e⟧ TextFile

    Length: 1207 (0x4b7)
    Types: TextFile
    Notes: @(#)lp:model/dqp10 1.2
    Names: »dqp10«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/spool/lp/model/dqp10« 

TextFile

#! /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