Помогите пожалуйста портануть сей код из B3Dшного в велосипедный,а то я недогоняю.Че то до сих пор с велосипедным ООП не разобралсо,думаю будет проще догнать по анологии.
Graphics 640,480,16,2
SetBuffer BackBuffer()
Global gfx_image = LoadImage("media\player.png")
Type player
Field x#,y#
Field image
End Type
Function create_player(x#,y#)
p.player = New player
p\x# = x#
p\y# = y#
p\image = gfx_image
End Function
Function update_player()
For p.player = Each player
DrawImage p\image,p\x#,p\y#
Next
End Function
create_player(x#,y#)
Repeat
update_player()
Flip
Cls
Forever