|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC850 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC850 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 5376 (0x1500) Types: TextFile Names: »RACE.LOG«
└─⟦70836188a⟧ Bits:30005899 Mikro-Logo ver. 01/01/84HP (RC855) └─⟦this⟧ »RACE.LOG«
@Rtil ccircle r &▶04◀løftccircle r &▶06◀frem rircle r &▶05◀hø 90rircle r &▶04◀tegn0rircle r & gentag 36le r &▶05◀rcp rg 36le r &▶06◀hertil 36le r & venstre 90e r &▶04◀løfttre 90e r & tilbage r0e r &▶07◀sluttil r0e r & til rcp r0e r &▶07◀højre 5 r0e r &▶0e◀frem r*22/7/18 &▶07◀højre 522/7/18 &▶07◀sluttil22/7/18 &til drawtrack8 &▶0e◀ccircle clille &ccircle cstore & venstre 90tore &frem clille-2e &▶04◀tegn clille-2e &▶11◀frem cstor-clille &▶04◀løft cstor-clille &▶07◀sluttiltor-clille &▶10◀til racecar timee & hvor x y zr timee &8hvis (x^2+y^2 > cstor^2)+(x^2+y^2 < clille^2)+(time>250) &▶06◀viskudx^2+y^2 > cstor^2)+(x^2+y^2 < clille^2)+(time>250) &▶04◀stopudx^2+y^2 > cstor^2)+(x^2+y^2 < clille^2)+(time>250) &sluthvis2+y^2 > cstor^2)+(x^2+y^2 < clille^2)+(time>250) &!hvis (x>=0)*(y>=clille)*(time>50) < clille^2)+(time>250) &▶16◀sætning Tiden udløbet!)*(time>50) < clille^2)+(time>250) &▶04◀stoping Tiden udløbet!)*(time>50) < clille^2)+(time>250) &sluthvisTiden udløbet!)*(time>50) < clille^2)+(time>250) &▶04◀kom hvisTiden udløbet!)*(time>50) < clille^2)+(time>250) &▶0e◀racecar time+1udløbet!)*(time>50) < clille^2)+(time>250) &▶07◀sluttil time+1udløbet!)*(time>50) < clille^2)+(time>250) &▶07◀til kom time+1udløbet!)*(time>50) < clille^2)+(time>250) &▶10◀læstast kommandoløbet!)*(time>50) < clille^2)+(time>250) &+venstre 30*(kommando=118)-30*(kommando=104)2)+(time>250) &&frem 5*(kommando=102)-5*(kommando=116)=104)2)+(time>250) &▶13◀hvis kommando = 1152)-5*(kommando=116)=104)2)+(time>250) &▶04◀stop kommando = 1152)-5*(kommando=116)=104)2)+(time>250) &sluthvismando = 1152)-5*(kommando=116)=104)2)+(time>250) &▶07◀sluttilsmando = 1152)-5*(kommando=116)=104)2)+(time>250) &\f til setstarto = 1152)-5*(kommando=116)=104)2)+(time>250) &▶10◀sætxy 0 clille+21152)-5*(kommando=116)=104)2)+(time>250) & drejtil 0lille+21152)-5*(kommando=116)=104)2)+(time>250) &▶04◀tegntil 0lille+21152)-5*(kommando=116)=104)2)+(time>250) &▶04◀fr 2til 0lille+21152)-5*(kommando=116)=104)2)+(time>250) &▶07◀sluttil 0lille+21152)-5*(kommando=116)=104)2)+(time>250) &til race0lille+21152)-5*(kommando=116)=104)2)+(time>250) &▶0b◀konstanter lle+21152)-5*(kommando=116)=104)2)+(time>250) & drawtrack lle+21152)-5*(kommando=116)=104)2)+(time>250) & setstart lle+21152)-5*(kommando=116)=104)2)+(time>250) &▶04◀tegntart lle+21152)-5*(kommando=116)=104)2)+(time>250) & racecar 0 lle+21152)-5*(kommando=116)=104)2)+(time>250) &▶07◀sluttil 0 lle+21152)-5*(kommando=116)=104)2)+(time>250) &▶0e◀til konstanter+21152)-5*(kommando=116)=104)2)+(time>250) &\f clille := 84er+21152)-5*(kommando=116)=104)2)+(time>250) &\f cstor := 108er+21152)-5*(kommando=116)=104)2)+(time>250) &▶07◀sluttil= 108er+21152)-5*(kommando=116)=104)2)+(time>250) &16)=104)2)+(time>250) &▶07◀sluttil= 108er+21152)-5*(kommando=116)=104)2)+(time>250)