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

⟦fc41ad432⟧ TextFile

    Length: 4689 (0x1251)
    Types: TextFile
    Notes: UNIX file
    Names: »easilettercc«

Derivation

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

TextFile

#help
  KOPIER (CC.)

  Formularen  udfyldes  med navnene p▶86◀ de personer, som skal  have  en
  kopi af brevet. Disse navne inds▶91◀ttes nederst i brevet.

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


:II+ COMPILED

:TITLE
B R E V

:SCREEN 
screen lines :	14
10	5	1	Angiv navnene p▶86◀ de personer, der skal have kopi af brevet
2	6	1	▶1b◀[DAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF
2	7	1	▶1b◀[B▶1b◀                Navn                              Titel                 ▶1b◀[B
2	8	1	▶1b◀[B▶1b◀                                                                        ▶1b◀[B
2	9	1	▶1b◀[B▶1b◀   1:                                                                   ▶1b◀[B
2	10	1	▶1b◀[B▶1b◀   2:                                                                   ▶1b◀[B
2	11	1	▶1b◀[B▶1b◀   3:                                                                   ▶1b◀[B
2	12	1	▶1b◀[B▶1b◀   4:                                                                   ▶1b◀[B
2	13	1	▶1b◀[B▶1b◀   5:                                                                   ▶1b◀[B
2	14	1	▶1b◀[B▶1b◀   6:                                                                   ▶1b◀[B
2	15	1	▶1b◀[B▶1b◀   7:                                                                   ▶1b◀[B
2	16	1	▶1b◀[B▶1b◀   8:                                                                   ▶1b◀[B
2	17	1	▶1b◀[B▶1b◀   9:                                                                   ▶1b◀[B
2	18	1	▶1b◀[B▶1b◀   10:                                                                  ▶1b◀[B
2	19	1	▶1b◀[JAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH

:LABELS
Label lines :	19
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	10	9	1	24	C	0			name1	0
CHAR	 		0	-1
1	42	9	1	28	C	0			title1	0
CHAR	 		0	-1
2	10	10	1	24	C	0			name2	0
CHAR	 		0	-1
3	42	10	1	28	C	0			title2	0
CHAR	 		0	-1
4	10	11	1	24	C	0			name3	0
CHAR	 		0	-1
5	42	11	1	28	C	0			title3	0
CHAR	 		0	-1
6	10	12	1	24	C	0			name4	0
CHAR	 		0	-1
7	42	12	1	28	C	0			title4	0
CHAR	 		0	-1
8	10	13	1	24	C	0			name5	0
CHAR	 		0	-1
9	42	13	1	28	C	0			title5	0
CHAR	 		0	-1
10	10	14	1	24	C	0			name6	0
CHAR	 		0	-1
11	42	14	1	28	C	0			title6	0
CHAR	 		0	-1
12	10	15	1	24	C	0			name7	0
CHAR	 		0	-1
13	42	15	1	28	C	0			title7	0
CHAR	 		0	-1
14	10	16	1	24	C	0			name8	0
CHAR	 		0	-1
15	42	16	1	28	C	0			title8	0
CHAR	 		0	-1
16	10	17	1	24	C	0			name9	0
CHAR	 		0	-1
17	42	17	1	28	C	0			title9	0
CHAR	 		0	-1
18	10	18	1	24	C	0			name10	0
CHAR	 		0	-1
19	42	18	1	28	C	0			title10	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:	89
case "$(name1)" in
     '') ;;
     *)
         case "$(title1)" in
             '') echo cc: $(name1)▶8d◀ >> $(1);;
             *) echo "cc: $(name1) - $(title1)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name2)" in
     '') ;;
     *)
         case "$(title2)" in
             '') echo cc: $(name2)▶8d◀ >> $(1);;
             *) echo "cc: $(name2) - $(title2)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name3)" in
     '') ;;
     *)
         case "$(title3)" in
             '') echo cc: $(name3)▶8d◀ >> $(1);;
             *) echo "cc: $(name3) - $(title3)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name4)" in
     '') ;;
     *)
         case "$(title4)" in
             '') echo cc: $(name4)▶8d◀ >> $(1);;
             *) echo "cc: $(name4) - $(title4)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name5)" in
     '') ;;
     *)
         case "$(title5)" in
             '') echo cc: $(name5)▶8d◀ >> $(1);;
             *) echo "cc: $(name5) - $(title5)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name6)" in
     '') ;;
     *)
         case "$(title6)" in
             '') echo cc: $(name6)▶8d◀ >> $(1);;
             *) echo "cc: $(name6) - $(title6)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name7)" in
     '') ;;
     *)
         case "$(title7)" in
             '') echo cc: $(name7)▶8d◀ >> $(1);;
             *) echo "cc: $(name7) - $(title7)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name8)" in
     '') ;;
     *)
         case "$(title8)" in
             '') echo cc: $(name8)▶8d◀ >> $(1);;
             *) echo "cc: $(name8) - $(title8)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name9)" in
     '') ;;
     *)
         case "$(title9)" in
             '') echo cc: $(name9)▶8d◀ >> $(1);;
             *) echo "cc: $(name9) - $(title9)▶8d◀" >> $(1);;
         esac
         ;;
esac
case "$(name10)" in
     '') ;;
     *)
         case "$(title10)" in
             '') echo cc: $(name10)▶8d◀ >> $(1);;
             *) echo "cc: $(name10) - $(title10)▶8d◀" >> $(1);;
         esac
         ;;
esac

:END