DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

Index: ┃ T ┃

⟦706cbd63f⟧ TextFile

    Length: 516 (0x204)
    Types: TextFile
    Names: »TRY1«

Derivation

└─⟦a7d1ea751⟧ Bits:30000550 8mm tape, Rational 1000, !users!projects 94_04_11
    └─ ⟦129cab021⟧ »DATA« 
        └─⟦this⟧

TextFile

pour spirale prendre {
    avec fenetre:ecran pas:N angle:theta.
    pour MaTortue prendre tortue dupliqueToi.
    MaTortue TaFenetre:ecran.
    MaTortue LeveTaPlume.
    MaTortue VaEnX:250 Y:250.
    MaTortue BaisseTaPlume.
    1 a:N repeter: {
        avec L.
        MaTortue Avance:L.
        MaTortue AGauche:theta
    }
}.

spirale fenetre:Fenetre pas:100 angle:45.

pour UneAutre prendre Fenetre DupliqueToi.
UneAutre TonNom:"salut" TonX:610.
UneAutre AfficheToi.

spirale fenetre:UneAutre pas:100 angle:50.