Function CheckPick() If MouseHit(1)= True Ent = CameraPick(MainCam,MouseX(),MouseY()) For t.tile = Each tile If T\Entity = ent If T\Clickable = True If T\Visible = True ; Show or Hide Tile Face If Clicked T\Visible = False Else T\Visible = True End If If T\Clicked = False ; Has the Tile Been Clicked Activated T\Clicked = True PickedItem1 = T\Picture ; Get the tile type number Else T\Clicked = False RotateEntity T\Entity,0,T\RotatedAngle-T\RotatedAngle,0 ; turn tile back straight PickedItem2 = T\Picture ; Get the tile type number End If ; how do i Check the Tiles against each other and delet them both if T\Clicked i true ; on both and they are both the same..??? End If End If Next End If End Function

For tb.tile = each tile
    If tb<>t   ; make sure you're not comparing the same tile against itself
        If tb\cardvalue = t\cardvalue
            Playflashyanimation..
            FreeEntity tb\entity
            FreeEntity t\entity
            Delete tb
            Delete t
            Exit  ; exit the loop, don't check any more tiles
        End If
    End If
Next
If t = Null Then Exit   ; exit the main loop if we've deleted t

------------------
Total FONT - Create awesome Bitmap Fonts!
Particle Mania - Cool particle effects, flares, and stuff!

im creating my tiles using a for ... next using t.tile = new tile.. so they have a identifier of t... how come you using tb and check against t.. sorry if im soundin dumb been out the game for a while...
here ma code

Function CheckPick() If MouseHit(1) = True Ent = CameraPick(MainCam,MouseX(),MouseY()) For t.tile = Each tile If T\Entity = Ent If T\Clickable = True If T\Visible = True ; Show or Hide Tile Face If Clicked T\Visible = False Else T\Visible = True End If If T\Clicked = False ; Has the Tile Been Clicked Activated T\Clicked = True PickedItem1 = T\Picture ; Get the tile type number Else T\Clicked = False RotateEntity T\Entity,0,T\RotatedAngle-T\RotatedAngle,0 ; turn tile back straight PickedItem2 = T\Picture ; Get the tile type number End If End If If tb <> t ; make sure you're not comparing the same tile against itself If t\Picture = t\Picture FreeEntity t\entity FreeEntity t\entity Delete t Delete t Exit ; exit the loop, don't check any more tiles End If End If End If Next End If End Function

prob my last post on BC ;( have most of the Accounts or any been transferd to CW.? hows it going so far.

------------------
Windows XP Pro x64 RTM | Neo 2 Platinum / 1.8 Mod Bios
A64 3200+ Winnie 0507 @ 2.5 Ghz / 1.475
2x256Mb PC3200 Kingston HyperX BH-5 @ PC4000 / 2-5-2-2.0 1T @ 3.3v
ATI Radeon 9800 Pro AIW | 2 x Samsung SP1213C SATA in RAID 0
NEC ND2500A 8x DVDRW | BENQ 16x DVD Reader
TAGAN 480 WATT +12v @ 28A +3.3v @ 28A +5v @ 48A