Muy bueno, ya está, gracias y felicitaciones nuevamente :) .
Saludos!.-
Saludos!.-
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menu
Public grhPiso As Long
Public grhPisos(0 to 2) As GFX_Rect
grhPiso = m_GFX.MAP_Load(App.Path & "\Graficos\215.bmp", 0)
Dim i As Integer
For i = 0 To 2
grhPisos(i).X = i * 64
grhPisos(i).Y = 0
grhPisos(i).Height = 64
grhPisos(i).Width = 64
Next
Call m_GFX.MAP_SetRegion(grhPiso, grhPisos(13))
Call m_GFX.DRAW_Map(grhPiso, 0, 0, 0, 0, 0)