Flash俄罗斯方块源码.doc

Flash俄罗斯方块源码 N = 20;//行数WIDTH = 20;//方块边长level = 0;//开始等级（下落速度）ret = new Array();//当前出现的方块nextret = new Array();//下一个出现的方块bg = new Array();//背景数组createEmptyMovieClip(panel, 1048575);//所有方块都在此mc里for (i=0; i5; i++) {//初始化方块数组，2*5格式，前四行代表每个方块的4个小块的位置坐标，最后一行第一列是方块形状，第二列是方块旋转方向ret.push(new Array(2));nextret.push(new Array(2));}for (i=0; i20; i++) {//初始化背景数组，10*20格式bg.push(new Array(10));}X = Y=panel._x=panel._y=0;//换为X、Y表示function reach(x:Number, y:Number, ret:Object) {//x、y为方块位置，ret为方块形状，若方块ret下落一格碰到边界或者方块返回1var i:Number, j:Number, k:Number;for (i=0; iN; i++) {?? for (j=0; j10; j++) {??? if (bg[i][j] == 219) {???? for (k=0; k4; k++) {????? if (x+ret[k][0] == j y+ret[k][1]+1 == i) {?????? return 1;????? }???? }??? }?? }}return 0;}function lrnotout(lorr:Number, a:Object) {//lorr==-1代表a往左边一格可行性的判断，lorr==1代表右边一格可行性的判断，lorr==0代表a的位置合理性的判断，出现不合理则返回0var i:Number;if (lorr == -1) {?? for (i=0; i4; i++) {??? if (x+a[i][0]-10 || reach(x-1, y-1, a)) {???? return 0;??? }?? }/}if (lorr == 1) {?? for (i=0; i4; i++) {??? if (x+a[i][0]+19 || reach(x-1, y+1, a)) {???? return 0;??? }?? }}if (lorr == 0) {?? for (i=0; i4; i++) {??? if (x+a[i][0]0 || x+a[i][0]9) {???? return 0;??? }?? }}return 1;}function rv(a:Object, v:Object) {//方块赋值，将a方块赋值到ret方块var i:Number;for (i=0; i5; i++) {?? v[i][0]=a[i][0],v[i][1]=a[i][1];}}function rotate(v) {//根据方块ret最后一行（分别是形状指示变量和旋转方向变量）为ret的前四行赋以具体形状值switch (v[4][0]) {case 0 :?? //方形?? a = [[1, 0], [2, 0], [1, 1], [2, 1], [0, 0]];?? rv(a, v);?? return;case 1 :?? //长形?? switch (v[4][1]) {?? case 1 :??? a = [[0, 0], [1, 0], [2, 0], [3, 0], [1, 0]];??? if (lrnotout(0, a) !reach(x, y-1, a)) {???? rv(a, v);??? }??? return;?? case 0 :??? a = [[1, 0], [1, 1], [1, 2], [1, 3], [1, 1]];??? if (lrnotout(0, a) !reach(x, y-1, a)) {???? rv(a,v);??? }??? return;?? }case 2 :?? //Z形?? switch (v[4][1]) {?? case 1 :??? a = [[0, 1], [1, 1], [1, 2], [2, 2], [2, 0]];??? if (lrno