DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC850

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

See our Wiki for more about RegneCentralen RC850

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦4043c3f72⟧ TextFile

    Length: 1152 (0x480)
    Types: TextFile
    Names: »SOEG.LOG«

Derivation

└─⟦70836188a⟧ Bits:30005899 Mikro-Logo ver. 01/01/84HP (RC855)
    └─⟦this⟧ »SOEG.LOG« 

TextFile

R▶0b◀til søg x y                                                                    &▶0b◀gentag 1000                                                                    &▶0e◀gafstx :=afstx                                                                 &▶0e◀gafsty :=afsty                                                                 &▶06◀frem 3 :=afsty                                                                 &
hvor a b cfsty                                                                 &▶0f◀afstx :=(x-a)^2                                                                &▶0f◀afsty :=(y-b)^2                                                                &$hvis (afstx>=gafstx)+(afsty>=gafsty)                                           &
venstre 30x>=gafstx)+(afsty>=gafsty)                                           &sluthvis30x>=gafstx)+(afsty>=gafsty)                                           &▶06◀hertilis30x>=gafstx)+(afsty>=gafsty)                                           &▶07◀sluttils30x>=gafstx)+(afsty>=gafsty)                                           &)                                           &▶07◀sluttils30x>=gafstx)+(afsty>=gafsty