// Call zoom() from the main() function. 
// NOTE: THIS WILL ONLY WORK CORRENTLY WITH A5 AS TGA ALPHA CHANNELS ARE USED!!!

BMAP sniper_pan,<scope.tga>;
panel scope_pan
{
	pos_x = 0;
	pos_y = 0;
	layer =	2;
	bmap = sniper_pan;
	flags = transparent, visible, d3d, refresh;
	alpha = 0;
}
function zoom() 
{
	WHILE(1)
	{
		IF (MOUSE_RIGHT == 1) 
		{		// While Right Mouse button is clicked.		
			CAMERA.ARC -= TIME * 8;		// Zoom in fast
			scope_pan.alpha += 2;
			IF (CAMERA.ARC <= 10) 
			{			
				CAMERA.ARC = 10;		
			}
			IF (scope_pan.alpha >= 45)
			{
				scope_pan.alpha = 50;
			}
			WAIT 1;	
		}
		ELSE
		{		// If Right Mouse button is let off.	
			CAMERA.ARC += TIME * 12;		// Zoom out faster	
			scope_pan.alpha -= 3;	
			IF (CAMERA.ARC >= 60) 
			{		
				CAMERA.ARC = 60;
			}
			IF (scope_pan.alpha <= 5)
			{
				scope_pan.alpha = 0;
			}		
			WAIT 1;	
		}
	}
	wait 1;
}