What does this line mean? Here s some code:
Strict
Const GWIDTH=800
Const GHEIGHT=600
Type starfield Extends Spiel
Field x
Field y
Method Create:StarField(x:Int=0, y:Int=0)
If x=0 Then x=rnd(0,GWIDTH)
If y=0 Then y=rnd(0,GHEIGHT)
End method
Method Draw()
End Method
End Type
Type Screen
Field w=800
Field h=600
Method Create:screen(width=800,height=600)
If width<>w Then width=w
If height<>h Then height=h
Graphics width,height,0,60
End Method
End Type
Type Spiel
Field Bild:Screen=New Screen
Field Bg:Starfield=New Starfield
Method Init()
Bild.Create()
End Method
Method Render()
Cls
Bg.Draw()
FlushMem()
Flip()
End method
End type
Local Game:Spiel=New Spiel '<----- BUG? IAMSTUPID? IAMANEWB?
Print "Initialisiert"
Game.Init()
While Not KeyDown(KEY_ESCAPE)
Game.Render()
Wend
Strict
Const GWIDTH=800
Const GHEIGHT=600
Type starfield Extends Spiel
Field x
Field y
Method Create:StarField(x:Int=0, y:Int=0)
If x=0 Then x=rnd(0,GWIDTH)
If y=0 Then y=rnd(0,GHEIGHT)
End method
Method Draw()
End Method
End Type
Type Screen
Field w=800
Field h=600
Method Create:screen(width=800,height=600)
If width<>w Then width=w
If height<>h Then height=h
Graphics width,height,0,60
End Method
End Type
Type Spiel
Field Bild:Screen=New Screen
Field Bg:Starfield=New Starfield
Method Init()
Bild.Create()
End Method
Method Render()
Cls
Bg.Draw()
FlushMem()
Flip()
End method
End type
Local Game:Spiel=New Spiel '<----- BUG? IAMSTUPID? IAMANEWB?
Print "Initialisiert"
Game.Init()
While Not KeyDown(KEY_ESCAPE)
Game.Render()
Wend