Kezman

i have just tried doing that
but i have only succeed in one part of it....
and not the other part....

im trying to do a game
which involve to object shooting each other
one will shoot upwards
while another will shoot downwards....

for the one shooting upward im able to get it
but not the one shooting downwards

so i hope u guys can assist me

<<<my source code for shooting up>>>
Private Sub tmrHit_Timer()
If imgEnemy.Top - imgbullet(0).Top <= 480 And imgEnemy.Top - imgbullet(0).Top >= 0 Then
If imgEnemy.Left - imgbullet(0).Left <= 240 And imgEnemy.Left - imgbullet(0).Left >= -240 Then
Enemylife.Value = Enemylife.Value - 10
imgbullet(0).Visible = False
If Enemylife.Value = 0 Then
imgEnemy.Visible = False
End If
End If
End If


can someone help me figure out the shooting down part ?
if u need other information
pls tell me

Ad1

I have made a similair game before
my code was something like this
<pre>if imgBullet.top>imgEnemy.top and imgbullet.top < imgenemy.top + imgenemy.height then
if imgbullet.left > imgenemy.left and imgbullet.left < imgenemy.left + imgenemy.width then

'''enemy dead
endif
endif

Kezman

the code does works
but it isnt really wat im looking for

the enemylife.value is actually a progress which i wanted to show wat's the current health of the unit
each hit it will decrement 10 points
the total is 100....

after combining both ur code and mine....
the decrement value was increase

Ad1

<pre>dim intenemylife as integer
intenemylife=100

if imgBullet.top > imgEnemy.top and imgbullet.top < imgenemy.top + imgenemy.height then
if imgbullet.left > imgenemy.left and imgbullet.left < imgenemy.left + imgenemy.width then
intenemylife = intenemylife - 10
text1.text = intenemylife
if intenemylife = 0 then
subEnemyExplode
endif
endif
endif</pre>
this should work for you

Kezman

oh yes....
it does works this time......
thank you!