TransportRotationLoop()
{
	signal SIG_TRANSLOOP;
	set-signal-mask SIG_TRANSLOOP;
	
	while (TRUE) {
		while ((get TRANSPORT_ID) >= 0) {
			set HEADING to (get HEADING (get TRANSPORT_ID) - <90>);
			sleep 50;
		}
		sleep 250;
	}
}
setSFXoccupy (terrain)
{
	// we are being transported
	get PRINT(terrain);
	if (terrain == 0) start-script TransportRotationLoop();
	else signal SIG_TRANSLOOP;
}