DataMuseum.dk

Presents historical artifacts from the history of:

Regnecentalen RC-900

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

See our Wiki for more about Regnecentalen RC-900

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦99ca925ac⟧ TextFile

    Length: 4225 (0x1081)
    Types: TextFile
    Notes: UNIX file
    Names: »easimemo«

Derivation

└─⟦657bff2be⟧ Bits:30004160/disk1.imd SW95860 UNIPLEX+ release 1.0 (dansk)
└─⟦657bff2be⟧ UNIX Filesystem
    └─⟦this⟧ »ua/new/usr/UAP/ufill/ubld/easimemo« 

TextFile

#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