Discussion Forum for all things Microbee
the solar system, galaxys and universe explained. - Printable Version

+- Discussion Forum for all things Microbee (https://microbeetechnology.com.au/forum)
+-- Forum: Microbee Forum (https://microbeetechnology.com.au/forum/forum-1.html)
+--- Forum: Microbee Software and Documentation (https://microbeetechnology.com.au/forum/forum-7.html)
+--- Thread: the solar system, galaxys and universe explained. (/thread-1069.html)



the solar system, galaxys and universe explained. - Graham72 - 20-08-2026

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 Big Grin


RE: the solar system, galaxys and universe explained. - ChickenMan - 21-08-2026

Pasted into Vibedrone and after about 10 min I get

   


RE: the solar system, galaxys and universe explained. - Graham72 - 21-08-2026

(21-08-2026, 09:05 AM)ChickenMan Wrote: 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.


RE: the solar system, galaxys and universe explained. - zbfairlane - 17-09-2026

I ran it and watched with the same fascination I have with watching 3D prints forming. I went away and came back a few hours later and sadly the code had finished, cleared the screen and all I got to see was

>

So I got to try again but this time watch it for much longer...

You have however inspired another procrastination project for me, which I will share if I ever get it working.


RE: the solar system, galaxys and universe explained. - Graham72 - 17-09-2026

(17-09-2026, 10:40 PM)zbfairlane Wrote: I ran it and watched with the same fascination I have with watching 3D prints forming. I went away and came back a few hours later and sadly the code had finished, cleared the screen and all I got to see was

>

So I got to try again but this time watch it for much longer...

You have however inspired another procrastination project for me, which I will share if I ever get it working.

awesome. I have got bogged down in extents and DPB's converting from win11 OS folders into .dsk format so I have diverted into sound cf: https://bumbershootsoft.wordpress.com/2026/09/05/zx-spectrum-experimenting-with-1-bit-sound/ and am experimenting with three versions of Fur Elise. The mighty 'bee lives!