DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

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

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦9e606b751⟧ TextFile

    Length: 533 (0x215)
    Types: TextFile
    Notes: R1k Text-file segment

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦f423021de⟧ 
            └─⟦this⟧

TextFile

pour etoile prendre {
    avec arete:longueur.
    Tortue aDroite:90.
    8 fois: {
            Tortue aGauche:135.
            Tortue avance:longueur.
            Tortue aDroite:90.
            Tortue avance:longueur.
    }.
}.      
pour europe prendre {
     avec X:x Y:y.
     Tortue RentreChezToi.
     Tortue vaEnX:x Y:y.
     1 a: 12 repeter:{
        avec laValeur.
        Tortue leveTaPlume.
        Tortue avance:40.
        Tortue baisseTaPlume.
        etoile arete: 10.
        Tortue tonAngle: laValeur * 30.
     }.
}