[Edmundosik]

Возможно ли сделать игру похожую на Сокровище монтесумы? Если возможно то как.

Смог сделать только игровую зону

Type block
    Field img
End Type

Graphics 800,600,32,2
SetBuffer BackBuffer()

Global rcube

DrawCubes()

While Not (KeyHit(1))
    Flip
Wend
End

Function DrawCubes()
    For i = 1 To 9
        SeedRnd MilliSecs()
        For a = 1 To 9
                rcube = Rand(1,3)
            If rcube = 1 Then
                b.block = New block
                b\img = LoadImage("data\gfx\cube_1.jpg")
            EndIf
            If rcube = 2 Then
                b.block = New block
                b\img = LoadImage("data\gfx\cube_2.jpg")
            EndIf
            If rcube = 3 Then
                b.block = New block
                b\img = LoadImage("data\gfx\cube_3.jpg")
            EndIf
            DrawBlock b\img,a*60,i*60
        Next
    Next
End Function 


P.S Я только начинающий в Blitz