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

⟦60aa6a097⟧ TextFile

    Length: 538 (0x21a)
    Types: TextFile
    Notes: @(#)Text.show 13.1 (RC International) 91/07/25
    Names: »Text.show«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦97ad7467e⟧ »0005« 
        └─⟦this⟧ »./home/vmsys/OBJECTS/Text.show« 

TextFile

#	@(#)Text.show	13.1 (RC International) 91/07/25

#ident	"@(#)face:OBJECTS/Text.show	1.1"

title="Full Pathname"
framemsg=const "Press CANCEL to continue."
lifetime=longterm

header='
The full pathname is:
'

`fmlexpr "${ARG1}" : '.*' | set -l LEN;
fmlexpr ${DISPLAYW} - 3 | set -l DW;
if [ "${LEN}" -le "22" ];
then
	echo "columns=22";
	echo "rows=5";
elif [ "${LEN}" -le "${DW}" ];
then
	echo "columns=${LEN}";
	echo "rows=5";
else
	echo "columns=${DW}";
	fmlexpr ${LEN} / ${DW} + 5 | set -l DL;
	echo "rows=${DL}";
fi`

text="${ARG1}"