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

⟦edafbc267⟧ TextFile

    Length: 887 (0x377)
    Types: TextFile
    Notes: UNIX file
    Names: »confirm«

Derivation

└─⟦c93a30372⟧ Bits:30004169/disk3.imd Uniplex II+ V.6 release 1.0 (dansk)
└─⟦c93a30372⟧ UNIX Filesystem
    └─⟦this⟧ »up/new/usr/UAP/ufill/ubld/confirm« 

TextFile

#help
  GODKEND VALG

  Tryk <ESC> u for at udf▶9b◀re eller <ESC> a for at afbryde.
))


:II+ COMPILED

:TITLE
G O D K E N D   V A L G

:SCREEN 
screen lines :	0
12	9	1	Tryk <ESC> u for at udf▶9b◀re, <ESC> a for at afbryde

:LABELS
Label lines :	3
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	42	C	1		$(3)	message1	0
CHAR	 		0	-1
1	18	6	1	42	C	1		$(4)	message2	0
CHAR	 		0	-1
2	18	7	1	42	C	1		$(5)	message3	0
CHAR	 		0	-1
3	64	9	1	1	C	0			s	0
CHAR	 		0	-1

:MAPS
Map lines :	-1
i	type	label	compar	data	map to

:COMMANDS
Hold	pause	clear	reset:
0	0	1	0
Command:	9
case '$(1)' in
    "RESTRICTED")
        case "$Uuserid" in
            0)    ;;
            *)    exec echo Funktionen er kun tilg▶91◀ngelig for systemadministrator;;
        esac
        ;;
esac
exec $(2)
exit 0

:END