|
- UID
- 343
- 帖子
- 987
- 精华
- 13
- 积分
- 7771
- 阅读权限
- 101
- 来自
- 哈尔滨工程大学
- 在线时间
- 124 小时
- 注册时间
- 2004-12-17
- 最后登录
- 2008-7-11
|
2楼
发表于 2007-4-21 09:12
| 只看该作者
源代码
//-----------------------------
//版本：1.0
//日期：2007-04-15
//-----------------------------
Stage.scaleMode = "noScale";
var l0:Number = 50;
var l1:Number = 4;
var xq:Number = 0;
var jl:Number = 5;
var cf:Number = 10;
var total:Number = 500;
_global.roots = new Array(22);
var tpx:Array = new Array(l0);
var tpy:Array = new Array(l0);
_root.createEmptyMovieClip("line", 10000);
_root.createEmptyMovieClip("box1", 10001);
_root.createEmptyMovieClip("box2", 10002);
_root.createEmptyMovieClip("lines", -10000);
_global.clc = new Object();
_global.tim = new Object();
var zt:Boolean = new Boolean(false);
var ts:Boolean = new Boolean(true);
var prx:Number = 0;
var pry:Number = 0;
var cx1:Number = 0;
var cy1:Number = 0;
var cx2:Number = 0;
var cy2:Number = 0;
auto = function ():Void {
if (ts) {
for (var i = 0; i<l0; i++) {
for (var j = 0; j<l1-1; j++) {
var prx = tpx[j];
var pry = tpy[j];
if (tpx[j] == 0 || roots[prx][pry] == 0) {
continue;
}
for (var k = j+1; k<l1 && ts; k++) {
var nwx = tpx[k];
var nwy = tpy[k];
if (tpx[k] == 0 || roots[nwx][nwy] == 0) {
continue;
}
if (Judge1(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
ts = false;
Boxing(_root["tp"+nz], _root["tp"+pz]);
} else if (Judge2(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
ts = false;
Boxing(_root["tp"+nz], _root["tp"+pz]);
} else if (Judge3(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
ts = false;
Boxing(_root["tp"+nz], _root["tp"+pz]);
}
}
}
}
if (ts == true) {
fresh();
}
}
};
fresh = function ():Void {
ts = false;
var zbx:Array = new Array();
var zby:Array = new Array();
var zbz:Array = new Array();
for (var i = 0; i<l0*l1-xq*2; i++) {
do {
x = random(20)+1;
y = random(10)+1;
} while (roots[x][y] == 0);
zbx.push(x);
zby.push(y);
zbz.push(roots[x][y]);
roots[x][y] = 0;
var n = x*100+y;
_root["tp"+n].removeMovieClip();
}
for (var i = 0; i<l0; i++) {
for (var j = 0; j<l1; j++) {
tpx[j] = 0;
tpy[j] = 0;
}
}
do {
var m = random(zbz.length);
var x = zbx.pop();
var y = zby.pop();
var z = zbz[m];
zbz.splice(m, 1);
var j = 0;
while (tpx[z-1][j] != 0) {
j++;
}
tpx[z-1][j] = x;
tpy[z-1][j] = y;
var n = x*100+y;
roots[x][y] = z;
_root.attachMovie("tp"+z, "tp"+n, n);
with (_root["tp"+n]) {
_x = x*30+25;
_y = y*30+25;
}
} while (zbz.length != 0);
ts = true;
};
for (var i = 0; i<l0; i++) {
tpx = new Array(l1);
tpy = new Array(l1);
for (var j = 0; j<l1; j++) {
tpx[j] = 0;
tpy[j] = 0;
}
}
for (var i = 0; i<22; i++) {
roots = new Array(12);
for (var j = 0; j<12; j++) {
roots[j] = 0;
}
}
for (var i = 1; i<=l0; i++) {
for (var j = 0; j<l1; j++) {
do {
var x = random(20)+1;
var y = random(10)+1;
} while (roots[x][y] != 0);
tpx[i-1][j] = x;
tpy[i-1][j] = y;
var n = x*100+y;
roots[x][y] = i;
_root.attachMovie("tp"+i, "tp"+n, n);
with (_root["tp"+n]) {
_x = x*30+25;
_y = y*30+25;
}
}
}
cls = function (mc1:MovieClip, mc2:MovieClip):Void {
ts = false;
mc1._alpha -= 20;
mc2._alpha -= 20;
lines._alpha -= 20;
if (mc1._alpha<=0) {
mc1._visible = false;
mc2._visible = false;
lines.clear();
lines._alpha = 100;
total += jl;
xq++;
ts = true;
clearInterval(clc);
Test();
}
};
Box = function (mc:MovieClip):Void {
with (mc) {
line.lineStyle(3, 0xFFFF00, 100);
line.moveTo(mc._x-13, mc._y-13);
line.lineTo(mc._x+13, mc._y-13);
line.lineTo(mc._x+13, mc._y+13);
line.lineTo(mc._x-13, mc._y+13);
line.lineTo(mc._x-13, mc._y-13);
}
};
Boxing = function (mc1:MovieClip, mc2:MovieClip):Void {
total -= cf;
with (box1) {
lineStyle(2, 0x00FF00, 100);
moveTo(-13, -13);
lineTo(13, -13);
lineTo(13, 13);
lineTo(-13, 13);
lineTo(-13, -13);
_x = mc1._x;
_y = mc1._y;
_xscale = 250;
_yscale = 250;
}
with (box2) {
lineStyle(2, 0x00FF00, 100);
moveTo(-13, -13);
lineTo(13, -13);
lineTo(13, 13);
lineTo(-13, 13);
lineTo(-13, -13);
_x = mc2._x;
_y = mc2._y;
_xscale = 250;
_yscale = 250;
}
c = setInterval(cl, 20);
};
cl = function ():Void {
box1._xscale -= 10;
box1._yscale -= 10;
box2._xscale -= 10;
box2._yscale -= 10;
if (box1._xscale<100) {
box1.clear();
box2.clear();
box1._xscale = 100;
box1._yscale = 100;
box2._xscale = 100;
box2._yscale = 100;
ts = true;
clearInterval(c);
}
};
Judge1 = function (prx:Number, pry:Number, nwx:Number, nwy:Number):Boolean {
if (nwx == prx) {
var n = pry;
var nz = roots[nwx][nwy];
var pz = roots[prx][pry];
if (nwy>pry) {
do {
n++;
} while (roots[nwx][n] == 0 && n<nwy);
} else {
do {
n--;
} while (roots[nwx][n] == 0 && n>nwy);
}
if (n == nwy) {
return true;
} else {
return false;
}
} else if (nwy == pry) {
var n = prx;
var nz = roots[nwx][nwy];
var pz = roots[prx][pry];
if (nwx>prx) {
do {
n++;
} while (roots[n][nwy] == 0 && n<nwx);
} else {
do {
n--;
} while (roots[n][nwy] == 0 && n>nwx);
}
if (n == nwx) {
return true;
} else {
return false;
}
} else {
return false;
}
};
Judge2 = function (prx:Number, pry:Number, nwx:Number, nwy:Number):Boolean {
if (Judge1(prx, pry, nwx, pry) && Judge1(nwx, pry, nwx, nwy) && roots[nwx][pry] == 0) {
cx1 = nwx;
cy1 = pry;
return true;
}
if (Judge1(prx, pry, prx, nwy) && Judge1(prx, nwy, nwx, nwy) && roots[prx][nwy] == 0) {
cx1 = prx;
cy1 = nwy;
return true;
}
return false;
};
Judge3 = function (prx:Number, pry:Number, nwx:Number, nwy:Number):Boolean {
for (var i = prx-1; ; i--) {
if (roots[pry] != 0 || i<0) {
break;
}
if (Judge2(i, pry, nwx, nwy)) {
cx2 = i;
cy2 = pry;
return true;
}
}
for (var i = prx+1; ; i++) {
if (roots[pry] != 0 || i>21) {
break;
}
if (Judge2(i, pry, nwx, nwy)) {
cx2 = i;
cy2 = pry;
return true;
}
}
for (var i = pry-1; ; i--) {
if (roots[prx] != 0 || i<0) {
break;
}
if (Judge2(prx, i, nwx, nwy)) {
cx2 = prx;
cy2 = i;
return true;
}
}
for (var i = pry+1; ; i++) {
if (roots[prx] != 0 || i>21) {
break;
}
if (Judge2(prx, i, nwx, nwy)) {
cx2 = prx;
cy2 = i;
return true;
}
}
return false;
};
_root.onMouseDown = function() {
line.clear();
var x = Math.floor((_root._xmouse-10)/30);
var y = Math.floor((_root._ymouse-10)/30);
if (x>0 && y>0 && x<21 && y<11 && roots[x][y] == 0 && zt == true) {
zt = false;
line.clear();
}
if (x>0 && y>0 && x<21 && y<11 && roots[x][y] != 0) {
if (zt == false) {
zt = true;
var n = x*100+y;
prx = x;
pry = y;
Box(_root["tp"+n]);
} else {
if (x == prx && y == pry) {
line.clear();
zt = false;
} else if (Judge1(prx, pry, x, y) && roots[x][y] == roots[prx][pry]) {
var nz = x*100+y;
var pz = prx*100+pry;
var nmc = _root["tp"+nz];
var pmc = _root["tp"+pz];
Box(nmc);
lines.lineStyle(3, 0xFF0000, 100);
lines.moveTo(nmc._x, nmc._y);
lines.lineTo(pmc._x, pmc._y);
for (var i = 0; i<l1; i++) {
if (tpx[roots[x][y]-1] == x && tpy[roots[x][y]-1] == y) {
tpx[roots[x][y]-1] = 0;
tpy[roots[x][y]-1] = 0;
break;
}
}
roots[prx][pry] = 0;
roots[x][y] = 0;
line.clear();
zt = false;
clc = setInterval(cls, 50, nmc, pmc);
} else if (Judge2(prx, pry, x, y) && roots[x][y] == roots[prx][pry]) {
var nz = x*100+y;
var pz = prx*100+pry;
var nmc = _root["tp"+nz];
var pmc = _root["tp"+pz];
Box(nmc);
lines.lineStyle(3, 0xFF0000, 100);
lines.moveTo(nmc._x, nmc._y);
lines.lineTo(cx1*30+25, cy1*30+25);
lines.lineTo(pmc._x, pmc._y);
for (var i = 0; i<l1; i++) {
if (tpx[roots[x][y]-1] == x && tpy[roots[x][y]-1] == y) {
tpx[roots[x][y]-1] = 0;
tpy[roots[x][y]-1] = 0;
break;
}
}
roots[prx][pry] = 0;
roots[x][y] = 0;
line.clear();
zt = false;
clc = setInterval(cls, 50, nmc, pmc);
} else if (Judge3(prx, pry, x, y) && roots[x][y] == roots[prx][pry]) {
var nz = x*100+y;
var pz = prx*100+pry;
var nmc = _root["tp"+nz];
var pmc = _root["tp"+pz];
Box(nmc);
lines.lineStyle(3, 0xFF0000, 100);
lines.moveTo(nmc._x, nmc._y);
lines.lineTo(cx1*30+25, cy1*30+25);
lines.lineTo(cx2*30+25, cy2*30+25);
lines.lineTo(pmc._x, pmc._y);
for (var i = 0; i<l1; i++) {
if (tpx[roots[x][y]-1] == x && tpy[roots[x][y]-1] == y) {
tpx[roots[x][y]-1] = 0;
tpy[roots[x][y]-1] = 0;
break;
}
}
roots[prx][pry] = 0;
roots[x][y] = 0;
line.clear();
zt = false;
clc = setInterval(cls, 50, nmc, pmc);
} else {
zt = true;
line.clear();
var n = x*100+y;
prx = x;
pry = y;
Box(_root["tp"+n]);
}
}
}
};
Test = function ():Boolean {
for (var i = 0; i<l0; i++) {
for (var j = 0; j<l1-1; j++) {
var prx = tpx[j];
var pry = tpy[j];
if (tpx[j] == 0 || roots[prx][pry] == 0) {
continue;
}
for (var k = j+1; k<l1 && ts; k++) {
var nwx = tpx[k];
var nwy = tpy[k];
if (tpx[k] == 0 || roots[nwx][nwy] == 0) {
continue;
}
if (Judge1(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
return true;
} else if (Judge2(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
return true;
} else if (Judge3(prx, pry, nwx, nwy) && roots[nwx][nwy] == roots[prx][pry]) {
var nz = nwx*100+nwy;
var pz = prx*100+pry;
return true;
}
}
}
}
if (xq != l0*l1/2) {
fresh();
return false;
}
};
count = function () {
if (xq != l0*l1/2) {
total--;
} else {
clearInterval(tim);
}
};
tim = setInterval(count, 1000);
jdq.onEnterFrame = function() {
if (total>500) {
total = 500;
} else if (total<0) {
total = 0;
} else {
this.jdd.setMask(this.jdu);
this.jdu._x = total-500;
this.jdt = total;
}
};
bn1.onRelease = function() {
auto();
};
bn2.onRelease = function() {
total -= cf;
fresh();
}; |
|
发表于 2008-10-10 15:29
| 
