the solar system, galaxys and universe explained.

[Graham72]

In the beginning was Microbee, and it created a program and spiral galaxy formed and years and years and aeons passed.

10 HIRES2
20 C=256
25 D=127
30 FOR N=16 TO 1 STEP -1
35 K=0
50 FOR T0=0 TO 94.2 STEP .1
60 R0=T0*1.348
70 K=K+1
75 IF K<N THEN 90
77 K=0
80 SET INT(R0*COS(T0)*2)+C,INT(R0*SIN(T0))+D
90 NEXT T0
95 K=0
110 FOR T0=94.2 TO 0 STEP -.1
120 R0=T0*1.348
130 K=K+1
135 IF K<N THEN 150
137 K=0
140 SET INT(R0*COS(T0)*2)+C,INT(R0*SIN(T0))+D
150 NEXT T0
160 NEXT N
170 FOR N=16 TO 1 STEP -1
175 K=0
190 FOR T0=0 TO 94.2 STEP .1
200 R0=T0*1.348
210 K=K+1
215 IF K<N THEN 230
217 K=0
220 RESET INT(R0*COS(T0)*2)+C,INT(R0*SIN(T0))+D
230 NEXT T0
235 K=0
250 FOR T0=94.2 TO 0 STEP -.1
260 R0=T0*1.348
270 K=K+1
275 IF K<N THEN 290
277 K=0
280 RESET INT(R0*COS(T0)*2)+C,INT(R0*SIN(T0))+D
290 NEXT T0
300 NEXT N


It would appear that the universe is currently around the 220 mark.

Otherwise a neat screen saver

[ChickenMan]

Pasted into Vibedrone and after about 10 min I get

   

[Graham72]

Pasted into Vibedrone and after about 10 min I get

yep, years and years and aeons go by. I accidently closed my laptop lid, so have not finished the run myself yet.