home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 May / Chip_2003-05_cd1.bin / oddech / flashgame / veonix.swf / scripts / frame_5 / DoAction.as
Encoding:
Text File  |  2003-03-14  |  28.3 KB  |  1,111 lines
  1. function Inizializzalivelli()
  2. {
  3.    var i;
  4.    var j;
  5.    matsfondo = new Array();
  6.    liv1 = new Array();
  7.    liv2 = new Array();
  8.    liv3 = new Array();
  9.    liv4 = new Array();
  10.    liv5 = new Array();
  11.    liv6 = new Array();
  12.    liv7 = new Array();
  13.    liv8 = new Array();
  14.    liv9 = new Array();
  15.    liv10 = new Array();
  16.    i = 0;
  17.    while(i < maxrig)
  18.    {
  19.       matsfondo[i] = new Array();
  20.       liv1[i] = new Array();
  21.       liv2[i] = new Array();
  22.       liv3[i] = new Array();
  23.       liv4[i] = new Array();
  24.       liv5[i] = new Array();
  25.       liv6[i] = new Array();
  26.       liv7[i] = new Array();
  27.       liv8[i] = new Array();
  28.       liv9[i] = new Array();
  29.       liv10[i] = new Array();
  30.       j = 0;
  31.       while(j < maxcol)
  32.       {
  33.          matsfondo[i][j] = 0;
  34.          liv1[i][j] = 0;
  35.          liv2[i][j] = 0;
  36.          liv3[i][j] = 0;
  37.          liv4[i][j] = 0;
  38.          liv5[i][j] = 0;
  39.          liv6[i][j] = 0;
  40.          liv7[i][j] = 0;
  41.          liv8[i][j] = 0;
  42.          liv9[i][j] = 0;
  43.          liv10[i][j] = 0;
  44.          j++;
  45.       }
  46.       i++;
  47.    }
  48.    liv3[maxrig - 1][0] = random(7) + 100 + 1;
  49.    liv3[maxrig - 2][0] = random(7) + 100 + 1;
  50.    liv3[maxrig - 3][0] = random(7) + 100 + 1;
  51.    liv3[maxrig - 4][0] = random(7) + 100 + 1;
  52.    liv3[maxrig - 5][0] = random(7) + 100 + 1;
  53.    liv3[maxrig - 6][0] = random(7) + 100 + 1;
  54.    liv3[maxrig - 7][0] = random(7) + 100 + 1;
  55.    liv3[maxrig - 8][0] = random(7) + 100 + 1;
  56.    liv3[maxrig - 1][9] = random(7) + 100 + 1;
  57.    liv3[maxrig - 2][9] = random(7) + 100 + 1;
  58.    liv3[maxrig - 3][9] = random(7) + 100 + 1;
  59.    liv3[maxrig - 4][9] = random(7) + 100 + 1;
  60.    liv3[maxrig - 5][9] = random(7) + 100 + 1;
  61.    liv3[maxrig - 6][9] = random(7) + 100 + 1;
  62.    liv3[maxrig - 7][9] = random(7) + 100 + 1;
  63.    liv3[maxrig - 8][9] = random(7) + 100 + 1;
  64.    liv4[maxrig - 1][1] = random(7) + 100 + 1;
  65.    liv4[maxrig - 1][6] = random(7) + 100 + 1;
  66.    liv4[maxrig - 2][3] = random(7) + 100 + 1;
  67.    liv4[maxrig - 2][8] = random(7) + 100 + 1;
  68.    liv4[maxrig - 3][5] = random(7) + 100 + 1;
  69.    liv4[maxrig - 4][2] = random(7) + 100 + 1;
  70.    liv4[maxrig - 4][6] = random(7) + 100 + 1;
  71.    liv4[maxrig - 4][7] = random(7) + 100 + 1;
  72.    liv4[maxrig - 5][0] = random(7) + 100 + 1;
  73.    liv4[maxrig - 5][3] = random(7) + 100 + 1;
  74.    liv5[maxrig - 1][0] = random(7) + 100 + 1;
  75.    liv5[maxrig - 1][1] = random(7) + 100 + 1;
  76.    liv5[maxrig - 1][3] = random(7) + 100 + 1;
  77.    liv5[maxrig - 1][4] = random(7) + 100 + 1;
  78.    liv5[maxrig - 1][5] = random(7) + 100 + 1;
  79.    liv5[maxrig - 1][6] = random(7) + 100 + 1;
  80.    liv5[maxrig - 1][8] = random(7) + 100 + 1;
  81.    liv5[maxrig - 1][9] = random(7) + 100 + 1;
  82.    liv5[maxrig - 2][1] = random(7) + 100 + 1;
  83.    liv5[maxrig - 2][2] = random(7) + 100 + 1;
  84.    liv5[maxrig - 2][4] = random(7) + 100 + 1;
  85.    liv5[maxrig - 2][5] = random(7) + 100 + 1;
  86.    liv5[maxrig - 2][7] = random(7) + 100 + 1;
  87.    liv5[maxrig - 2][8] = random(7) + 100 + 1;
  88.    liv5[maxrig - 3][2] = random(7) + 100 + 1;
  89.    liv5[maxrig - 3][3] = random(7) + 100 + 1;
  90.    liv5[maxrig - 3][6] = random(7) + 100 + 1;
  91.    liv5[maxrig - 3][7] = random(7) + 100 + 1;
  92.    liv5[maxrig - 4][3] = random(7) + 100 + 1;
  93.    liv5[maxrig - 4][4] = random(7) + 100 + 1;
  94.    liv5[maxrig - 4][5] = random(7) + 100 + 1;
  95.    liv5[maxrig - 4][6] = random(7) + 100 + 1;
  96.    liv5[maxrig - 5][4] = random(7) + 100 + 1;
  97.    liv5[maxrig - 5][5] = random(7) + 100 + 1;
  98.    liv6[maxrig - 12][0] = random(7) + 100 + 1;
  99.    liv6[maxrig - 12][1] = random(7) + 100 + 1;
  100.    liv6[maxrig - 12][2] = random(7) + 100 + 1;
  101.    liv6[maxrig - 12][3] = random(7) + 100 + 1;
  102.    liv6[maxrig - 12][4] = random(7) + 100 + 1;
  103.    liv6[maxrig - 12][7] = random(7) + 100 + 1;
  104.    liv6[maxrig - 12][8] = random(7) + 100 + 1;
  105.    liv6[maxrig - 12][9] = random(7) + 100 + 1;
  106.    liv7[maxrig - 1][0] = random(7) + 100 + 1;
  107.    liv7[maxrig - 2][1] = random(7) + 100 + 1;
  108.    liv7[maxrig - 3][2] = random(7) + 100 + 1;
  109.    liv7[maxrig - 4][3] = random(7) + 100 + 1;
  110.    liv7[maxrig - 5][4] = random(7) + 100 + 1;
  111.    liv7[maxrig - 6][5] = random(7) + 100 + 1;
  112.    liv7[maxrig - 7][6] = random(7) + 100 + 1;
  113.    liv7[maxrig - 8][7] = random(7) + 100 + 1;
  114.    liv7[maxrig - 9][8] = random(7) + 100 + 1;
  115.    liv7[maxrig - 10][9] = random(7) + 100 + 1;
  116.    liv8[maxrig - 1][0] = random(7) + 100 + 1;
  117.    liv8[maxrig - 2][1] = random(7) + 100 + 1;
  118.    liv8[maxrig - 3][0] = random(7) + 100 + 1;
  119.    liv8[maxrig - 4][1] = random(7) + 100 + 1;
  120.    liv8[maxrig - 5][0] = random(7) + 100 + 1;
  121.    liv8[maxrig - 6][1] = random(7) + 100 + 1;
  122.    liv8[maxrig - 7][0] = random(7) + 100 + 1;
  123.    liv8[maxrig - 8][1] = random(7) + 100 + 1;
  124.    liv8[maxrig - 9][0] = random(7) + 100 + 1;
  125.    liv8[maxrig - 1][8] = random(7) + 100 + 1;
  126.    liv8[maxrig - 2][9] = random(7) + 100 + 1;
  127.    liv8[maxrig - 3][8] = random(7) + 100 + 1;
  128.    liv8[maxrig - 4][9] = random(7) + 100 + 1;
  129.    liv8[maxrig - 5][8] = random(7) + 100 + 1;
  130.    liv8[maxrig - 6][9] = random(7) + 100 + 1;
  131.    liv8[maxrig - 7][8] = random(7) + 100 + 1;
  132.    liv8[maxrig - 8][9] = random(7) + 100 + 1;
  133.    liv8[maxrig - 9][8] = random(7) + 100 + 1;
  134.    liv9[maxrig - 9][4] = random(7) + 100 + 1;
  135.    liv9[maxrig - 9][5] = random(7) + 100 + 1;
  136.    liv9[maxrig - 8][3] = random(7) + 100 + 1;
  137.    liv9[maxrig - 8][6] = random(7) + 100 + 1;
  138.    liv9[maxrig - 7][2] = random(7) + 100 + 1;
  139.    liv9[maxrig - 7][7] = random(7) + 100 + 1;
  140.    liv9[maxrig - 6][2] = random(7) + 100 + 1;
  141.    liv9[maxrig - 6][7] = random(7) + 100 + 1;
  142.    liv9[maxrig - 5][3] = random(7) + 100 + 1;
  143.    liv9[maxrig - 5][6] = random(7) + 100 + 1;
  144.    liv9[maxrig - 4][4] = random(7) + 100 + 1;
  145.    liv9[maxrig - 4][5] = random(7) + 100 + 1;
  146.    liv10[maxrig - 13][0] = random(7) + 100 + 1;
  147.    liv10[maxrig - 13][9] = random(7) + 100 + 1;
  148.    liv10[maxrig - 12][1] = random(7) + 100 + 1;
  149.    liv10[maxrig - 12][8] = random(7) + 100 + 1;
  150.    liv10[maxrig - 11][2] = random(7) + 100 + 1;
  151.    liv10[maxrig - 11][7] = random(7) + 100 + 1;
  152.    liv10[maxrig - 10][3] = random(7) + 100 + 1;
  153.    liv10[maxrig - 10][6] = random(7) + 100 + 1;
  154.    liv10[maxrig - 9][4] = random(7) + 100 + 1;
  155.    liv10[maxrig - 9][5] = random(7) + 100 + 1;
  156. }
  157. function Sceglilivello()
  158. {
  159.    if(numlevel == 1)
  160.    {
  161.       matsfondo = liv1;
  162.       numcicli = 0;
  163.       numrig = 5;
  164.       puntiliv = 1;
  165.    }
  166.    else if(numlevel == 2)
  167.    {
  168.       matsfondo = liv2;
  169.       numcicli = 1;
  170.       numrig = 10;
  171.       puntiliv = 2;
  172.    }
  173.    else if(numlevel == 3)
  174.    {
  175.       matsfondo = liv3;
  176.       numcicli = 2;
  177.       numrig = 12;
  178.       puntiliv = 4;
  179.    }
  180.    else if(numlevel == 4)
  181.    {
  182.       matsfondo = liv4;
  183.       numcicli = 2;
  184.       numrig = 10;
  185.       puntiliv = 7;
  186.    }
  187.    else if(numlevel == 5)
  188.    {
  189.       matsfondo = liv5;
  190.       numcicli = 2;
  191.       numrig = 12;
  192.       puntiliv = 8;
  193.    }
  194.    else if(numlevel == 6)
  195.    {
  196.       matsfondo = liv6;
  197.       numcicli = 2;
  198.       numrig = 12;
  199.       puntiliv = 9;
  200.    }
  201.    else if(numlevel == 7)
  202.    {
  203.       matsfondo = liv7;
  204.       numcicli = 2;
  205.       numrig = 10;
  206.       puntiliv = 11;
  207.    }
  208.    else if(numlevel == 8)
  209.    {
  210.       matsfondo = liv8;
  211.       numcicli = 2;
  212.       numrig = 10;
  213.       puntiliv = 13;
  214.    }
  215.    else if(numlevel == 9)
  216.    {
  217.       matsfondo = liv9;
  218.       numcicli = 2;
  219.       numrig = 12;
  220.       puntiliv = 16;
  221.    }
  222.    else if(numlevel == 10)
  223.    {
  224.       matsfondo = liv10;
  225.       numcicli = 2;
  226.       numrig = 8;
  227.       puntiliv = 17;
  228.    }
  229.    Matimage(matsfondo);
  230. }
  231. function Sommat(a, b, c)
  232. {
  233.    var rig;
  234.    var col;
  235.    rig = 0;
  236.    while(rig < maxrig)
  237.    {
  238.       col = 0;
  239.       while(col < maxcol)
  240.       {
  241.          c[rig][col] = a[rig][col] + b[rig][col];
  242.          col++;
  243.       }
  244.       rig++;
  245.    }
  246. }
  247. function Difmat(a, b, c)
  248. {
  249.    var rig;
  250.    var col;
  251.    rig = 0;
  252.    while(rig < maxrig)
  253.    {
  254.       col = 0;
  255.       while(col < maxcol)
  256.       {
  257.          c[rig][col] = a[rig][col] - b[rig][col];
  258.          col++;
  259.       }
  260.       rig++;
  261.    }
  262. }
  263. function Matimage(rig, col, valx)
  264. {
  265.    var valxx;
  266.    if(valx != 0)
  267.    {
  268.       valxx = valx % 100;
  269.       setProperty("mat" + rig + "_" + col, _visible, true);
  270.       eval("mat" + rig + "_" + col).gotoAndStop(valxx);
  271.    }
  272.    else
  273.    {
  274.       setProperty("mat" + rig + "_" + col, _visible, false);
  275.    }
  276. }
  277. function Statiniz()
  278. {
  279.    var i;
  280.    i = 0;
  281.    while(i < 7)
  282.    {
  283.       set(┬º┬ºpop(),0);
  284.       setProperty("barra" + i, _visible, false);
  285.       i++;
  286.    }
  287. }
  288. function Statnorm()
  289. {
  290.    var i;
  291.    var minim;
  292.    minim = 100;
  293.    i = 0;
  294.    while(i < 7)
  295.    {
  296.       minim = Math.min(eval("contastat" + i),minim);
  297.       i++;
  298.    }
  299.    i = 0;
  300.    while(i < 7)
  301.    {
  302.       set(┬º┬ºpop(),eval("contastat" + i) - minim);
  303.       if(eval("contastat" + i) == 0)
  304.       {
  305.          setProperty("barra" + i, _visible, false);
  306.       }
  307.       else
  308.       {
  309.          eval("barra" + i).gotoAndStop(eval("contastat" + i));
  310.       }
  311.       i++;
  312.    }
  313. }
  314. function Statistiche(num, valx)
  315. {
  316.    setProperty("barra" + num, _visible, true);
  317.    eval("barra" + num).gotoAndStop(valx);
  318. }
  319. function Matimage2(rig, col, tr)
  320. {
  321.    setProperty("mat" + rig + "_" + col, _alpha, tr);
  322. }
  323. function CreaMatrix()
  324. {
  325.    var i;
  326.    var j;
  327.    var contatore = 0;
  328.    i = 0;
  329.    while(i < maxrig)
  330.    {
  331.       j = 0;
  332.       while(j < maxcol)
  333.       {
  334.          contatore++;
  335.          duplicateMovieClip(mat,"mat" + i + "_" + j,16384 + contatore);
  336.          setProperty("mat" + i + "_" + j, _X, posx + j * larg);
  337.          setProperty("mat" + i + "_" + j, _Y, posy + i * alt);
  338.          setProperty("mat" + i + "_" + j, _visible, false);
  339.          setProperty("mat" + i + "_" + j, _alpha, 100);
  340.          j++;
  341.       }
  342.       i++;
  343.    }
  344.    duplicateMovieClip(scrittapunti,"scrittapunti2",16784);
  345.    duplicateMovieClip(scrittafine,"scrittafine2",16785);
  346.    setProperty(scrittafine2, _X, 100);
  347.    setProperty(scrittafine2, _Y, 100);
  348.    setProperty(scrittafine2, _visible, false);
  349.    duplicateMovieClip(scrittapausa,"scrittapausa2",16786);
  350.    setProperty(scrittapausa2, _X, 100);
  351.    setProperty(scrittapausa2, _Y, 100);
  352.    setProperty(scrittapausa2, _visible, false);
  353. }
  354. function Sceltapezzo()
  355. {
  356.    if(tipoinizio == 0)
  357.    {
  358.       distdx = 4;
  359.       distup = maxrig - 2;
  360.       val0 = 1;
  361.       val1 = 1;
  362.       val2 = 1;
  363.       val3 = 1;
  364.       rig0 = rigind;
  365.       col0 = colind;
  366.       rig1 = rigind;
  367.       col1 = colind + 1;
  368.       rig2 = rigind + 1;
  369.       col2 = colind;
  370.       rig3 = rigind + 1;
  371.       col3 = colind + 1;
  372.    }
  373.    else if(tipoinizio == 1)
  374.    {
  375.       distdx = 2;
  376.       distup = maxrig - 1;
  377.       val0 = 2;
  378.       val1 = 2;
  379.       val2 = 2;
  380.       val3 = 2;
  381.       rig0 = rigind;
  382.       col0 = colind;
  383.       rig1 = rigind;
  384.       col1 = colind + 1;
  385.       rig2 = rigind;
  386.       col2 = colind + 2;
  387.       rig3 = rigind;
  388.       col3 = colind + 3;
  389.    }
  390.    else if(tipoinizio == 2)
  391.    {
  392.       distdx = 3;
  393.       distup = maxrig - 2;
  394.       val0 = 3;
  395.       val1 = 3;
  396.       val2 = 3;
  397.       val3 = 3;
  398.       rig0 = rigind;
  399.       col0 = colind;
  400.       rig1 = rigind;
  401.       col1 = colind + 1;
  402.       rig2 = rigind;
  403.       col2 = colind + 2;
  404.       rig3 = rigind + 1;
  405.       col3 = colind + 2;
  406.    }
  407.    else if(tipoinizio == 3)
  408.    {
  409.       distdx = 3;
  410.       distup = maxrig - 2;
  411.       val0 = 4;
  412.       val1 = 4;
  413.       val2 = 4;
  414.       val3 = 4;
  415.       rig0 = rigind;
  416.       col0 = colind;
  417.       rig1 = rigind;
  418.       col1 = colind + 1;
  419.       rig2 = rigind;
  420.       col2 = colind + 2;
  421.       rig3 = rigind + 1;
  422.       col3 = colind;
  423.    }
  424.    else if(tipoinizio == 4)
  425.    {
  426.       distdx = 3;
  427.       distup = maxrig - 2;
  428.       val0 = 5;
  429.       val1 = 5;
  430.       val2 = 5;
  431.       val3 = 5;
  432.       rig0 = rigind;
  433.       col0 = colind;
  434.       rig1 = rigind;
  435.       col1 = colind + 1;
  436.       rig2 = rigind + 1;
  437.       col2 = colind + 1;
  438.       rig3 = rigind + 1;
  439.       col3 = colind + 2;
  440.    }
  441.    else if(tipoinizio == 5)
  442.    {
  443.       distdx = 3;
  444.       distup = maxrig - 2;
  445.       val0 = 6;
  446.       val1 = 6;
  447.       val2 = 6;
  448.       val3 = 6;
  449.       rig0 = rigind;
  450.       col0 = colind + 1;
  451.       rig1 = rigind;
  452.       col1 = colind + 2;
  453.       rig2 = rigind + 1;
  454.       col2 = colind;
  455.       rig3 = rigind + 1;
  456.       col3 = colind + 1;
  457.    }
  458.    else if(tipoinizio == 6)
  459.    {
  460.       distdx = 3;
  461.       distup = maxrig - 2;
  462.       val0 = 7;
  463.       val1 = 7;
  464.       val2 = 7;
  465.       val3 = 7;
  466.       rig0 = rigind;
  467.       col0 = colind;
  468.       rig1 = rigind;
  469.       col1 = colind + 1;
  470.       rig2 = rigind;
  471.       col2 = colind + 2;
  472.       rig3 = rigind + 1;
  473.       col3 = colind + 1;
  474.    }
  475.    indicerot = 0;
  476.    distsx = 4;
  477.    if(matsfondo[rig0][col0] < 100 && matsfondo[rig1][col1] < 100 && matsfondo[rig2][col2] < 100 && matsfondo[rig3][col3] < 100)
  478.    {
  479.       matsfondo[rig0][col0] = val0;
  480.       matsfondo[rig1][col1] = val1;
  481.       matsfondo[rig2][col2] = val2;
  482.       matsfondo[rig3][col3] = val3;
  483.       Matimage(rig0,col0,val0);
  484.       Matimage(rig1,col1,val1);
  485.       Matimage(rig2,col2,val2);
  486.       Matimage(rig3,col3,val3);
  487.       verificainiziale = 0;
  488.    }
  489.    else
  490.    {
  491.       verificainiziale = 1;
  492.    }
  493. }
  494. function Prossimopezzo()
  495. {
  496.    i = 0;
  497.    while(i < 7)
  498.    {
  499.       setProperty("prossimo.pezzo" + i, _visible, false);
  500.       i++;
  501.    }
  502.    if(tipoprossimo == 0)
  503.    {
  504.       setProperty("prossimo.pezzo0", _visible, true);
  505.    }
  506.    else if(tipoprossimo == 1)
  507.    {
  508.       setProperty("prossimo.pezzo1", _visible, true);
  509.    }
  510.    else if(tipoprossimo == 2)
  511.    {
  512.       setProperty("prossimo.pezzo2", _visible, true);
  513.    }
  514.    else if(tipoprossimo == 3)
  515.    {
  516.       setProperty("prossimo.pezzo3", _visible, true);
  517.    }
  518.    else if(tipoprossimo == 4)
  519.    {
  520.       setProperty("prossimo.pezzo4", _visible, true);
  521.    }
  522.    else if(tipoprossimo == 5)
  523.    {
  524.       setProperty("prossimo.pezzo5", _visible, true);
  525.    }
  526.    else if(tipoprossimo == 6)
  527.    {
  528.       setProperty("prossimo.pezzo6", _visible, true);
  529.    }
  530. }
  531. function Shiftdxsx(dir)
  532. {
  533.    if(dir == 1)
  534.    {
  535.       if(distdx != 0)
  536.       {
  537.          if(matsfondo[rig0][col0 + 1] < 100 && matsfondo[rig1][col1 + 1] < 100 && matsfondo[rig2][col2 + 1] < 100 && matsfondo[rig3][col3 + 1] < 100)
  538.          {
  539.             matsfondo[rig0][col0] = 0;
  540.             matsfondo[rig1][col1] = 0;
  541.             matsfondo[rig2][col2] = 0;
  542.             matsfondo[rig3][col3] = 0;
  543.             Matimage(rig0,col0,0);
  544.             Matimage(rig1,col1,0);
  545.             Matimage(rig2,col2,0);
  546.             Matimage(rig3,col3,0);
  547.             matsfondo[rig0][++col0] = val0;
  548.             matsfondo[rig1][++col1] = val1;
  549.             matsfondo[rig2][++col2] = val2;
  550.             matsfondo[rig3][++col3] = val3;
  551.             Matimage(rig0,col0,val0);
  552.             Matimage(rig1,col1,val1);
  553.             Matimage(rig2,col2,val2);
  554.             Matimage(rig3,col3,val3);
  555.             distdx--;
  556.             distsx++;
  557.          }
  558.       }
  559.    }
  560.    else if(distsx != 0)
  561.    {
  562.       if(matsfondo[rig0][col0 - 1] < 100 && matsfondo[rig1][col1 - 1] < 100 && matsfondo[rig2][col2 - 1] < 100 && matsfondo[rig3][col3 - 1] < 100)
  563.       {
  564.          matsfondo[rig0][col0] = 0;
  565.          matsfondo[rig1][col1] = 0;
  566.          matsfondo[rig2][col2] = 0;
  567.          matsfondo[rig3][col3] = 0;
  568.          Matimage(rig0,col0,0);
  569.          Matimage(rig1,col1,0);
  570.          Matimage(rig2,col2,0);
  571.          Matimage(rig3,col3,0);
  572.          matsfondo[rig0][--col0] = val0;
  573.          matsfondo[rig1][--col1] = val1;
  574.          matsfondo[rig2][--col2] = val2;
  575.          matsfondo[rig3][--col3] = val3;
  576.          Matimage(rig0,col0,val0);
  577.          Matimage(rig1,col1,val1);
  578.          Matimage(rig2,col2,val2);
  579.          Matimage(rig3,col3,val3);
  580.          distdx++;
  581.          distsx--;
  582.       }
  583.    }
  584. }
  585. function Rotazione()
  586. {
  587.    var rotrig0;
  588.    var rotcol0;
  589.    var rotrig1;
  590.    var rotcol1;
  591.    var rotrig2;
  592.    var rotcol2;
  593.    var rotrig3;
  594.    var rotcol3;
  595.    var rotdistdx;
  596.    var rotdistsx;
  597.    var rotdistup;
  598.    var flag = 0;
  599.    rotrig0 = rig0;
  600.    rotcol0 = col0;
  601.    rotrig1 = rig1;
  602.    rotcol1 = col1;
  603.    rotrig2 = rig2;
  604.    rotcol2 = col2;
  605.    rotrig3 = rig3;
  606.    rotcol3 = col3;
  607.    if(tipoinizio == 0)
  608.    {
  609.       flag = 1;
  610.    }
  611.    else if(tipoinizio == 1)
  612.    {
  613.       indicerot %= 2;
  614.       if(indicerot == 0 && 2 < distup)
  615.       {
  616.          rotdistdx = distdx + 2;
  617.          rotdistsx = distsx + 1;
  618.          rotdistup = distup - 3;
  619.          rotrig0 = rig1 + 1;
  620.          rotcol0 = col1;
  621.          rotrig2 = rig1 + 2;
  622.          rotcol2 = col1;
  623.          rotrig3 = rig1 + 3;
  624.          rotcol3 = col1;
  625.       }
  626.       else if(indicerot == 1 && distdx >= 2 && distsx >= 1)
  627.       {
  628.          rotdistdx = distdx - 2;
  629.          rotdistsx = distsx - 1;
  630.          rotdistup = distup + 3;
  631.          rotrig0 = rig1;
  632.          rotcol0 = col1 - 1;
  633.          rotrig2 = rig1;
  634.          rotcol2 = col1 + 1;
  635.          rotrig3 = rig1;
  636.          rotcol3 = col1 + 2;
  637.       }
  638.       else if(indicerot == 1 && distdx < 2)
  639.       {
  640.          rotdistdx = 0;
  641.          rotdistsx = 6;
  642.          rotdistup = distup + 3;
  643.          rotrig0 = rig1;
  644.          rotcol0 = 6;
  645.          rotrig1 = rig1;
  646.          rotcol1 = 7;
  647.          rotrig2 = rig1;
  648.          rotcol2 = 8;
  649.          rotrig3 = rig1;
  650.          rotcol3 = 9;
  651.       }
  652.       else
  653.       {
  654.          flag = 1;
  655.       }
  656.       val0 = 2;
  657.       val1 = 2;
  658.       val2 = 2;
  659.       val3 = 2;
  660.    }
  661.    else if(tipoinizio == 2)
  662.    {
  663.       indicerot %= 4;
  664.       if(indicerot == 0 && 0 < distup)
  665.       {
  666.          rotdistdx = distdx + 1;
  667.          rotdistsx = distsx;
  668.          rotdistup = distup - 1;
  669.          rotrig2 = rig0 + 1;
  670.          rotcol2 = col0;
  671.          rotrig3 = rig0 + 2;
  672.          rotcol3 = col0;
  673.       }
  674.       else if(indicerot == 1 && distdx >= 1)
  675.       {
  676.          rotdistdx = distdx - 1;
  677.          rotdistsx = distsx;
  678.          rotdistup = distup + 1;
  679.          rotrig1 = rig2;
  680.          rotcol1 = col2 + 2;
  681.          rotrig3 = rig2;
  682.          rotcol3 = col2 + 1;
  683.       }
  684.       else if(indicerot == 1 && distdx < 1)
  685.       {
  686.          rotdistdx = 0;
  687.          rotdistsx = 7;
  688.          rotdistup = distup + 1;
  689.          rotrig0 = rig0;
  690.          rotcol0 = 7;
  691.          rotrig1 = rig2;
  692.          rotcol1 = 9;
  693.          rotrig2 = rig2;
  694.          rotcol2 = 7;
  695.          rotrig3 = rig2;
  696.          rotcol3 = 8;
  697.       }
  698.       else if(indicerot == 2 && 0 < distup)
  699.       {
  700.          rotdistdx = distdx + 1;
  701.          rotdistsx = distsx;
  702.          rotdistup = distup - 1;
  703.          rotrig0 = rig3 + 1;
  704.          rotrig1 = rig3 - 1;
  705.          rotcol1 = col3;
  706.          rotrig2 = rig3 + 1;
  707.          rotcol2 = col3;
  708.       }
  709.       else if(indicerot == 3 && distdx >= 1)
  710.       {
  711.          rotdistdx = distdx - 1;
  712.          rotdistsx = distsx;
  713.          rotdistup = distup + 1;
  714.          rotrig0 = rig1;
  715.          rotrig2 = rig1;
  716.          rotcol2 = col1 + 1;
  717.          rotcol3 = col1 + 1;
  718.       }
  719.       else if(indicerot == 3 && distdx < 1)
  720.       {
  721.          rotdistdx = 0;
  722.          rotdistsx = 7;
  723.          rotdistup = distup + 1;
  724.          rotrig0 = rig1;
  725.          rotcol0 = 7;
  726.          rotrig1 = rig1;
  727.          rotcol1 = 8;
  728.          rotrig2 = rig1;
  729.          rotcol2 = 9;
  730.          rotrig3 = rig1 + 1;
  731.          rotcol3 = 9;
  732.       }
  733.       else
  734.       {
  735.          flag = 1;
  736.       }
  737.       val0 = 3;
  738.       val1 = 3;
  739.       val2 = 3;
  740.       val3 = 3;
  741.    }
  742.    else if(tipoinizio == 3)
  743.    {
  744.       indicerot %= 4;
  745.       if(indicerot == 0 && 0 < distup)
  746.       {
  747.          rotdistdx = distdx + 1;
  748.          rotdistsx = distsx;
  749.          rotdistup = distup - 1;
  750.          rotrig1 = rig3 + 1;
  751.          rotrig2 = rig3 + 1;
  752.          rotcol2 = col0;
  753.       }
  754.       else if(indicerot == 1 && distdx >= 1)
  755.       {
  756.          rotdistdx = distdx - 1;
  757.          rotdistsx = distsx;
  758.          rotdistup = distup + 1;
  759.          rotcol0 = col3 + 2;
  760.          rotrig1 = rig3;
  761.          rotcol1 = col3 + 2;
  762.          rotrig2 = rig3;
  763.          rotcol2 = col3 + 1;
  764.       }
  765.       else if(indicerot == 1 && distdx < 1)
  766.       {
  767.          rotdistdx = 0;
  768.          rotdistsx = 7;
  769.          rotdistup = distup + 1;
  770.          rotrig0 = rig3 - 1;
  771.          rotcol0 = 9;
  772.          rotrig1 = rig3;
  773.          rotcol1 = 9;
  774.          rotrig2 = rig3;
  775.          rotcol2 = 8;
  776.          rotrig3 = rig3;
  777.          rotcol3 = 7;
  778.       }
  779.       else if(indicerot == 2 && 0 < distup)
  780.       {
  781.          rotdistdx = distdx + 1;
  782.          rotdistsx = distsx;
  783.          rotdistup = distup - 1;
  784.          rotcol0 = col2 - 1;
  785.          rotrig1 = rig2 - 1;
  786.          rotcol1 = col2;
  787.          rotrig3 = rig2 + 1;
  788.          rotcol3 = col2;
  789.       }
  790.       else if(indicerot == 3 && distdx >= 1)
  791.       {
  792.          rotdistdx = distdx - 1;
  793.          rotdistsx = distsx;
  794.          rotdistup = distup + 1;
  795.          rotrig2 = rig0;
  796.          rotcol2 = col1 + 1;
  797.          rotrig3 = rig0 + 1;
  798.          rotcol3 = col0;
  799.       }
  800.       else if(indicerot == 3 && distdx < 1)
  801.       {
  802.          rotdistdx = 0;
  803.          rotdistsx = 7;
  804.          rotdistup = distup + 1;
  805.          rotrig0 = rig0;
  806.          rotcol0 = 7;
  807.          rotrig1 = rig0;
  808.          rotcol1 = 8;
  809.          rotrig2 = rig0;
  810.          rotcol2 = 9;
  811.          rotrig3 = rig0 + 1;
  812.          rotcol3 = 7;
  813.       }
  814.       else
  815.       {
  816.          flag = 1;
  817.       }
  818.       val0 = 4;
  819.       val1 = 4;
  820.       val2 = 4;
  821.       val3 = 4;
  822.    }
  823.    else if(tipoinizio == 4)
  824.    {
  825.       indicerot %= 2;
  826.       if(indicerot == 0 && 0 < distup)
  827.       {
  828.          rotdistdx = distdx + 1;
  829.          rotdistsx = distsx;
  830.          rotdistup = distup - 1;
  831.          rotrig0 = rig2;
  832.          rotrig3 = rig2 + 1;
  833.          rotcol3 = col0;
  834.       }
  835.       else if(indicerot == 1 && distdx >= 1)
  836.       {
  837.          rotdistdx = distdx - 1;
  838.          rotdistsx = distsx;
  839.          rotdistup = distup + 1;
  840.          rotrig0 = rig1;
  841.          rotrig3 = rig2;
  842.          rotcol3 = col2 + 1;
  843.       }
  844.       else if(indicerot == 1 && distdx < 1)
  845.       {
  846.          rotdistdx = 0;
  847.          rotdistsx = 7;
  848.          rotdistup = distup + 1;
  849.          rotrig0 = rig1;
  850.          rotcol0 = 7;
  851.          rotrig1 = rig1;
  852.          rotcol1 = 8;
  853.          rotrig2 = rig2;
  854.          rotcol2 = 8;
  855.          rotrig3 = rig2;
  856.          rotcol3 = 9;
  857.       }
  858.       else
  859.       {
  860.          flag = 1;
  861.       }
  862.       val0 = 5;
  863.       val1 = 5;
  864.       val2 = 5;
  865.       val3 = 5;
  866.    }
  867.    else if(tipoinizio == 5)
  868.    {
  869.       indicerot %= 2;
  870.       if(indicerot == 0 && 0 < distup)
  871.       {
  872.          rotdistdx = distdx + 1;
  873.          rotdistsx = distsx;
  874.          rotdistup = distup - 1;
  875.          rotcol0 = col2;
  876.          rotrig1 = rig3 + 1;
  877.          rotcol1 = col3;
  878.       }
  879.       else if(indicerot == 1 && distdx >= 1)
  880.       {
  881.          rotdistdx = distdx - 1;
  882.          rotdistsx = distsx;
  883.          rotdistup = distup + 1;
  884.          rotcol0 = col3;
  885.          rotrig1 = rig3 - 1;
  886.          rotcol1 = col3 + 1;
  887.       }
  888.       else if(indicerot == 1 && distdx < 1)
  889.       {
  890.          rotdistdx = 0;
  891.          rotdistsx = 7;
  892.          rotdistup = distup + 1;
  893.          rotrig0 = rig0;
  894.          rotcol0 = 8;
  895.          rotrig1 = rig0;
  896.          rotcol1 = 9;
  897.          rotrig2 = rig2;
  898.          rotcol2 = 7;
  899.          rotrig3 = rig2;
  900.          rotcol3 = 8;
  901.       }
  902.       else
  903.       {
  904.          flag = 1;
  905.       }
  906.       val0 = 6;
  907.       val1 = 6;
  908.       val2 = 6;
  909.       val3 = 6;
  910.    }
  911.    else if(tipoinizio == 6)
  912.    {
  913.       indicerot %= 4;
  914.       if(indicerot == 0 && 0 < distup)
  915.       {
  916.          rotdistdx = distdx + 1;
  917.          rotdistsx = distsx;
  918.          rotdistup = distup - 1;
  919.          rotrig1 = rig3;
  920.          rotcol1 = col0;
  921.          rotrig2 = rig3 + 1;
  922.          rotcol2 = col0;
  923.       }
  924.       else if(indicerot == 1 && distdx >= 1)
  925.       {
  926.          rotdistdx = distdx - 1;
  927.          rotdistsx = distsx;
  928.          rotdistup = distup + 1;
  929.          rotcol0 = col3;
  930.          rotrig2 = rig3;
  931.          rotcol2 = col3 + 1;
  932.       }
  933.       else if(indicerot == 1 && distdx < 1)
  934.       {
  935.          rotdistdx = 0;
  936.          rotdistsx = 7;
  937.          rotdistup = distup + 1;
  938.          rotrig0 = rig3 - 1;
  939.          rotcol0 = 8;
  940.          rotrig1 = rig3;
  941.          rotcol1 = 7;
  942.          rotrig2 = rig3;
  943.          rotcol2 = 9;
  944.          rotrig3 = rig3;
  945.          rotcol3 = 8;
  946.       }
  947.       else if(indicerot == 2 && 0 < distup)
  948.       {
  949.          rotdistdx = distdx + 1;
  950.          rotdistsx = distsx;
  951.          rotdistup = distup - 1;
  952.          rotrig2 = rig3 + 1;
  953.          rotcol2 = col3;
  954.       }
  955.       else if(indicerot == 3 && distdx >= 1)
  956.       {
  957.          rotdistdx = distdx - 1;
  958.          rotdistsx = distsx;
  959.          rotdistup = distup + 1;
  960.          rotcol0 = col3 - 1;
  961.          rotrig1 = rig3 - 1;
  962.          rotcol1 = col3;
  963.          rotrig2 = rig3 - 1;
  964.          rotcol2 = col3 + 1;
  965.       }
  966.       else if(indicerot == 3 && distdx < 1)
  967.       {
  968.          rotdistdx = 0;
  969.          rotdistsx = 7;
  970.          rotdistup = distup + 1;
  971.          rotrig0 = rig3 - 1;
  972.          rotcol0 = 7;
  973.          rotrig1 = rig3 - 1;
  974.          rotcol1 = 8;
  975.          rotrig2 = rig3 - 1;
  976.          rotcol2 = 9;
  977.          rotrig3 = rig3;
  978.          rotcol3 = 8;
  979.       }
  980.       else
  981.       {
  982.          flag = 1;
  983.       }
  984.       val0 = 7;
  985.       val1 = 7;
  986.       val2 = 7;
  987.       val3 = 7;
  988.    }
  989.    if(flag == 0 && matsfondo[rotrig0][rotcol0] < 100 && matsfondo[rotrig1][rotcol1] < 100 && matsfondo[rotrig2][rotcol2] < 100 && matsfondo[rotrig3][rotcol3] < 100)
  990.    {
  991.       matsfondo[rig0][col0] = 0;
  992.       matsfondo[rig1][col1] = 0;
  993.       matsfondo[rig2][col2] = 0;
  994.       matsfondo[rig3][col3] = 0;
  995.       Matimage(rig0,col0,0);
  996.       Matimage(rig1,col1,0);
  997.       Matimage(rig2,col2,0);
  998.       Matimage(rig3,col3,0);
  999.       rig0 = rotrig0;
  1000.       col0 = rotcol0;
  1001.       rig1 = rotrig1;
  1002.       col1 = rotcol1;
  1003.       rig2 = rotrig2;
  1004.       col2 = rotcol2;
  1005.       rig3 = rotrig3;
  1006.       col3 = rotcol3;
  1007.       matsfondo[rig0][col0] = val0;
  1008.       matsfondo[rig1][col1] = val1;
  1009.       matsfondo[rig2][col2] = val2;
  1010.       matsfondo[rig3][col3] = val3;
  1011.       Matimage(rig0,col0,val0);
  1012.       Matimage(rig1,col1,val1);
  1013.       Matimage(rig2,col2,val2);
  1014.       Matimage(rig3,col3,val3);
  1015.       distdx = rotdistdx;
  1016.       distsx = rotdistsx;
  1017.       distup = rotdistup;
  1018.       indicerot++;
  1019.    }
  1020. }
  1021. function Shiftbasso()
  1022. {
  1023.    if(distup != 0)
  1024.    {
  1025.       if(matsfondo[rig0 + 1][col0] < 100 && matsfondo[rig1 + 1][col1] < 100 && matsfondo[rig2 + 1][col2] < 100 && matsfondo[rig3 + 1][col3] < 100)
  1026.       {
  1027.          matsfondo[rig0][col0] = 0;
  1028.          matsfondo[rig1][col1] = 0;
  1029.          matsfondo[rig2][col2] = 0;
  1030.          matsfondo[rig3][col3] = 0;
  1031.          Matimage(rig0,col0,0);
  1032.          Matimage(rig1,col1,0);
  1033.          Matimage(rig2,col2,0);
  1034.          Matimage(rig3,col3,0);
  1035.          matsfondo[++rig0][col0] = val0;
  1036.          matsfondo[++rig1][col1] = val1;
  1037.          matsfondo[++rig2][col2] = val2;
  1038.          matsfondo[++rig3][col3] = val3;
  1039.          Matimage(rig0,col0,val0);
  1040.          Matimage(rig1,col1,val1);
  1041.          Matimage(rig2,col2,val2);
  1042.          Matimage(rig3,col3,val3);
  1043.          distup--;
  1044.          x = 1;
  1045.       }
  1046.       else
  1047.       {
  1048.          matsfondo[rig0][col0] = val0 + 100;
  1049.          matsfondo[rig1][col1] = val1 + 100;
  1050.          matsfondo[rig2][col2] = val2 + 100;
  1051.          matsfondo[rig3][col3] = val3 + 100;
  1052.          x = 0;
  1053.          if(distup >= maxrig - 2)
  1054.          {
  1055.             setProperty(scrittafine2, _visible, true);
  1056.             gotoAndPlay(90);
  1057.          }
  1058.          else
  1059.          {
  1060.             punti = (puntiliv * puntiliv + puntiliv * distup) * puntidoppi;
  1061.             punteggio += punti;
  1062.             setProperty(scrittapunti2, _X, posx + (distsx + (maxcol - (distsx + distdx)) / 2) * larg - sfasoriz);
  1063.             setProperty(scrittapunti2, _Y, sfasvert + posy + (maxrig - distup) * alt);
  1064.             scrittapunti2.play();
  1065.             gotoAndPlay(42);
  1066.          }
  1067.       }
  1068.    }
  1069.    else
  1070.    {
  1071.       matsfondo[rig0][col0] = val0 + 100;
  1072.       matsfondo[rig1][col1] = val1 + 100;
  1073.       matsfondo[rig2][col2] = val2 + 100;
  1074.       matsfondo[rig3][col3] = val3 + 100;
  1075.       x = 0;
  1076.       punti = puntiliv * puntiliv * puntidoppi;
  1077.       punteggio += punti;
  1078.       setProperty(scrittapunti2, _X, posx + (distsx + (maxcol - (distsx + distdx)) / 2) * larg - sfasoriz);
  1079.       setProperty(scrittapunti2, _Y, sfasvert + posy + (maxrig - distup) * alt);
  1080.       scrittapunti2.play();
  1081.       gotoAndPlay(42);
  1082.    }
  1083. }
  1084. posx = 35;
  1085. posy = 35;
  1086. larg = 15;
  1087. alt = 15;
  1088. sfasoriz = 8;
  1089. sfasvert = -10;
  1090. nummaxliv = 11;
  1091. nummaxcrediti = 5;
  1092. numlevel = 0;
  1093. numrig = 0;
  1094. numrigrimanenti = 0;
  1095. numrigeliminate = 0;
  1096. numcicli = 0;
  1097. maxrig = 22;
  1098. maxcol = 10;
  1099. rig0 = 0;
  1100. col0 = 0;
  1101. rigind = 0;
  1102. colind = Math.floor(maxcol / 2) - 1;
  1103. verificainiziale = 0;
  1104. bloccoshift = 0;
  1105. cicloriga = 0;
  1106. contacol = 0;
  1107. alp = 100;
  1108. punti = 0;
  1109. punteggio = 0;
  1110. recordpunti = 10000;
  1111.