DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC759 "Piccoline"

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

See our Wiki for more about RegneCentralen RC759 "Piccoline"

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦908017683⟧ TextFile

    Length: 440 (0x1b8)
    Types: TextFile
    Names: »KRYSTAL3.MOD«

Derivation

└─⟦37cf4f704⟧ Bits:30003051 Dymos II - Modeller
    └─⟦this⟧ »MODEL3\KRYSTAL3.MOD«

TextFile

// Model : Krystal3

If n=1 then
  x:= x + random - .5- x/1000
  y:= y + random - .5 -y/1000
  yg:= 200
  If abs(x)>n0 then x:=st▶9b◀d(x)
  If abs(y)>n0 then y:=st▶9b◀d(y)
  n :=lim(round(x),round(y))
else
  yg:= y
  If n=3 then stop
  n := 1
endif

// Modellen kr▶91◀ver, at 2.graffarve er 
// sort og at graferne tegnes med 
// prikker. Brug funktionstasten F5.
// NB. K▶9b◀rslen tager flere timer.