Creare un "muro" (VB2010)

[eziogsv]

Mah, nel caso ad esempio del Top non basterebbe un:

If GetKeyState(87) < 0 OrElse GetKeyState(38) < 0 Then
   If PBPlayer1.Top > Muro.Bottom then
      PBPlayer1.Top -= 3 'eventualmente affinando a 2 o 1 se con un 3 va "sotto"
   End If
ElseIf GetKeyState(65) < 0..............

[Ribis]

Mah, nel caso ad esempio del Top non basterebbe un:

If GetKeyState(87) < 0 OrElse GetKeyState(38) < 0 Then
   If PBPlayer1.Top > Muro.Bottom then
      PBPlayer1.Top -= 3 'eventualmente affinando a 2 o 1 se con un 3 va "sotto"
   End If
ElseIf GetKeyState(65) < 0..............

Ho provato questo metodo ma essendo un quadrato il "muro", il player non può girarci intorno.
Altri suggerimenti?

[eziogsv]

Non è chiaro per quale motivo il player "NON PUO' " girarci intorno. Puoi spiegare meglio cosa è questo muro, dimensioni e dove è posizionato?

[Ribis]

Non è chiaro per quale motivo il player "NON PUO' " girarci intorno. Puoi spiegare meglio cosa è questo muro, dimensioni e dove è posizionato?

In questa immagine puoi vedere un pezzo. Lo sprite deve fare per esempio questo tragitto senza attraversare i muri.BPhtml.jpg

[eziogsv]

SOSTITUISCE IL MESSAGGIO SOPRA

Capito. Prova con Control.GetChildAtPoint

https://msdn.microsoft.com/en-us/lib...v=vs.100).aspx

Se devi salire controlla che controllo c' è qualche pixel sopra ai due vertici superiori della PictureBox e così via per gli altri lati. Se il controllo è un muro non ti muovi in quella direzione.

Questo sistema dovrebbe funzionare anche con 300 muri messi "random".

Se i muri sono invece pochi e messi lineari come in immagine potresti cavartela con un "Select Case PBPlayer.Left" per andare su e giù e "Select Case PBPlayer.Top" per andare a destra e sinistra.

Ad esempio nella immagine puoi salire e scendere solo se Left=0 o Left=Muro1.Right+1 o Left= Muro2.Right +1

Ciao!