|
|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1248 (0x4e0)
Types: TextFile
Notes: Mikados_K
Names: »BUDDIST.K«
└─⟦e5337a0bc⟧ Bits:30008987 DDE SPC/1 COMAL programmer: BUD, GR85, LØN
└─⟦this⟧ »BUDDIST.K«
DISTRIKTSTOTALER - UDSKRIFT. Programmet udskriver en liste over samtlige distrikter, hvoraf det fremgår hvormange villaer og lejligheder, der er registreret for det pågældende distrikt. Desuden ud- skrives antallet af aviser i distriktet, nemlig summen af antallene for villaer og lejligheder. Udskriften afslutter med en oplysning om det samlede an- tal villaer og lejligheder for alle distrikter. De anvendte distriktsnumre tages fra rutekartoteket, se RUTEKARTOTEKS-VEDLIGEHOLDELSE. Programmet kan højst behandle 800 forskellige distrikter. Overskrides dette tal, vil der på udskriften efter total- erne være angivet, hvormange villaer og lejligheder der ikke er blevet fordelt på distrikter. F.eks. således: Ikke fordelt 1012 4711 Når programmet er færdigt, vender systemet automatisk tilbage til PROGRAMVALG.
0x000…01e Line {l1=0x1c, l2=»DISTRIKTSTOTALER - UDSKRIFT.«, l3=0x1c}
0x01e…021 Line {l1=0x01, l2=» «, l3=0x01}
0x021…05a Line {l1=0x37, l2=»Programmet udskriver en liste over samtlige distrikter,«, l3=0x37}
0x05a…094 Line {l1=0x38, l2=»hvoraf det fremgår hvormange villaer og lejligheder, der«, l3=0x38}
0x094…0cd Line {l1=0x37, l2=»er registreret for det pågældende distrikt. Desuden ud-«, l3=0x37}
0x0cd…108 Line {l1=0x39, l2=»skrives antallet af aviser i distriktet, nemlig summen af«, l3=0x39}
0x108…12f Line {l1=0x25, l2=»antallene for villaer og lejligheder.«, l3=0x25}
0x12f…169 Line {l1=0x38, l2=»Udskriften afslutter med en oplysning om det samlede an-«, l3=0x38}
0x169…19a Line {l1=0x2f, l2=»tal villaer og lejligheder for alle distrikter.«, l3=0x2f}
0x19a…1d3 Line {l1=0x37, l2=»De anvendte distriktsnumre tages fra rutekartoteket, se«, l3=0x37}
0x1d3…1f3 Line {l1=0x1e, l2=»RUTEKARTOTEKS-VEDLIGEHOLDELSE.«, l3=0x1e}
0x1f3…22e Line {l1=0x39, l2=»Programmet kan højst behandle 800 forskellige distrikter.«, l3=0x39}
0x22e…269 Line {l1=0x39, l2=»Overskrides dette tal, vil der på udskriften efter total-«, l3=0x39}
0x269…2a2 Line {l1=0x37, l2=»erne være angivet, hvormange villaer og lejligheder der«, l3=0x37}
0x2a2…2c9 Line {l1=0x25, l2=»ikke er blevet fordelt på distrikter.«, l3=0x25}
0x2c9…2da Line {l1=0x0f, l2=»F.eks. således:«, l3=0x0f}
0x2da…2dd Line {l1=0x01, l2=» «, l3=0x01}
0x2dd…312 Line {l1=0x33, l2=» Ikke fordelt 1012 4711«, l3=0x33}
0x312…315 Line {l1=0x01, l2=» «, l3=0x01}
0x315…34c Line {l1=0x35, l2=»Når programmet er færdigt, vender systemet automatisk«, l3=0x35}
0x34c…366 Line {l1=0x18, l2=»tilbage til PROGRAMVALG.«, l3=0x18}
0x366…380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x380…3a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0xa…]