im trying to get it to work but with no success
group 1 and group 2 collides as if i didnot called the command.
any small code to show ?
anyone ?
global dim a[10,2] as integer
for i = 1 to 10
for j = 1 to 2
a[i,j] = CreateSprite(0)
if j =1
SetSpriteGroup(a[i,j],1)
SetSpriteColor(a[i,j],255,0,0,255)
else
SetSpriteGroup(a[i,j],2)
SetSpriteColor(a[i,j],0,255,0,255)
endif
SetSpritePhysicsOn(a[i,j],2)
next j
next i
rem A Wizard Did It!
do
Print("hello world")
Sync()
loop
not working....
also not working
for i = 1 to 10
for j = 1 to 2
a[i,j] = CreateSprite(0)
if j =1
SetSpriteCategoryBit( a[i,j], 1, 1 )
SetSpriteCollideBit(a[i,j],1,1)
SetSpriteColor(a[i,j],255,0,0,255)
else
SetSpriteCategoryBit( a[i,j], 2, 1 )
SetSpriteCollideBit(a[i,j],2,1)
SetSpriteColor(a[i,j],0,255,0,255)
endif
SetSpritePhysicsOn(a[i,j],2)
next j
next i
is there something im missing here? i dont get it
thank you for your time.
nadav.