Ayuda, Leer .txt (TileMap)

[sebah97]

Hola, yo tengo un Txt asi miren;

00000
00010
10000
00100
00000

Cada numerito representaria un tile

Bueno, el 0 Representaria que el Personaje puede caminar, y el 1 significa que esta bloqueado, osea que no puede caminar.

Bien, ahora, el problema, soy bastante principiante en esto, y tengo entendido que se podria hacer con una matriz bidimencional, pero nose ni por donde empezar ;S

lo que querria hacer es leer el .txt y si dice 1, el personaje no puede avanzar.

El personaje ya lo programe, lo que quisiera es que lea linea x linea y si dice 1 que el personaje no pueda avanzar, lo que nose como seria para bloquear.

Desde ya muchas Gracias

[MCKSys Argentina]

Hola!

Fíjate el siguiente código: http://www.megaupload.com/?d=RM6BEVQ2

Lo hice hace tiempo, pero creo que puede darte algunas ideas...

Saludos!

[sebah97]

Gracias !, ahi lo miro y te cuento como me fue

[MCKSys Argentina]

Fíjate que los "mapas" están en binario, pero puede adaptarse para hacerlos en ASCII...

Espero te sea útil...

Saludos!

[sebah97]

Bien, ya he conseguido dibujar los tiles:

Codigo:

Código (vb) [Seleccionar] Expandir

Sub DibujarMapa(Pic As Control, TT As Single)

CantidadX = 10
CantidadY = 10

TT = 32

Dim i As Integer, Ancho As Single, Alto As Single
   
   Ancho = CantidadX
   Alto = CantidadY
   
   For i = 0 To Ancho
       Pic.Line (i * TT, 0)-(i * TT, Alto * TT)
   Next i
   
   For i = 0 To Alto
       Pic.Line (0, i * TT)-(Ancho * TT, i * TT)
   Next i




End Sub

Y Dibuja la Cantidad de tiles de alto (CantidadX) y Cantidad de Tiles de Ancho (CantidadY) y de 32 pixeles cada tile.

Bien, hasta ahi todo bien.

pero tengo 2 dudas.

-Como puedo Marcar cuantos Tiles ocupa el personaje? (quisiera que ocupe solo 1)
-Como puedo Saber en que tile esta el Personaje?

EJEMPLO:

Código (vb) [Seleccionar] Expandir

If Personaje.TileActualX = 10
With Personaje
.Muerto = True
End With
End If
Algo asi kisiera yo


Osea Seria nombrar a los CantidadX del 1 al 10 (Obviamente si en CantidadX pongo 32, quisiera nombrarlos del 1 al 32

Y con los CantidadY seria lo mismo


Espero que me puedan Ayudar

[sebah97]

Nadie me puede ayudar?