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

⟦92f5857f1⟧ TextFile

    Length: 2605 (0xa2d)
    Types: TextFile
    Notes: UNIX file
    Names: »easiletter1«

Derivation

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

TextFile

#help
  INDTAST NAVN OG ADRESSE

  Hvis denne mulighed er valgt i feltet Adresse, vises en formular:

  1. Udfyld formularen med de ▶9b◀nskede oplysninger. Piletasterne bruges
     til at flytte rundt med.

  2. Tryk <F1> (Udf▶9b◀r), n▶86◀r formularen er udfyldt.

  UNIPLEX  opretter en tekstbehandlingsopgave, hvor brevets tekst ind▶ad◀
  tastes. Der er ingen begr▶91◀nsning p▶86◀ brevets st▶9b◀rrelse.
))


:II+ COMPILED

:TITLE
B R E V

:SCREEN 
screen lines :	12
4	4	1	▶1b◀[DAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF
4	5	1	▶1b◀[B▶1b◀    Angiv modtagerens navn og adresse:                           ▶1b◀[B
4	6	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	7	1	▶1b◀[B▶1b◀    Navn                                                         ▶1b◀[B
4	8	1	▶1b◀[B▶1b◀    Titel                                                        ▶1b◀[B
4	9	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	10	1	▶1b◀[B▶1b◀    Adresse                                                      ▶1b◀[B
4	11	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	12	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	13	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	14	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	15	1	▶1b◀[B▶1b◀                                                                 ▶1b◀[B
4	16	1	▶1b◀[JAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH

:LABELS
Label lines :	6
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	7	1	46	C	0	Angiv modtagerens navn	$(1)	name	0
CHAR	 		0	-1
1	18	8	1	46	C	0	Kan eventuelt udelades		title	0
CHAR	 		0	-1
2	18	10	1	46	C	0			address1	0
CHAR	 		1	-1
3	18	11	1	46	C	0			address2	0
CHAR	 		0	-1
4	18	12	1	46	C	0			address3	0
CHAR	 		0	-1
5	18	13	1	46	C	0	Kan eventuelt udelades		address4	0
CHAR	 		0	-1
6	18	14	1	46	C	0	Kan eventuelt udelades		address5	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:	16
rm -f $HOME/.easiletter
echo "$(name)""▶8d◀" >> $HOME/.easiletter
case "$(title)" in
     "" );;
     *) echo "$(title)""▶8d◀" >> $HOME/.easiletter;;
esac
echo "$(address1)""▶8d◀" >> $HOME/.easiletter
echo "$(address2)""▶8d◀" >> $HOME/.easiletter
echo "$(address3)""▶8d◀" >> $HOME/.easiletter
case "$(address4)" in
     "");;
     *) echo "$(address4)""▶8d◀" >> $HOME/.easiletter;;
esac
case "$(address5)" in
     "");;
     *) echo "$(address5)""▶8d◀" >> $HOME/.easiletter;;
esac

:END