[VB6] problemi di rimbalzi

[jkkl]

Salve
sto progettando un gioco per puro hobby.

ho un po di problemi in quanto il codice non mi convince molto (forse troppo lungo).

Inoltre ho un problema: voglio fare in modo che quando il giocatore tocchi la pallina questa "rimbalzi". Il rimbalzo è facile da fare pero la verifica di quando tocca il giocatore no..

qualcuno puo consigliarmi un modo?

ps: infine volevo sapere se c'era un modo per effettuare delle azioni con la tastiera tipo con le frecce direzionali.

 

[Predator]

alla fine del timer aggiungi questo

    'collisione con la barra
    If (ball.Top >= ll.Top - ball.Height) And (ball.Top <= ll.Top + 5) Then
        If ball.Left >= ll.Left Then
            If ball.Left <= ll.Left + ll.Width Then
                MsgBox "collisione"
            End If
        End If
    End If

per il resto è fin troppo facile arrangiati.

una piccola osservazione: la pallina dovrebbe rimbalzare in modo sensato e non con una ngolo predefinito di 45° ogni volta
ciauz

Predator

 

[jkkl]

alla fine del timer aggiungi questo

    'collisione con la barra
    If (ball.Top >= ll.Top - ball.Height) And (ball.Top <= ll.Top + 5) Then
        If ball.Left >= ll.Left Then
            If ball.Left <= ll.Left + ll.Width Then
                MsgBox "collisione"
            End If
        End If
    End If

per il resto è fin troppo facile arrangiati.

una piccola osservazione: la pallina dovrebbe rimbalzare in modo sensato e non con una ngolo predefinito di 45° ogni volta
ciauz

Predator

grazie pred!!!