Pivot/model open/close door?

Blitz3D Forums/Blitz3D Programming/Pivot/model open/close door?

Ok, I've ran into a problem with the select, as of right now I was just toying around and just trying to get select working and I can't get the entityalpha to work with the select I'm using now.. Take a look please and could you tell me what I'm doing wrong?

Global which_one=0
Global hatchclosed
Global hatchopen

which_one=0
hatchclosed=LoadMesh("hatch.b3d")
PositionEntity hatchclosed,0,15,-.9
ScaleEntity hatchclosed,.25,.25,.25
EntityType hatchclosed,LEVEL_COL

hatchopen=LoadMesh("hatch.b3d")
PositionEntity hatchopen,-1.8,15,-1.8
RotateEntity hatchopen,90,0,90
ScaleEntity hatchopen,.25,.25,.25
EntityType hatchopen,LEVEL_COL

EntityAlpha hatchclosed,1
EntityAlpha hatchopen,0

While Not KeyHit(1) 

If KeyHit(35) Then
	which_one=which_one+1
	Select (which_one Mod 2)
		Case 0
			EntityAlpha hatchclosed,1
			EntityAlpha hatchopen,0
		Case 1
			EntityAlpha hatchopen,1
			EntityAlpha hatchclosed,0
	End Select
	EndIf


This is just pertaining to the entitties and select, it runs, but both cases load and both are visible instead of one being invisible.