|
|
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: 4225 (0x1081)
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/ubld/easimemo«
#help
MEMO
Felterne i denne formular kan udfyldes p▶86◀ f▶9b◀lgende m▶86◀de:
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.
))
:II+ COMPILED
:TITLE
M E M O
:SCREEN
screen lines : 10
4 5 1 Opgavenavn:
1 6 1 ▶1b◀[AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>
4 8 1 Fra:
4 9 1 Titel:
4 11 1 Til:
4 14 1 cc:
4 17 1 Dato:
4 18 1 Vedr.:
1 20 1 ▶1b◀[AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>
4 21 1 memo....memo....memo....memo....memo....memo....memo....memo....memo..
1 22 1 ▶1b◀[AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA>
:LABELS
Label lines : 10
i labx laby lpage llen itype itbnum iprompt idefval label width
CHARS: charset reply prompt wrap
DEC : dec_pl min max
DATES:No output
0 18 5 1 37 C 0 Angiv opgavenavn til det f▶91◀rdige memo doc 0
CHAR E file=w 1 -1
1 14 8 1 59 C 0 Angiv dit navn $(2) from 0
CHAR 1 -1
2 14 9 1 59 C 0 Angiv din titel (stillingsbetegnelse) $(3) title 0
CHAR 0 -1
3 14 11 1 59 C 0 Angiv navne adskilt med kommaer to 0
CHAR 1 -1
4 14 12 1 59 C 0 Angiv navne adskilt med kommaer to2 0
CHAR 0 -1
5 14 14 1 59 C 0 Angiv navne adskilt med kommaer cc 0
CHAR 0 -1
6 14 15 1 59 C 0 Angiv navne adskilt med kommaer cc2 0
CHAR 0 -1
7 14 17 1 3 C 1 $(7) d1 0
CHAR 0 -1
8 19 17 1 9 C 1 $(8) d2 0
CHAR 0 -1
9 30 17 1 4 C 1 $(9) d3 0
CHAR 0 -1
10 14 18 1 59 C 0 Angiv emnet for dette memo subj 0
CHAR 0 -1
:MAPS
Map lines : -1
i type label compar data map to
:COMMANDS
Hold pause clear reset:
0 0 0 0
Command: 46
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)
:END