|
|
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 e
Length: 4969 (0x1369)
Types: TextFile
Notes: UNIX file
Names: »easimemo«
└─⟦657bff2be⟧ Bits:30004160/disk1.imd SW95860 UNIPLEX+ release 1.0 (dansk)
└─⟦657bff2be⟧ UNIX Filesystem
└─⟦this⟧ »ua/new/usr/UAP/ufill/usrc/easimemo«
V.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T....H..
*
* Translated: 20.07.88 - Regnecentralen/AGJ
* Help translation: 12.10.88 - Regnecentralen/AMR
*
:TITLE
M E M O
:SCREEN
Opgavenavn: [doc__________________________________]
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
Fra: [from_______________________________________________________]
Titel: [title______________________________________________________]
Til: [to_________________________________________________________]
[to2________________________________________________________]
cc: [cc_________________________________________________________]
[cc2________________________________________________________]
Dato: [d1_][d2_______][d3__]
Vedr.: [subj_______________________________________________________]
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
memo....memo....memo....memo....memo....memo....memo....memo....memo..
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
:LABELS
from=type char, minimum=1, default=$(2),prompt="Angiv dit navn";
title=type char, default=$(3),prompt="Angiv din titel (stillingsbetegnelse)";
to=type char,minimum=1, prompt="Angiv navne adskilt med kommaer";
to2=type char, prompt="Angiv navne adskilt med kommaer";
cc=type char,prompt="Angiv navne adskilt med kommaer";
cc2=type char,prompt="Angiv navne adskilt med kommaer";
subj=type char,prompt="Angiv emnet for dette memo";
doc=type char file=create chars="E",minimum=1, prompt="Angiv opgavenavn til det f▶91◀rdige memo", chars = "E";
d1=type char, default=$(7), display only;
d2=type char, default=$(8), display only;
d3=type char, default=$(9), display only;
:COMMANDS
echo ".TA2" > $(doc)
echo ".SL62" >> $(doc)
echo ".BM3" >> $(doc)
echo "V............T..........T.......T.......T.......T.......T.......T....P" >> $(doc)
echo "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA@@" >> $(doc)
echo "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[" >> $(doc)
echo "memo....memo....memo....memo....memo....memo....memo....memo....memo" >> $(doc)
echo "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA@@" >> $(doc)
echo "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[" >> $(doc)
echo "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA@@" >> $(doc)
echo "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[" >> $(doc)
echo "V.......T.......T.......T.......T.......T.......T.......T.......T....P" >> $(doc)
echo " M E M O@@" >> $(doc)
echo " CCCCCCC" >> $(doc)
echo "V.......T.......T.......T.......T.......T.......T.......T.......T....H" >> $(doc)
echo " " >> $(doc)
echo " Fra: $(from)" >> $(doc)
echo " $(title)" >> $(doc)
echo " " >> $(doc)
echo " Til: $(to)" >> $(doc)
case "$(to2)" in
'') ;;
*) echo " $(to2)" >> $(doc);;
esac
echo " " >> $(doc)
echo " cc: $(cc)" >> $(doc)
case "$(cc2)" in
'') ;;
*) echo " $(cc2)" >> $(doc);;
esac
echo " " >> $(doc)
sd1="$(d1)"
sd2="$(d2)"
sd3="$(d3)"
echo " Dato: $sd1 $sd2 $sd3" >> $(doc)
echo " " >> $(doc)
echo " Vedr.: $(subj)">> $(doc)
echo " " >> $(doc)
echo "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA@@" >> $(doc)
echo "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[" >> $(doc)
rm -f $HOME/.Easimemo
uniplex -qc $HOME/.Easimemo
if test -f $HOME/.Easimemo; then
cat $HOME/.Easimemo >> $(doc)
rm $HOME/.Easimemo
fi
ufill easiaction memo $(doc)
:HELP
MEMO
Felterne i denne formular kan udfyldes p▶86◀ f▶9b◀lgende m▶86◀de:
..F..........V..T.......T.......T.......T.......T.......T.......T....L
Opgavenavn Angiv et navn p▶86◀ memoet, som UNIPLEX anvender som opgave▶ad◀
navn.
Fra Feltet er udfyldt p▶86◀ forh▶86◀nd med dit navn fra Personlige
data. Navnet kan ▶91◀ndres.
Titel Feltet er udfyldt p▶86◀ forh▶86◀nd med din titel. Titlen kan
▶91◀ndres eller slettes.
Til Indtast navnene p▶86◀ de personer, som skal modtage memoet.
Der kan st▶86◀ s▶86◀ mange navne og adresser, der er plads til
p▶86◀ de to linier.
.FS
cc Her angives de personer, som skal have tilsendt en kopi
af memoet.
Dato Dags dato inds▶91◀ttes automatisk.
Vedr. Indtast, hvad memoet vedr▶9b◀rer.
Tryk <F1> (Udf▶9b◀r), n▶86◀r formularen er udfyldt.