|
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
Length: 562 (0x232)
Types: TextFile
Notes: @(#)Text.disp 13.1 (RC International) 91/07/25
Names: »Text.disp«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦97ad7467e⟧ »0005«
└─⟦this⟧ »./home/vmsys/OBJECTS/Text.disp«
# @(#)Text.disp 13.1 (RC International) 91/07/25
#ident "@(#)face:OBJECTS/Text.disp 1.6"
title="$ARG2 - $ARG3"
lifetime=longterm
framemsg="Press the CANCEL function key to cancel."
`if [ ! -f ${ARG1} ];
then
message "${ARG2} does not exist.";
echo "init=false";
elif [ ! -r ${ARG1} ];
then
message "${ARG2} is not readable.";
echo "init=false";
fi`
help=OPEN TEXT OBJECTS/Text.mfhelp display display
rows=8
text="`readfile $ARG1`"
columns=`longline | set -l LL;
if [ "${LL}" -gt "72" ];
then
echo 72;
else
echo ${LL};
fi`
name=
button=8
action=nop