I have a project.A shape game

There are shapes and yours should be controlled by arrow keys.. you should crash with another to gain point. once you collide to a another shape, it should adopt the shape and the color.

The problem is when i se,t for example, shape1 top and left and shape 2 top and left equally.. its having a time to disappear

I want to disappear another shape atleast near to yours, but not exactly equally in their left and top property..Thanks

Image and my code are attached below...

6 Years
Discussion Span
Last Post by rodge125blazer

Had a look at your code and think ive found a solution but ive coded it in a separate project with Pseudo Code to explain whats happening. PM me for feedback.

Dim UserShapeX As Integer 'shape1 x control
Dim UserShapeY As Integer 'shape1 Y control

UserShapeX = Shape1.Left + Shape1.Width
UserShapeY = Shape1.Top + Shape1.Height

If Shape2.Left <= UserShapeX Then
    'shape1 turns into shape2
End If

If Shape2.Top <= UserShapeY Then
    'shape1 turns into shape2
End If
This topic has been dead for over six months. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.