DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦c0c88311b⟧ TextFile

    Length: 1024 (0x400)
    Types: TextFile
    Names: »COMPUTE.PC«

Derivation

└─⟦a6ed1cd35⟧ Bits:30002862 Perfect Calc 1.10 for JET80 CP/M
    └─ ⟦this⟧ »COMPUTE.PC«

TextFile

Øwg5
>b1:"JAN
>c1:"FEB
>c1:Ødc0
>d1:"MAR
>e1:"APR
>f1:"MAY
>g1:"JUN
>h1:"JUL
>i1:"AUG
>j1:"SEP
>k1:"OCT
>l1:"NOV
>m1:"DEC
>a1:Øjlr
>a2:0
>b2:1.000000000000E+00
>c2:2.000000000000E+00
>d2:3.000000000000E+00
>e2:4.000000000000E+00
>f2:5.000000000000E+00
>g2:6.000000000000E+00
>h2:7.000000000000E+00
>i2:8.000000000000E+00
>j2:9.000000000000E+00
>k2:1.000000000000E+01
>l2:1.100000000000E+01
>m2:1.200000000000E+01
>a2:Ødl0
>a3:0
>b3:3.100000000000E+01
>c3:5.900000000000E+01
>d3:9.000000000000E+01
>e3:1.200000000000E+02
>f3:1.510000000000E+02
>g3:1.810000000000E+02
>h3:2.120000000000E+02
>i3:2.430000000000E+02
>j3:2.730000000000E+02
>k3:3.040000000000E+02
>l3:3.340000000000E+02
>m3:3.650000000000E+02
>a3:Ødl0
>a5:" Month:
>c5:=mainÆd3Å@
>a6:" Day:
>c6:=mainÆd4Å@
>a7:=lookup(c5-1,a2:m2)+c6@
>a7:Ødl0
>a1
ØaMAIN.PC
«eof»