Wierd problem with collision detection

;Create the playing field
Global player1.player1 = New player1
player1\x = 400
player1\y = 500
player1\hitpoints = 5
player1\image2 = LoadImage("player1.bmp")
Global alien.alien = New alien
alien\x = 400
alien\y = 200
alien\xv = Rand(-5,5)
alien\yv = Rand(-5,5)
alien\image = LoadImage("enemy.bmp")
Global Laser.Laser = New Laser
Laser\x = player1\x
Laser\y = player1\y
Laser\image = LoadImage("laser.bmp")

I did create, when i run the debugger it says nothings wrong so i can't find a problem wrong with it.