This is a good example to learn coding. A 2d starfield. In the code you set up the stars on random locations on the screen. In the update section you loop through each star and move it a step to the left. When it is outside of the screen you place the star beack to the right side of the screen.
Code below :
Import mojo Global starx:Float[100] Global stary:Float[100] Global stars:Float[100] Class MyGame Extends App Method OnCreate() SetUpdateRate(60) For Local i:Int = 0 Until 100 starx[i] = Rnd(640) stary[i] = Rnd(480) stars[i] = Rnd(3)+1 End End Method OnUpdate() For Local i:Int = 0 Until 100 starx[i] -= stars[i] If starx[i] < 0 Then starx[i] = 640 End End Method OnRender() Cls(0,0,0) SetColor(255,255,255) For Local i:Int = 0 Until 100 DrawRect(starx[i],stary[i],1,1) End End End Function Main() New MyGame() End
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.