mousepick

OK mousehit worked... the dice no longer spin so I can now (sometime) create a throw animation for them (how I wil do that I don't know) but here is the conumdrum:

x=MouseX()
y=MouseY()



e=CameraPick(camera,x,y)
If e<>entity#
		If entity Then EntityColor entity,255,255,255
		entity#=e
EndIf

If entity#
		EntityColor entity,255,240,60 ; 60 COLOR=Golden Yellow
		selected=entity               ; Did this to show what the computer thought the address was
		If MouseHit(1)               ; push L/mousebutton and get the number showing on the die
		 Select entity
			Case die1 numb=dice1 : nue=1
			Case die2 numb=dice2 : anue=1
			Case die3 numb=dice3 : bnue=1
			Case die4 numb=dice4 : cnue=1
			Case rollbutton : dice1=Rand(5)+1 : dice2=Rand(5)+1 : dice3=Rand(5)+1 : dice4=Rand(5)+1 
			Default 
		End Select
		EndIf
EndIf

kkgn=numofdice - (anue+bnue+cnue+nue)
If kkgn<=0 Then kkgn=kkgn + 4
If numofdice<=0 Then numofdice = 4

Even when I finally got the variables kkgn and numofdice to reset they don't go down again...

Is there someway to refresh variables that I know nothing about or is this a child of the SELCT process???