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

⟦daa7deca6⟧ TextFile

    Length: 8753 (0x2231)
    Types: TextFile
    Notes: UNIX file
    Names: »index«

Derivation

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

TextFile

V.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T....H..
:TITLE
GENERERING AF INDEKS OG INDHOLDSFORT.
:SCREEN

DAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
B Opgave til resultatet   B  [OUTFILE_________________________________]   B@@
[                         [                                               [
B Indeks eller indhold    B  [GENERATE________________________________]   B@@
[                         [                                               [
B Indekslayout            B  [REFSTYLE________________________________]   B@@
[                         [                                               [
B Kun over indeksnavn(e)  B  [LABEL_______________]                       B@@
[                         [                                               [
B Indeksbredde            B  [WID] tegn                                   B@@
[                         [                                               [
B Indrykning i indeks     B  [IND] tegn                                   B@@
[                         [                                               [
B Venstre margen i indeks B  [OFF] tegn                                   B@@
[                         [                                               [
B Format for henvisninger B  [REFFORMAT_______________________________]   B@@
[                         [                                               [
JAAAAAAAAAAAAAAAAAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
    ANGIV PR▶92◀CIST HVORDAN OPGAVEN, DER SKAL INDEKSERES, BLEV UDSKREVET
DAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
B Opgavenavn              B [DOCNAMES____________________________________]B@@
[                         [                                               [
B Printer                 B [PRTR________________________________________]B@@
[                         [                                               [
B Udskriftslayout         B [STYLE_______________________________________]B@@
[                         [                                               [
JAAAAAAAAAAAAAAAAAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH@@
[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
                  <PIL-NED> for n▶91◀ste sk▶91◀rmbillede
:SCREEN

        Hvis specifikationerne i udskriftslayoutet blev ▶91◀ndret,
        da opgaven blev udskrevet, angives de samme ▶91◀ndringer her

        [OVERRIDE________________________________________________]

    DAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAF@@
    [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
    B                       B                                       B@@
    [                       [                                       [
    B   Papirst▶9b◀rrelse      B   [paper_________]                    B@@
    [                       [                                       [
    B                       B                                       B@@
    [                       [                                       [
    B   ▶9d◀verste kantmargen  B   [h1]                                B@@
    [                       [                                       [
    B   Nederste kantmargen B   [f1]                                B@@
    [                       [                                       [
    B   Venstre kantmargen  B   [l1]                                B@@
    [                       [                                       [
    B   H▶9b◀jre kantmargen    B   [r1]                                B@@
    [                       [                                       [
    B   Indvendig margen    B   [g1]                                B@@
    [                       [                                       [
    B                       B                                       B@@
    [                       [                                       [
    JAAAAAAAAAAAAAAAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH@@
    [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[
:LABELS
OUTFILE = type char, minimum = 1, default = "index_indh",
        chars = "E",
        prompt = "Angiv navn p▶86◀ en ny opgave til indekset/indholdsfortegnelsen";

GENERATE= type char, reply = "Indholdsfortegnelse!Indeks",
         prompt = "Tryk <MELLEMRUM> for at v▶91◀lge";

REFSTYLE = type char, reply =
        "H▶9b◀jrestillet med punktum!Venstrestillet",
         prompt = "Tryk <MELLEMRUM> for at v▶91◀lge";

LABEL    = type char,
prompt = "Indekserer kun elementer i opgaven med det/de angivne indeksnavn(e)";

REFFORMAT = type char, reply = "#!#K-#!#K.#!#K!Side #", prompt =
"Tryk <MELLEMRUM> for at v▶91◀lge (# = Sidenummer, #K = Kapitelnummer)";

WID     = type dec, default = 0, minimum = 0, maximum = 255, prompt =
"Angiv indeksbredde i antal tegn - 0 hvis aut. skalering til papirst▶9b◀rrelse";

IND     = type dec, default = 3, minimum = 1, maximum = 99,
        prompt = "Angiv indrykning for understikord i antal tegn";

OFF     = type dec, default = 3, minimum = 1, maximum = 99,
        prompt = "Angiv venstre margen for indeks/indholdsfort. i antal tegn";

DOCNAMES= type char, default = $(1), minimum = 1,
        chars = "E",
        prompt = "Angiv navn p▶86◀ opgaven/opgaverne, der skal udskrives";

PRTR = type char, default = $(3), reply = "*uprtcmd -p $Uidcode", prompt =
        "Tryk <MELLEMRUM> for at v▶91◀lge printer";

STYLE= type char, default = $(2), reply = "*uprtcmd -s $Uidcode", prompt =
        "Tryk <MELLEMRUM> for at v▶91◀lge udskriftslayout";

OVERRIDE= type char, reply = "Erstat IKKE udskriftslayout!Erstat det valgte udskriftslayout",
        prompt = "Tryk <MELLEMRUM> for at v▶91◀lge";

paper      = type char, reply  = "A4!A5!A4-tv▶91◀rformat!A3!Kalender!8x11!8x14!5x8",
           prompt = "Tryk <MELLEMRUM> for at v▶91◀lge";

h1         = type dec,  default = 0, minimum = 0,
           prompt = "Angiv antal linier for ▶9b◀verste kantmargen";

f1         = type dec,  default = 0, minimum = 0,
           prompt = "Angiv antal linier for nederste kantmargen";

l1         = type dec,  default = 0, minimum = 0,
           prompt = "Angiv antal tegn for venstre kantmargen";

r1         = type dec,  default = 0, minimum = 0,
           prompt = "Angiv antal tegn for h▶9b◀jre kantmargen";

g1         = type dec,  default = 0, minimum = 0,
prompt = "Angiv antal tegn for indvendig margen (skiftevis venstre og h▶9b◀jre)";
:MAPS
map $(GENERATE) = "Indholdsfortegnelse" "-It"
map $(GENERATE) = "Indeks" "-Ii"
map $(REFSTYLE) = "H▶9b◀jrestillet med punktum" ""
map $(REFSTYLE) = "Venstrestillet" "-W"

map $(OVERRIDE) = "Erstat IKKE udskriftslayout" "N"
map $(OVERRIDE) = "Erstat det valgte udskriftslayout" "Y"

:COMMANDS
eval set xx `uprtcmd -d "$(PRTR)"`
eval upflags=`uprtcmd -f "$(STYLE)"`
defflags="-p$2 $upflags"

flags="$(GENERATE) $(REFSTYLE) -w$(WID) -A$(IND) -M$(OFF)"
case "$(LABEL)" in
    ""|" ");;
    *) flags="$flags -N $(LABEL)";;
esac

case "$(OVERRIDE)" in
    "Y") flags="$flags -P $(paper) -mt $(h1) -mb $(f1) -ml $(l1) -mr $(r1)";;
esac

DT=`udate "+%d %h 19%y"`
exec uprop $defflags -s "$(REFFORMAT)" $flags "-D$DT" $(DOCNAMES) > $(OUTFILE)

:HELP
  GENERERING AF INDEKS OG INDHOLDSFORT.

  Udfyldelse af formularen:

  Opgave til resultatet         Angiv navn p▶86◀ en ny opgave til det generere-
                                de indeks/indholdsfortegnelse.

  Indeks eller indhold          Med <MELLEMRUM> v▶91◀lges, om der skal genere-
                                res indeks eller indholdsfortegnelse.

  Indekslayout                  Angiv hvordan henvisningerne skal st▶86◀. Venð
                                strestillet eller h▶9b◀jrestillet med punktumð
                                mer ud til henvisningerne.

  Kun over indeksnavn(e)        Hvis opgaven indeholder flere indeksnavne,
                                kan det indeksnavn, der skal bruges,
                                angives.
.FS
  Indeksbredde                  Angiv indeksbredde i antal tegn - 0 hvis
                                aut. skalering til papirbredde.

  Indrykning i indeks           Angiv antal tegn for indrykning af under-
                                stikord.

  Venstre margen i indeks       Angiv venstre margen for indeks/indholdsforð
                                tegnelse i antal tegn.

  Format for henvisninger       Tryk <MELLEMRUM> for at v▶91◀lge det ▶9b◀nskede
                                format.