Frame 1
	stop();
Frame 27
	stop();
Symbol 4 MovieClip Frame 99
	gotoAndPlay (1);
Symbol 6 MovieClip Frame 225
	gotoAndPlay (1);
Symbol 29 Button
on (release) {
	tellTarget ("/") {
		play();
	};
}
Symbol 30 MovieClip Frame 41
	stop();
Symbol 33 MovieClip Frame 3
	gotoAndPlay (2);
Symbol 33 MovieClip Frame 4
	stop();
Symbol 54 Button
on (release, keyPress "<Enter>") {
	call("..:Restart");
	gotoAndStop (1);
}
Symbol 56 MovieClip Frame 1
	stop();
Symbol 56 MovieClip Frame 2
	play();
Symbol 56 MovieClip Frame 26
	gotoAndPlay (2);
Symbol 58 MovieClip Frame 1
	stop();
Symbol 60 MovieClip Frame 1
	stop();
Symbol 83 Button
on (release, keyPress "<Space>") {
	if (Running) {
		Dropping = "1";
		Drop = "0";
		if (/:soundswitch == "1") {
			tellTarget ("MoveSound") {
				gotoAndPlay ("MoveSound");
			};
		}
	}
}
Symbol 87 Button
on (keyPress "<Left>") {
	if (Running) {
		XDelta = "-1";
		YDelta = "0";
		MoveMode = "Translate";
		call("MovePiece");
		if (/:soundswitch == "1") {
			tellTarget ("MoveSound") {
				gotoAndPlay ("MoveSound");
			};
		}
	}
}
Symbol 91 Button
on (keyPress "<Right>") {
	if (Running) {
		XDelta = "1";
		YDelta = "0";
		MoveMode = "Translate";
		call("MovePiece");
		if (/:soundswitch == "1") {
			tellTarget ("MoveSound") {
				gotoAndPlay ("MoveSound");
			};
		}
	}
}
Symbol 92 Button
on (keyPress "<Up>") {
	if (Running) {
		MoveMode = "RotateCW";
		call("MovePiece");
		if (/:soundswitch == "1") {
			tellTarget ("MoveSound") {
				gotoAndPlay ("MoveSound");
			};
		}
	}
}
Symbol 93 Button
on (release, keyPress "<Down>") {
	if (Running) {
		call("PieceFall");
		if (/:soundswitch == "1") {
			tellTarget ("MoveSound") {
				gotoAndPlay ("MoveSound");
			};
		}
	}
}
Symbol 98 Button
on (release, keyPress "s") {
	Set("/:soundswitch", "0");
	stopAllSounds();
	tellTarget ("/music") {
		gotoAndStop (3);
	};
	nextFrame();
}
Symbol 100 Button
on (release, keyPress "s") {
	Set("/:soundswitch", "1");
	tellTarget ("/music") {
		gotoAndPlay (1);
	};
	gotoAndStop (1);
}
Symbol 101 MovieClip Frame 1
	stop();
Symbol 101 MovieClip Frame 2
	stop();
Symbol 103 Button
on (release, keyPress "h") {
	gotoAndStop (3);
}
Symbol 104 Button
on (release, keyPress "h") {
	tellTarget ("helpscreenClone") {
		gotoAndStop (1);
	};
	gotoAndPlay (1);
}
Symbol 113 Button
on (release, keyPress "<Enter>") {
	if ((/:skiplevel >= "1") and ("10" >= /:skiplevel)) {
		tellTarget ("/pit") {
			call("Restart");
			gotoAndPlay (1);
		};
		tellTarget ("/pit/GameOverClone") {
			gotoAndStop (1);
		};
		gotoAndStop (1);
	} else {
		tellTarget ("MoveSound") {
			gotoAndPlay ("MoveSound");
		};
	}
}
Symbol 118 Button
on (release) {
	tellTarget ("/pit") {
		gotoAndPlay (1);
	};
	gotoAndStop (1);
}
Symbol 130 Button
on (release) {
	getURL ("mailto:info@colorchemist.com");
}
Symbol 131 MovieClip Frame 1
	stop();
Symbol 131 MovieClip Frame 2
	stop();
Symbol 132 MovieClip Frame 1
	if (Inited == "0") {
		call("Initialize");
	}
	if ((Running and Dropping) or (MoveDuration < (getTimer() - LastMove))) {
		call("PieceFall");
		LastMove = getTimer();
	}
Symbol 132 MovieClip Frame 2
	if (Inited == "0") {
		call("Initialize");
	}
	if ((Running and Dropping) or (MoveDuration < (getTimer() - LastMove))) {
		call("PieceFall");
		LastMove = getTimer();
	}
	gotoAndPlay (1);
Symbol 132 MovieClip Frame 3
	duplicateMovieClip ("helpscreen", "helpscreenClone", NumBlocks + "400");
	gotoAndStop("helpscreenClone:2");
	stop();
Symbol 132 MovieClip Frame 4
	stop();
Symbol 132 MovieClip Frame 5
	XDelta = "0";
	YDelta = "1";
	MoveMode = "Translate";
	call("MovePiece");
	if (Dropping) {
		Drop = Drop + "1";
	}
	if (!Moved) {
		i = "1";
		while ("4" >= i) {
			NumBlocks = NumBlocks + "1";
			duplicateMovieClip ("Block" add i, "PitBlock" add NumBlocks, "200" + NumBlocks);
			removeMovieClip("Block" add i);
			Set((("pit_" add eval ("x_" add i)) add "_") add eval ("y_" add i), NumBlocks);
			i = i + "1";
		}
		call("CreatePiece");
		Fell = "0";
		Dropping = "0";
	} else {
		Fell = "1";
	}
	call("MeltLevels");
Symbol 132 MovieClip Frame 6
	score = score + Drop;
	Drop = "0";
	PieceType = NextPieceType;
	Color = NextPieceType;
	NextPieceType = int(random(NumPieceTypes));
	gotoAndStop("NextPieceIndicator:" add (NextPieceType + "1"));
	if (PieceType == "0") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "-1";
		y_2 = "0";
		x_3 = "0";
		y_3 = "-1";
		x_4 = "0";
		y_4 = "-2";
		PieceY = PieceStartY + "2";
	} else if (PieceType == "1") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "-1";
		y_2 = "0";
		x_3 = "1";
		y_3 = "0";
		x_4 = "0";
		y_4 = "-1";
		PieceY = PieceStartY + "1";
	} else if (PieceType == "2") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "1";
		y_2 = "0";
		x_3 = "0";
		y_3 = "1";
		x_4 = "1";
		y_4 = "1";
		PieceY = PieceStartY;
	} else if (PieceType == "3") {
		x_1 = "0";
		y_1 = "-1";
		x_2 = "0";
		y_2 = "0";
		x_3 = "0";
		y_3 = "1";
		x_4 = "0";
		y_4 = "2";
		PieceY = PieceStartY + "1";
	} else if (PieceType == "4") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "-1";
		y_2 = "0";
		x_3 = "-1";
		y_3 = "1";
		x_4 = "0";
		y_4 = "-1";
		PieceY = PieceStartY + "1";
	} else if (PieceType == "5") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "1";
		y_2 = "0";
		x_3 = "0";
		y_3 = "-1";
		x_4 = "0";
		y_4 = "-2";
		PieceY = PieceStartY + "2";
	} else if (PieceType == "6") {
		x_1 = "0";
		y_1 = "0";
		x_2 = "1";
		y_2 = "0";
		x_3 = "1";
		y_3 = "1";
		x_4 = "0";
		y_4 = "-1";
		PieceY = PieceStartY + "1";
	}
	if (Color == "0") {
		BlockName = "GreyBlock";
	} else if (Color == "1") {
		BlockName = "YellowBlock";
	} else if (Color == "2") {
		BlockName = "BlueBlock";
	} else if (Color == "3") {
		BlockName = "RedBlock";
	} else if (Color == "4") {
		BlockName = "CyanBlock";
	} else if (Color == "5") {
		BlockName = "MagentaBlock";
	} else if (Color == "6") {
		BlockName = "GreenBlock";
	}
	i = "1";
	PieceX = PieceStartX;
	while ("4" >= i) {
		duplicateMovieClip (BlockName, "Block" add i, "100" + i);
		Set("x_" add i, eval ("x_" add i) + PieceX);
		Set("y_" add i, eval ("y_" add i) + PieceY);
		i = i + "1";
	}
	MoveMode = "Translate";
	XDelta = "0";
	YDelta = "0";
	call("MovePiece");
	if (!Moved) {
		call("GameOver");
	}
Symbol 132 MovieClip Frame 7
	i = "1";
	Moved = "1";
	while (("4" >= i) and Moved) {
		x = eval ("x_" add i);
		y = eval ("y_" add i);
		call(MoveMode);
		x = newX;
		y = newY;
		call("IsOccupied");
		if (Occupied) {
			Moved = "0";
		}
		i = i + "1";
	}
	if (Moved) {
		i = "1";
		while ("4" >= i) {
			x = eval ("x_" add i);
			y = eval ("y_" add i);
			call(MoveMode);
			Set("x_" add i, newX);
			Set("y_" add i, newY);
			i = i + "1";
		}
		if (MoveMode eq "Translate") {
			PieceX = PieceX + xDelta;
			PieceY = PieceY + yDelta;
		}
		call("UpdatePieceGraphics");
	}
Symbol 132 MovieClip Frame 8
	i = "1";
	while ("4" >= i) {
		setProperty("Block" add i, _x , getProperty("RedBlock", _width) * eval ("x_" add i));
		setProperty("Block" add i, _y , getProperty("RedBlock", _height) * eval ("y_" add i));
		setProperty("Block" add i, _alpha , "100");
		i = i + "1";
	}
Symbol 132 MovieClip Frame 9
	if ((((x < "0") or (x >= PitWidth)) or (y < "0")) or (y >= PitHeight)) {
		Occupied = "1";
	} else {
		Occupied = eval ((("pit_" add x) add "_") add y);
	}
Symbol 132 MovieClip Frame 10
	if (PieceType == "2") {
		newX = x;
		newY = y;
	} else {
		x = x - PieceX;
		y = y - PieceY;
		newX = y;
		newY = -x;
		newX = newX + PieceX;
		newY = newY + PieceY;
	}
Symbol 132 MovieClip Frame 11
	if (PieceType == "2") {
		newX = x;
		newY = y;
	} else {
		x = x - PieceX;
		y = y - PieceY;
		newX = -y;
		newY = x;
		newX = newX + PieceX;
		newY = newY + PieceY;
	}
Symbol 132 MovieClip Frame 12
	newX = x + xDelta;
	newY = y + yDelta;
Symbol 132 MovieClip Frame 13
	RowComplete = "1";
	NumComplete = "0";
	while (RowComplete) {
		RowComplete = "0";
		i = "0";
		while ((i < PitHeight) and (!RowComplete)) {
			j = "0";
			RowComplete = "1";
			while ((j < PitWidth) and RowComplete) {
				if (eval ((("pit_" add j) add "_") add i) == "0") {
					RowComplete = "0";
				}
				j = j + "1";
			}
			if (!RowComplete) {
				i = i + "1";
			}
		}
		if (RowComplete) {
			RowToDelete = i;
			j = "0";
			while (j < PitWidth) {
				removeMovieClip("PitBlock" add eval ((("Pit_" add j) add "_") add i));
				j = j + "1";
			}
			i = RowToDelete;
			while ("0" < i) {
				j = "0";
				while (j < PitWidth) {
					Block = eval ((("Pit_" add j) add "_") add (i - "1"));
					Set((("Pit_" add j) add "_") add i, Block);
					if (Block <> "0") {
						setProperty("PitBlock" add Block, _y , getProperty("PitBlock" add Block, _y) + getProperty("RedBlock", _height));
					}
					j = j + "1";
				}
				i = i - "1";
			}
			j = "0";
			while (j < PitWidth) {
				Set(("Pit_" add j) add "_0", "0");
				j = j + "1";
			}
			NumComplete = NumComplete + "1";
		}
	}
	if ("0" < NumComplete) {
		NumLayers = NumComplete;
		call("AddScore");
		if (/:soundswitch == "1") {
			tellTarget ("ExplodeSound") {
				gotoAndPlay ("ExplodeSound");
			};
		}
	}
Symbol 132 MovieClip Frame 14
	if (NumLayers == "1") {
		TetMultiple = "10";
	} else if (NumLayers == "2") {
		TetMultiple = "25";
	} else if (NumLayers == "3") {
		TetMultiple = "75";
	} else if (NumLayers == "4") {
		TetMultiple = "300";
	}
	Lines = Lines + NumLayers;
	newScore = (((level + "1") * "4") * TetMultiple) + Drop;
	score = score + newScore;
	if (Lines >= ((level + "1") * "10")) {
		level = Level + "1";
		if ("150" < MoveDuration) {
			MoveDuration = MoveDuration * "0.9";
		}
	}
Symbol 132 MovieClip Frame 15
	gotoAndStop (4);
	Running = "0";
	duplicateMovieClip ("GameOver", "GameOverClone", NumBlocks + "300");
	tellTarget ("GameOverClone") {
		gotoAndPlay ("Start");
	};
Symbol 132 MovieClip Frame 16
	i = "0";
	while (i < PitHeight) {
		j = "0";
		while (j < PitWidth) {
			Set((("pit_" add j) add "_") add i, "0");
			j = j + "1";
		}
		i = i + "1";
	}
	i = "1";
	while (NumBlocks >= i) {
		removeMovieClip("PitBlock" add i);
		i = i + "1";
	}
	Inited = "0";
	gotoAndPlay (1);
Symbol 132 MovieClip Frame 17
	Set("/:soundswitch", "1");
	NumPieceTypes = "7";
	NextPieceType = int(random(NumPieceTypes));
	Score = "0";
	Lines = "0";
	NumBlocks = "0";
	PitWidth = "11";
	PitHeight = "18";
	PieceStartX = int(PitWidth / "2");
	PieceStartY = "0";
	Inited = "1";
	Dropping = "0";
	Running = "1";
	if ((/:skiplevel >= "1") and ("10" >= /:skiplevel)) {
		Level = /:skiplevel;
		MoveDuration = "500" - (/:skiplevel * "35");
		Set("/:skiplevel", "0");
	} else {
		Level = "0";
		MoveDuration = "500";
	}
	call("CreatePiece");