DataMuseum.dk

Presents historical artifacts from the history of:

Bogika Butler

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

See our Wiki for more about Bogika Butler

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦31ceb9aef⟧ TextFile

    Length: 512 (0x200)
    Types: TextFile
    Names: »SIERP11.MYR«

Derivation

└─⟦0d02879d3⟧ Bits:30004605 COMPAS Pascal version 3.03
    └─ ⟦this⟧ »SIERP11.MYR«

TextFile

husk a(i,h) 
hvis i>0 så                                                           
  a i-1,h; setv -45; frem h;  
  b i-1,h; setv 0;   frem 2*h;  
  d i-1,h; setv 45;  frem  h;  
  a i-1,h;  
hertil slut 
 
husk b (i,h)  
hvis i>0 så                                                           
  b i-1,h; setv 225; frem h;  
  c i-1,h; setv -90; frem 2*h;  
  a i-1,h; setv -45; frem h;  
  b i-1,h;  
hertil slut 
 
 
 
 
 
 
 
«eof»