Frame 1
fscommand ("allowscale", "0");
Frame 2
if (_framesloaded == _totalframes) {
gotoAndPlay (6);
}
Frame 3
gotoAndPlay (2);
Frame 63
stop();
Frame 78
stop();
Frame 80
sh = "20";
sv = "10";
sd = "30";
score = "0";
oldscore = "0";
levelupunit = "500";
ballid = "0";
lockmove = "0";
level = "1";
ballno = "2";
gamewidth = "6";
gameheight = "8";
ballsize = "25";
balldownx = "0";
pausegame = "0";
sameball = "3";
balldowny = gameheight - "1";
totalballcolor = "4";
borderx = getProperty("border", _x);
bordery = getProperty("border", _y);
i = "0";
while ((gameheight + "1") >= i) {
j = "0";
while (j < gamewidth) {
Set((("ballcolor" add i) add "_") add j, "0");
Set(((("/ball" add i) add "_") add j) add ":ballcolor", "0");
tellTarget ((("/ball" add i) add "_") add j) {
gotoAndStop (1);
};
j = j + "1";
}
i = i + "1";
}
k = "0";
while (k < ballno) {
Set("nextballcolor" add k, "0");
k = k + "1";
}
Frame 81
call("/nextball:nextball");
Frame 86
call("/createball:createball");
Frame 92
stop();
Frame 93
play();
Frame 101
stop();
Symbol 5 Button
on (release) {
getURL ("http://www.luar.com.hk/", "_blank");
}
Symbol 40 Button
on (release) {
gotoAndPlay (80);
}
Symbol 43 Button
on (release) {
gotoAndPlay (64);
}
Symbol 59 MovieClip Frame 1
stop();
Symbol 59 MovieClip Frame 2
play();
Symbol 59 MovieClip Frame 4
gotoAndStop (1);
Symbol 59 MovieClip Frame 5
if (ballcolor == "4") {
gotoAndPlay (6);
} else if (ballcolor == "5") {
gotoAndPlay (7);
} else if (ballcolor == "6") {
gotoAndPlay (8);
} else if (ballcolor == "7") {
gotoAndPlay (9);
} else {
gotoAndStop (1);
}
Symbol 59 MovieClip Frame 6
stop();
Symbol 59 MovieClip Frame 7
stop();
Symbol 59 MovieClip Frame 8
stop();
Symbol 59 MovieClip Frame 9
stop();
Symbol 69 Button
on (release) {
getURL ("http://www.luar.com.hk/", "_blank");
}
Symbol 70 Button
on (keyPress "<Left>") {
if ((("0" < /:balldownx) and (/:lockmove == "0")) and (/:pausegame == "0")) {
oballdownx = /:balldownx - "1";
if (eval (((("/ball" add /:balldowny) add "_") add oballdownx) add ":ballcolor") == "0") {
i = "0";
while (i < /:ballno) {
oballdowny = /:balldowny + i;
oballdownx = /:balldownx - "1";
tellTarget ((("/ball" add oballdowny) add "_") add oballdownx) {
gotoAndStop ("haveball");
};
Set(((("/ball" add oballdowny) add "_") add oballdownx) add ":ballcolor", eval (((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor"));
tellTarget ((("/ball" add oballdowny) add "_") add /:balldownx) {
gotoAndStop (1);
};
Set(((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor", "0");
i = i + "1";
}
Set("/:balldownx", /:balldownx - "1");
}
}
}
Symbol 71 Button
on (keyPress "<Right>") {
if (((/:balldownx < (/:gamewidth - "1")) and (/:lockmove == "0")) and (/:pausegame == "0")) {
oballdownx = /:balldownx + "1";
if (eval (((("/ball" add /:balldowny) add "_") add oballdownx) add ":ballcolor") == "0") {
j = "0";
while (j < /:ballno) {
oballdowny = /:balldowny + j;
oballdownx = /:balldownx + "1";
Set(((("/ball" add oballdowny) add "_") add oballdownx) add ":ballcolor", eval (((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor"));
tellTarget ((("/ball" add oballdowny) add "_") add oballdownx) {
gotoAndStop ("haveball");
};
Set(((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor", "0");
tellTarget ((("/ball" add oballdowny) add "_") add /:balldownx) {
gotoAndStop (1);
};
j = j + "1";
}
Set("/:balldownx", /:balldownx + "1");
}
}
}
Symbol 72 Button
on (keyPress "<Down>") {
if ((/:lockmove == "0") and (/:pausegame == "0")) {
k = "0";
while (k < /:gameheight) {
if ((eval (((("/ball" add k) add "_") add /:balldownx) add ":ballcolor") == "0") and (k < /:balldowny)) {
m = "0";
while (m < /:ballno) {
pballdowny = k + m;
qballdowny = /:balldowny + m;
Set(((("/ball" add pballdowny) add "_") add /:balldownx) add ":ballcolor", eval (((("/ball" add qballdowny) add "_") add /:balldownx) add ":ballcolor"));
tellTarget ((("/ball" add pballdowny) add "_") add /:balldownx) {
gotoAndStop ("haveball");
};
Set(((("/ball" add qballdowny) add "_") add /:balldownx) add ":ballcolor", "0");
tellTarget ((("/ball" add qballdowny) add "_") add /:balldownx) {
gotoAndStop (1);
};
m = m + "1";
}
Set("/:balldowny", k);
tellTarget ("/checksame") {
gotoAndPlay ("checksame");
};
break;
}
k = k + "1";
}
}
}
Symbol 73 Button
on (keyPress "<Space>") {
if ((/:lockmove == "0") and (/:pausegame == "0")) {
tempcolor = eval (((("/ball" add /:balldowny) add "_") add /:balldownx) add ":ballcolor");
na = "0";
while (na < /:ballno) {
oballdowny = /:balldowny + na;
oaballdowny = /:balldowny + "1";
if (na < (/:ballno - "1")) {
Set(((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor", eval (((("/ball" add oaballdowny) add "_") add /:balldownx) add ":ballcolor"));
} else {
Set(((("/ball" add oballdowny) add "_") add /:balldownx) add ":ballcolor", tempcolor);
}
tellTarget ((("/ball" add oballdowny) add "_") add /:balldownx) {
gotoAndStop ("haveball");
};
na = na + "1";
}
}
}
Symbol 74 MovieClip Frame 1
play();
breakyes = "0";
if ((/:lockmove == "0") and ("0" < /:balldowny)) {
i = "0";
Set("/:lockmove", "1");
while (i < /:ballno) {
balldowny = /:balldowny + i;
balldownyn = balldowny - "1";
if ("0" < eval (((("/ball" add balldownyn) add "_") add /:balldownx) add ":ballcolor")) {
breakyes = "1";
if (balldownyn == (/:gameheight - "2")) {
tellTarget ("/") {
gotoAndPlay ("gameover");
};
}
break;
}
tellTarget ((("/ball" add balldownyn) add "_") add /:balldownx) {
gotoAndPlay ("haveball");
};
tellTarget ((("/ball" add balldowny) add "_") add /:balldownx) {
gotoAndStop (1);
};
Set(((("/ball" add balldownyn) add "_") add /:balldownx) add ":ballcolor", eval (((("/ball" add balldowny) add "_") add /:balldownx) add ":ballcolor"));
Set(((("/ball" add balldowny) add "_") add /:balldownx) add ":ballcolor", "0");
i = i + "1";
}
Set("/:balldowny", /:balldowny - "1");
if ((/:balldowny == "0") or (breakyes == "1")) {
tellTarget ("/checksame") {
gotoAndPlay ("checksame");
};
} else {
Set("/:lockmove", "0");
}
}
Symbol 74 MovieClip Frame 4
if ("9" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 7
if ("8" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 10
if ("7" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 12
if ("6" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 14
if ("5" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 16
if ("4" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 18
if ("3" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 20
if ("2" < /:level) {
gotoAndPlay (1);
}
Symbol 74 MovieClip Frame 22
if ("1" < /:level) {
gotoAndPlay (1);
}
Symbol 75 MovieClip Frame 1
stop();
Symbol 75 MovieClip Frame 2
Set("/:balldownx", "2");
Set("/:balldowny", /:gameheight - "1");
i = "0";
while (i < /:ballno) {
balldowny = (/:gameheight - "1") + i;
Set((("/:ballcolor" add balldowny) add "_") add /:balldownx, eval ("/:nextballcolor" add i));
Set(((("/ball" add balldowny) add "_") add /:balldownx) add ":ballcolor", eval ((("/:ballcolor" add balldowny) add "_") add /:balldownx));
tellTarget ((("/ball" add balldowny) add "_") add /:balldownx) {
gotoAndPlay ("haveball");
};
Set("/:lockmove", "0");
i = i + "1";
}
call("/nextball:nextball");
Symbol 76 MovieClip Frame 1
stop();
Symbol 76 MovieClip Frame 2
ka = "0";
while (ka < /:ballno) {
Set("/:nextballcolor" add ka, random(/:totalballcolor) + "4");
Set(("/nextball" add ka) add ":ballcolor", eval ("/:nextballcolor" add ka));
tellTarget ("/nextball" add ka) {
gotoAndStop ("haveball");
};
ka = ka + "1";
}
Symbol 77 MovieClip Frame 1
stop();
Symbol 77 MovieClip Frame 2
Set("/:lockmove", "1");
i = "0";
while (i < /:gameheight) {
j = "0";
while (j < /:gamewidth) {
sameballx = "1";
samebally = "1";
sameballdl = "1";
sameballdr = "1";
havesame = "0";
ballcolor = eval (((("/ball" add i) add "_") add j) add ":ballcolor");
if ("0" < ballcolor) {
lhcx = j;
while ("0" < lhcx) {
lhcx = lhcx - "1";
if (ballcolor == eval (((("/ball" add i) add "_") add lhcx) add ":ballcolor")) {
sameballx = sameballx + "1";
} else {
break;
}
}
rhcx = j;
while (rhcx < /:gamewidth) {
rhcx = rhcx + "1";
if (ballcolor == eval (((("/ball" add i) add "_") add rhcx) add ":ballcolor")) {
sameballx = sameballx + "1";
} else {
break;
}
}
if (sameballx >= /:sameball) {
havesame = "1";
tempscore = tempscore + /:sh;
} else {
ldcx = j;
udcy = i;
while (("0" < ldcx) and (udcy < /:gameheight)) {
ldcx = ldcx - "1";
udcy = udcy + "1";
if (ballcolor == eval (((("/ball" add udcy) add "_") add ldcx) add ":ballcolor")) {
sameballdl = sameballdl + "1";
} else {
break;
}
}
ldcx = j;
ddcy = i;
while ((ldcx < /:gamewidth) and ("0" < ddcy)) {
ldcx = ldcx + "1";
ddcy = ddcy - "1";
if (ballcolor == eval (((("/ball" add ddcy) add "_") add ldcx) add ":ballcolor")) {
sameballdl = sameballdl + "1";
} else {
break;
}
}
if (sameballdl >= /:sameball) {
havesame = "1";
tempscore = tempscore + /:sd;
} else {
rdcx = j;
udcy = i;
while ((rdcx < /:gamewidth) and (udcy < /:gameheight)) {
rdcx = rdcx + "1";
udcy = udcy + "1";
if (ballcolor == eval (((("/ball" add udcy) add "_") add rdcx) add ":ballcolor")) {
sameballdr = sameballdr + "1";
} else {
break;
}
}
rdcx = j;
ddcy = i;
while (("0" < rdcx) and ("0" < ddcy)) {
rdcx = rdcx - "1";
ddcy = ddcy - "1";
if (ballcolor == eval (((("/ball" add ddcy) add "_") add rdcx) add ":ballcolor")) {
sameballdr = sameballdr + "1";
} else {
break;
}
}
if (sameballdr >= /:sameball) {
havesame = "1";
tempscore = tempscore + /:sd;
} else {
dcy = i;
while (dcy < /:gameheight) {
dcy = dcy + "1";
if (ballcolor == eval (((("/ball" add dcy) add "_") add j) add ":ballcolor")) {
samebally = samebally + "1";
} else {
break;
}
}
dcy = i;
while ("0" < dcy) {
dcy = dcy - "1";
if (ballcolor == eval (((("/ball" add dcy) add "_") add j) add ":ballcolor")) {
samebally = samebally + "1";
} else {
break;
}
}
if (samebally >= /:sameball) {
havesame = "1";
tempscore = tempscore + /:sv;
}
}
}
}
if (havesame == "1") {
Set((("/:ballcolor" add i) add "_") add j, "1");
tellTarget ("/ball_exp_sound") {
gotoAndPlay (2);
};
}
}
j = j + "1";
}
i = i + "1";
}
Symbol 77 MovieClip Frame 3
Set("/:lockmove", "1");
clearball = "0";
i = "0";
while (i < /:gameheight) {
j = "0";
while (j < /:gamewidth) {
if (eval ((("/:ballcolor" add i) add "_") add j) == "1") {
clearball = "1";
Set(((("/ball" add i) add "_") add j) add ":ballcolor", "0");
tellTarget ((("/ball" add i) add "_") add j) {
gotoAndPlay (2);
};
Set((("/:ballcolor" add i) add "_") add j, "0");
}
j = j + "1";
}
i = i + "1";
}
if (clearball == "1") {
gotoAndPlay (4);
} else {
gotoAndPlay (14);
}
Symbol 77 MovieClip Frame 9
Set("/:lockmove", "1");
i = "1";
while (i < /:gameheight) {
j = "0";
while (j < /:gamewidth) {
if ("0" < eval (((("/ball" add i) add "_") add j) add ":ballcolor")) {
k = "0";
balldowny = i;
while ("0" < balldowny) {
k = k + "1";
balldowny = i - k;
if ("0" < eval (((("/ball" add balldowny) add "_") add j) add ":ballcolor")) {
balldowny = balldowny + "1";
break;
}
}
if (eval (((("/ball" add balldowny) add "_") add j) add ":ballcolor") == "0") {
Set(((("/ball" add balldowny) add "_") add j) add ":ballcolor", eval (((("/ball" add i) add "_") add j) add ":ballcolor"));
Set(((("/ball" add i) add "_") add j) add ":ballcolor", "0");
tellTarget ((("/ball" add i) add "_") add j) {
gotoAndStop (1);
};
tellTarget ((("/ball" add balldowny) add "_") add j) {
gotoAndPlay ("haveball");
};
}
}
j = j + "1";
}
i = i + "1";
}
Symbol 77 MovieClip Frame 13
gotoAndPlay (2);
Symbol 77 MovieClip Frame 17
Set("/:score", /:score + tempscore);
tempscore = "0";
falltwice = "0";
if ((/:score - /:oldscore) >= /:levelupunit) {
levelunit = /:levelupunit;
Set("/:oldscore", /:levelupunit * int((/:score / levelunit) + "0.5"));
Set("/:level", /:level + "1");
if ("10" < /:level) {
Set("/:level", "10");
}
}
call("/createball:createball");
gotoAndStop (1);
Symbol 78 Button
on (keyPress "p") {
play();
}
Symbol 79 Button
on (keyPress "P") {
play();
}
Symbol 84 MovieClip Frame 1
tellTarget ("/dropball") {
play();
};
Set("/:pausegame", "0");
stop();
Symbol 84 MovieClip Frame 2
tellTarget ("/dropball") {
stop();
};
Set("/:pausegame", "1");
stop();
Symbol 86 MovieClip Frame 1
stop();
Symbol 88 Button
on (release) {
gotoAndPlay (80);
}