The 3D stars are again embedded in this blog post and source code with old mojo is simplified.
The code is written in Monkey X Pro, which is nowadays available on itch.io.
Here’s the code:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 |
Import mojo Function Main:Int() New MyApp Return 0 End Class MyApp Extends App Const STARS:Int = 200 Field devWidth:Float, devHeight:Float, scaleX:Float, scaleY:Float Field x:Float[STARS],y:Float[STARS],z:Float[STARS] Method OnCreate() scaleX = DeviceWidth() / 640 scaleY = DeviceHeight() / 480 For Local i:Int = 0 To STARS - 1 x[i] = Rnd(-50,50) y[i] = Rnd(-50,50) z[i] = Rnd(50,200) Next SetUpdateRate(60) End Method OnUpdate() End Method OnRender() Local shade:Float PushMatrix() Scale(scaleX,scaleY) Cls For Local i:Int = 0 To STARS - 1 z[i] = z[i] - 1 If z[i] < 10 Then z[i] = Rnd(50,200) shade = 255 - (z[i] / 200) * 255 SetColor shade,shade,shade ' Projection from 3D space to 2D screen DrawOval(x[i] / z[i] * 200 + 320,y[i] / z[i] * 200 + 240,2,2) Next PopMatrix() End End Class |
Do use my code as you wish.