david santiago buendia rincon / Mbed 2 deprecated SONIDOSOS

Dependencies:   mbed wave_player SDFileSystem TextLCD

Embed: (wiki syntax)

« Back to documentation index

Show/hide line numbers main.cpp Source File

main.cpp

00001 #include "mbed.h"
00002 #include "SDFileSystem.h"
00003 #include <wave_player.h>
00004 #include "TextLCD.h"
00005 
00006 Ticker columna;
00007 Ticker imagen;
00008 
00009  AnalogOut DAcout (PTE30);
00010 SDFileSystem sd(D11, D12, D13, D10, "sd"); // the pinout on the mbed Cool Components workshop board
00011  wave_player waver(&DAcout);
00012  
00013  TextLCD lcd(PTE20,PTE21,PTB0,PTB1,PTB2,PTB3,TextLCD::LCD16x2);//Asignación de pines para rs, e, d4, d5. d6,d7
00014 DigitalOut red(LED1,1);
00015 DigitalOut green(LED2,1);
00016 BusOut colum(PTE5,PTE4,PTE3,PTE2,PTB11,PTB10,PTB9,PTB8);
00017 BusOut row(PTC7,PTC0,PTC3,PTC4,PTC5,PTC6,PTC10,PTC11);
00018 BusOut colum_2(PTD5,PTA13,PTD4,PTA12,PTA4,PTA5,PTC8,PTC9);
00019 BusOut row_2(PTC12,PTC13,PTC16,PTC17,PTA16,PTA17,PTD6,PTD7);
00020 
00021 Serial pc(USBTX,USBRX);
00022 
00023 int perder=0;
00024 int counter=0;
00025 int cambio_im=0;
00026 int im_escogida=0;
00027 int figura_dib[8];
00028 char serial;
00029 const char cuadrado[8]={0xFF,   0x81,   0x81,   0x81,   0x81,   0x81,   0x81,   0xFF};
00030 const char triangulo[8]={0xFF,  0x41,   0x21,   0x11,   0x9,    0x5,    0x3,    0x1};
00031 const char rombo[8]={0x18,  0x24,   0x42,   0x42,   0x42,   0x42,   0x24,   0x18};
00032 const char triste[8]={0x3C, 0x42,   0xA5,   0x81,   0x99,   0xA5,   0x42,   0x3C};
00033 const char feliz[8]={0x3C,  0x42,   0xA5,   0x81,   0xA5,   0x99,   0x42,   0x3C};
00034 int seg1=0; //Variable para contador de unidades de segundo
00035 int seg2=0; //Variable para contador de décimas de segundo
00036 int min1=0; //Variable para contador de unidades de minuto
00037 
00038 int l1=0;
00039 int l2=0;
00040 int l3=0;
00041 int l4=0;
00042 int l5=0;
00043 int l6=0;
00044 int l7=0;
00045 int l8=0;
00046 
00047 int l9=0;
00048 int l10=0;
00049 int l11=0;
00050 int l12=0;
00051 int l13=0;
00052 int l14=0;
00053 int l15=0;
00054 int l16=0;
00055 
00056 int l17=0;
00057 int l18=0;
00058 int l19=0;
00059 int l20=0;
00060 int l21=0;
00061 int l22=0;
00062 int l23=0;
00063 int l24=0;
00064 
00065 int l25=0;
00066 int l26=0;
00067 int l27=0;
00068 int l28=0;
00069 int l29=0;
00070 int l30=0;
00071 int l31=0;
00072 int l32=0;
00073 
00074 int l33=0;
00075 int l34=0;
00076 int l35=0;
00077 int l36=0;
00078 int l37=0;
00079 int l38=0;
00080 int l39=0;
00081 int l40=0;
00082 
00083 int l41=0;
00084 int l42=0;
00085 int l43=0;
00086 int l44=0;
00087 int l45=0;
00088 int l46=0;
00089 int l47=0;
00090 int l48=0;
00091 
00092 int l49=0;
00093 int l50=0;
00094 int l51=0;
00095 int l52=0;
00096 int l53=0;
00097 int l54=0;
00098 int l55=0;
00099 int l56=0;
00100 
00101 int l57=0;
00102 int l58=0;
00103 int l59=0;
00104 int l60=0;
00105 int l61=0;
00106 int l62=0;
00107 int l63=0;
00108 int l64=0;
00109 
00110 void receivedByte()
00111 {
00112     serial = pc.getc();
00113    if(serial=='/') {
00114         red=!red;
00115     }
00116     if(serial=='*') {
00117         green=!green;
00118     }
00119         if(serial=='a') {
00120            l1=!l1;      
00121     }    
00122         if(serial=='b') {
00123            l2=!l2;      
00124     }     
00125         if(serial=='c') {
00126            l3=!l3;      
00127     }     
00128         if(serial=='d') {
00129            l4=!l4;      
00130     }     
00131         if(serial=='e') {
00132            l5=!l5;      
00133     }
00134         if(serial=='f') {
00135            l6=!l6;      
00136     }     
00137         if(serial=='g') {
00138            l7=!l7;      
00139     }     
00140         if(serial=='h') {
00141            l8=!l8;      
00142     } 
00143         if(serial=='i') {
00144            l9=!l9;      
00145     }
00146         if(serial=='j') {
00147            l10=!l10;      
00148     }
00149         if(serial=='k') {
00150            l11=!l11;      
00151     }
00152         if(serial=='l') {
00153            l12=!l12;      
00154     }
00155         if(serial=='m') {
00156            l13=!l13;      
00157     }
00158         if(serial=='n') {
00159            l14=!l14;      
00160     }
00161         if(serial=='o') {
00162            l15=!l15;      
00163     }
00164         if(serial=='p') {
00165            l16=!l16;      
00166     }    
00167         if(serial=='q') {
00168            l17=!l17;      
00169     }
00170         if(serial=='r') {
00171            l18=!l18;      
00172     }
00173         if(serial=='s') {
00174            l19=!l19;      
00175     }
00176         if(serial=='t') {
00177            l20=!l20;      
00178     }
00179         if(serial=='u') {
00180            l21=!l21;      
00181     }
00182         if(serial=='v') {
00183            l22=!l22;      
00184     }
00185         if(serial=='w') {
00186            l23=!l23;      
00187     }
00188         if(serial=='x') {
00189            l24=!l24;      
00190     }       
00191         if(serial=='y') {
00192            l25=!l25;      
00193     } 
00194         if(serial=='z') {
00195            l26=!l26;      
00196     } 
00197         if(serial=='A') {
00198            l27=!l27;      
00199     } 
00200         if(serial=='B') {
00201            l28=!l28;      
00202     } 
00203         if(serial=='C') {
00204            l29=!l29;      
00205     } 
00206         if(serial=='D') {
00207            l30=!l30;      
00208     } 
00209         if(serial=='E') {
00210            l31=!l31;      
00211     } 
00212         if(serial=='F') {
00213            l32=!l32;      
00214     }  
00215         if(serial=='G') {
00216            l33=!l33;      
00217     }
00218         if(serial=='H') {
00219            l34=!l34;      
00220     }
00221         if(serial=='I') {
00222            l35=!l35;      
00223     }
00224         if(serial=='J') {
00225            l36=!l36;      
00226     }
00227         if(serial=='K') {
00228            l37=!l37;      
00229     }
00230         if(serial=='L') {
00231            l38=!l38;      
00232     }
00233         if(serial=='M') {
00234            l39=!l39;      
00235     }
00236         if(serial=='N') {
00237            l40=!l40;      
00238     }     
00239         if(serial=='O') {
00240            l41=!l41;      
00241     } 
00242         if(serial=='P') {
00243            l42=!l42;      
00244     } 
00245         if(serial=='Q') {
00246            l43=!l43;      
00247     } 
00248         if(serial=='R') {
00249            l44=!l44;      
00250     } 
00251         if(serial=='S') {
00252            l45=!l45;      
00253     } 
00254         if(serial=='T') {
00255            l46=!l46;      
00256     } 
00257         if(serial=='U') {
00258            l47=!l47;      
00259     } 
00260         if(serial=='V') {
00261            l48=!l48;      
00262     }  
00263         if(serial=='W') {
00264            l49=!l49;      
00265     }  
00266         if(serial=='X') {
00267            l50=!l50;      
00268     }  
00269         if(serial=='Y') {
00270            l51=!l51;      
00271     }  
00272         if(serial=='Z') {
00273            l52=!l52;      
00274     }  
00275         if(serial=='0') {
00276            l53=!l53;      
00277     }  
00278         if(serial=='&') {
00279            l54=!l54;      
00280     }  
00281         if(serial=='2') {
00282            l55=!l55;      
00283     }  
00284         if(serial=='3') {
00285            l56=!l56;      
00286     } 
00287         if(serial=='4') {
00288            l57=!l57;      
00289     } 
00290         if(serial=='5') {
00291            l58=!l58;      
00292     } 
00293         if(serial=='6') {
00294            l59=!l59;      
00295     } 
00296         if(serial=='7') {
00297            l60=!l60;      
00298     } 
00299         if(serial=='8') {
00300            l61=!l61;      
00301     } 
00302         if(serial=='9') {
00303            l62=!l62;      
00304     } 
00305         if(serial=='+') {
00306            l63=!l63;      
00307     } 
00308         if(serial=='-') {
00309            l64=!l64;      
00310     } 
00311 ///////////   
00312         if(serial=='!') {
00313            cambio_im=1; 
00314            im_escogida=0;
00315 l1=0;
00316  l2=0;
00317  l3=0;
00318  l4=0;
00319  l5=0;
00320  l6=0;
00321  l7=0;
00322  l8=0;
00323 
00324  l9=0;
00325  l10=0;
00326  l11=0;
00327  l12=0;
00328  l13=0;
00329  l14=0;
00330  l15=0;
00331  l16=0;
00332 
00333  l17=0;
00334  l18=0;
00335  l19=0;
00336  l20=0;
00337  l21=0;
00338  l22=0;
00339  l23=0;
00340  l24=0;
00341 
00342  l25=0;
00343  l26=0;
00344  l27=0;
00345  l28=0;
00346  l29=0;
00347  l30=0;
00348  l31=0;
00349  l32=0;
00350 
00351  l33=0;
00352  l34=0;
00353  l35=0;
00354  l36=0;
00355  l37=0;
00356  l38=0;
00357  l39=0;
00358  l40=0;
00359 
00360  l41=0;
00361  l42=0;
00362  l43=0;
00363  l44=0;
00364  l45=0;
00365  l46=0;
00366  l47=0;
00367  l48=0;
00368 
00369  l49=0;
00370  l50=0;
00371  l51=0;
00372  l52=0;
00373  l53=0;
00374  l54=0;
00375  l55=0;
00376  l56=0;
00377 
00378  l57=0;
00379  l58=0;
00380  l59=0;
00381  l60=0;
00382  l61=0;
00383  l62=0;
00384  l63=0;
00385  l64=0;                
00386     }    
00387         if(serial=='.') {
00388            cambio_im=0;
00389            im_escogida=1;      
00390     }     
00391         if(serial=='?') {
00392            cambio_im=0;
00393            im_escogida=2;      
00394     }     
00395         if(serial=='=') {
00396            cambio_im=0;
00397            im_escogida=3;      
00398     }                    
00399         if(serial=='%') {  
00400  l1=0;
00401  l2=0;
00402  l3=0;
00403  l4=0;
00404  l5=0;
00405  l6=0;
00406  l7=0;
00407  l8=0;
00408 
00409  l9=0;
00410  l10=0;
00411  l11=0;
00412  l12=0;
00413  l13=0;
00414  l14=0;
00415  l15=0;
00416  l16=0;
00417 
00418  l17=0;
00419  l18=0;
00420  l19=0;
00421  l20=0;
00422  l21=0;
00423  l22=0;
00424  l23=0;
00425  l24=0;
00426 
00427  l25=0;
00428  l26=0;
00429  l27=0;
00430  l28=0;
00431  l29=0;
00432  l30=0;
00433  l31=0;
00434  l32=0;
00435 
00436  l33=0;
00437  l34=0;
00438  l35=0;
00439  l36=0;
00440  l37=0;
00441  l38=0;
00442  l39=0;
00443  l40=0;
00444 
00445  l41=0;
00446  l42=0;
00447  l43=0;
00448  l44=0;
00449  l45=0;
00450  l46=0;
00451  l47=0;
00452  l48=0;
00453 
00454  l49=0;
00455  l50=0;
00456  l51=0;
00457  l52=0;
00458  l53=0;
00459  l54=0;
00460  l55=0;
00461  l56=0;
00462 
00463  l57=0;
00464  l58=0;
00465  l59=0;
00466  l60=0;
00467  l61=0;
00468  l62=0;
00469  l63=0;
00470  l64=0;  
00471     }                                                                                                                                                                                                                                                             
00472 }
00473 
00474 void cambio(){
00475     if(cambio_im>0){
00476     cambio_im++;
00477       if(cambio_im==4){
00478           cambio_im=1;
00479       }
00480     }
00481 }
00482 
00483 void reloj(){//Subrutina para generar reloj de 6 segmentos
00484     lcd.locate(9,1);//Posicionamiento de las unidades de segundo
00485     lcd.printf("%i", seg1);
00486     lcd.locate(8,1);//Posicionamiento de las décimas de segundo
00487     lcd.printf("%i",seg2);
00488     lcd.locate(7,1);//Posicionamiento del doble punto
00489     lcd.printf(":");
00490     lcd.locate(6,1);//Posicionamiento de las unidades de minuto
00491     lcd.printf("%i",min1);
00492     lcd.locate(5,1);//Posicionamiento de las décimas de minuto
00493 }
00494             
00495 void visualiza(){ 
00496 
00497 //
00498 ///
00499 ////
00500 /////
00501 if(l1==1){
00502    if(l2==1){
00503       if(l3==1){
00504          if(l4==1){
00505             if(l5==1){
00506                if(l6==1){
00507                   if(l7==1){
00508                      if(l8==1){
00509                         figura_dib[0]=0xFF;
00510                      }
00511                        else{
00512                          figura_dib[0]=0xFE;
00513                        }
00514                    }
00515                     else if(l8==1){
00516                         figura_dib[0]=0xFD;
00517                     }
00518                      else{
00519                        figura_dib[0]=0xFC;
00520                      }
00521                }
00522                 else if(l7==1){
00523                     if(l8==1){
00524                        figura_dib[0]=0xFB;
00525                     }
00526                      else{
00527                        figura_dib[0]=0xFA;
00528                      }
00529                 }
00530                  else if(l8==1){
00531                      figura_dib[0]=0xF9;
00532                  }
00533                   else{
00534                     figura_dib[0]=0xF8;
00535                   }
00536              }
00537               else if(l6==1){
00538                   if(l7==1){
00539                     if(l8==1){
00540                       figura_dib[0]=0xF7;
00541                     }
00542                      else{
00543                        figura_dib[0]=0xF6;
00544                      }
00545                    }
00546                     else if(l8==1){
00547                         figura_dib[0]=0xF5;
00548                     }
00549                      else{
00550                        figura_dib[0]=0xF4;
00551                      }
00552                }
00553                 else if(l7==1){
00554                     if(l8==1){
00555                       figura_dib[0]=0xF3;
00556                     }
00557                      else{
00558                        figura_dib[0]=0xF2;
00559                      }
00560                 }
00561                  else if(l8==1){
00562                      figura_dib[0]=0xF1;
00563                  }
00564                   else{
00565                     figura_dib[0]=0xF0;
00566                   }
00567          }
00568           else if(l5==1){
00569               if(l6==1){
00570                 if(l7==1){
00571                   if(l8==1){
00572                     figura_dib[0]=0xEF;
00573                   }
00574                    else{
00575                     figura_dib[0]=0xEE;
00576                    }
00577                 }
00578                  else if(l8==1){
00579                     figura_dib[0]=0xED;
00580                  }
00581                   else{
00582                     figura_dib[0]=0xEC;
00583                   }
00584               }
00585                else if(l7==1){
00586                    if(l8==1){
00587                       figura_dib[0]=0xEB;
00588                    }
00589                     else{
00590                       figura_dib[0]=0xEA;
00591                     }
00592                }
00593                 else if(l8==1){
00594                     figura_dib[0]=0xE9;
00595                 }
00596                  else{
00597                    figura_dib[0]=0xE8;
00598                  }                   
00599           }
00600            else if(l6==1){
00601                if(l7==1){
00602                  if(l8==1){
00603                    figura_dib[0]=0xE7;
00604                  }
00605                  else{
00606                    figura_dib[0]=0xE6;
00607                  }
00608                }
00609                 else if(l8==1){
00610                     figura_dib[0]=0xE5;
00611                 }
00612                  else{
00613                    figura_dib[0]=0xE4;
00614                  }
00615             }
00616              else if(l7==1){
00617                  if(l8==1){
00618                     figura_dib[0]=0xE3;
00619                  }
00620                   else{
00621                     figura_dib[0]=0xE2;
00622                   }
00623              }
00624               else if(l8==1){
00625                   figura_dib[0]=0xE1;
00626               }
00627                else{
00628                  figura_dib[0]=0xE0;
00629                }
00630       }
00631        else if(l4==1){
00632           if(l5==1){
00633             if(l6==1){
00634               if(l7==1){
00635                 if(l8==1){
00636                   figura_dib[0]=0xDF;
00637                 }
00638                  else{
00639                   figura_dib[0]=0xDE;
00640                  }
00641               }
00642                else if(l8==1){
00643                   figura_dib[0]=0xDD;
00644                }
00645                 else{
00646                   figura_dib[0]=0xDC;
00647                 }
00648             }
00649              else if(l7==1){
00650                 if(l8==1){
00651                   figura_dib[0]=0xDB;
00652                 }
00653                  else{
00654                    figura_dib[0]=0xDA;
00655                  }
00656              }
00657               else if(l8==1){
00658                   figura_dib[0]=0xD9;
00659               }
00660                else{
00661                  figura_dib[0]=0xD8;
00662                }
00663           }
00664            else if(l6==1){
00665                if(l7==1){
00666                  if(l8==1){
00667                    figura_dib[0]=0xD7;
00668                  }
00669                   else{
00670                     figura_dib[0]=0xD6;
00671                   }
00672                 }
00673                  else if(l8==1){
00674                      figura_dib[0]=0xD5;
00675                  }
00676                   else{
00677                     figura_dib[0]=0xD4;
00678                   }
00679            }
00680             else if(l7==1){
00681                 if(l8==1){
00682                   figura_dib[0]=0xD3;
00683                 }
00684                  else{
00685                    figura_dib[0]=0xD2;
00686                  }
00687             }
00688              else if(l8==1){
00689                  figura_dib[0]=0xD1;
00690              }
00691               else{
00692                 figura_dib[0]=0xD0;
00693               }
00694        }
00695         else if(l5==1){
00696             if(l6==1){
00697               if(l7==1){
00698                 if(l8==1){
00699                   figura_dib[0]=0xCF;
00700                 }
00701                  else{
00702                    figura_dib[0]=0xCE;
00703                  }
00704                }
00705                 else if(l8==1){
00706                     figura_dib[0]=0xCD;
00707                 }
00708                  else{
00709                    figura_dib[0]=0xCC;
00710                  }
00711              }
00712               else if(l7==1){
00713                   if(l8==1){
00714                     figura_dib[0]=0xCB;
00715                   }
00716                    else{
00717                      figura_dib[0]=0xCA;
00718                    }
00719               }
00720                else if(l8==1){
00721                    figura_dib[0]=0xC9;
00722                }
00723                 else{
00724                   figura_dib[0]=0xC8;
00725                 }
00726         }
00727          else if(l6==1){
00728              if(l7==1){
00729                if(l8==1){
00730                  figura_dib[0]=0xC7;
00731                }
00732                 else{
00733                   figura_dib[0]=0xC6;
00734                 }
00735              }
00736               else if(l8==1){
00737                   figura_dib[0]=0xC5;
00738               }
00739                else{
00740                  figura_dib[0]=0xC4;
00741                }
00742          }
00743           else if(l7==1){
00744               if(l8==1){
00745                 figura_dib[0]=0xC3;
00746               }  
00747                else{
00748                  figura_dib[0]=0xC2;
00749                }
00750           }
00751            else if(l8==1){
00752                figura_dib[0]=0xC1;
00753             }
00754              else{
00755                figura_dib[0]=0xC0;
00756              }
00757    }
00758     else if(l3==1){
00759         if(l4==1){
00760           if(l5==1){
00761             if(l6==1){
00762               if(l7==1){
00763                 if(l8==1){
00764                   figura_dib[0]=0xBF;
00765                 }
00766                  else{
00767                    figura_dib[0]=0xBE;
00768                  }
00769               }
00770                else if(l8==1){
00771                    figura_dib[0]=0xBD;
00772                }
00773                 else{
00774                   figura_dib[0]=0xBC;
00775                 }
00776             }
00777              else if(l7==1){
00778                  if(l8==1){
00779                     figura_dib[0]=0xBB;
00780                  }
00781                   else{
00782                     figura_dib[0]=0xBA;
00783                   }
00784              }
00785               else if(l8==1){
00786                   figura_dib[0]=0xB9;
00787               }
00788                else{
00789                  figura_dib[0]=0xB8;
00790                }
00791           }
00792            else if(l6==1){
00793                if(l7==1){
00794                  if(l8==1){
00795                    figura_dib[0]=0xB7;
00796                  }
00797                   else{
00798                     figura_dib[0]=0xB6;
00799                   }
00800                }
00801                 else if(l8==1){
00802                     figura_dib[0]=0xB5;
00803                 }
00804                  else{
00805                    figura_dib[0]=0xB4;
00806                  }
00807             }
00808              else if(l7==1){
00809                  if(l8==1){
00810                    figura_dib[0]=0xB3;
00811                  }
00812                   else{
00813                     figura_dib[0]=0xB2;
00814                   }
00815              }
00816               else if(l8==1){
00817                   figura_dib[0]=0xB1;
00818               }
00819                else{
00820                  figura_dib[0]=0xB0;
00821                }
00822         }
00823          else if(l5==1){
00824              if(l6==1){
00825                if(l7==1){
00826                  if(l8==1){
00827                    figura_dib[0]=0xAF;
00828                  }
00829                   else{
00830                     figura_dib[0]=0xAE;
00831                   }
00832                }
00833                 else if(l8==1){
00834                     figura_dib[0]=0xAD;
00835                 }
00836                  else{
00837                    figura_dib[0]=0xAC;
00838                  }
00839               }
00840                else if(l7==1){
00841                    if(l8==1){
00842                      figura_dib[0]=0xAB;
00843                    }
00844                     else{
00845                       figura_dib[0]=0xAA;
00846                     }
00847                }
00848                 else if(l8==1){
00849                     figura_dib[0]=0xA9;
00850                 }
00851                  else{
00852                    figura_dib[0]=0xA8;
00853                  }
00854          }
00855           else if(l6==1){
00856               if(l7==1){
00857                 if(l8==1){
00858                   figura_dib[0]=0xA7;
00859                 }
00860                  else{
00861                    figura_dib[0]=0xA6;
00862                  }
00863                }
00864                 else if(l8==1){
00865                     figura_dib[0]=0xA5;
00866                 }
00867                  else{
00868                    figura_dib[0]=0xA4;
00869                  }
00870            }
00871             else if(l7==1){
00872                 if(l8==1){
00873                   figura_dib[0]=0xA3;
00874                 }
00875                  else{
00876                    figura_dib[0]=0xA2;
00877                  }
00878             }
00879              else if(l8==1){
00880                  figura_dib[0]=0xA1;
00881              }
00882               else{
00883                 figura_dib[0]=0xA0;
00884               }
00885     }
00886      else if(l4==1){
00887          if(l5==1){
00888            if(l6==1){
00889              if(l7==1){
00890                if(l8==1){
00891                  figura_dib[0]=0x9F;
00892                }
00893                 else{
00894                   figura_dib[0]=0x9E;
00895                 }
00896              }
00897               else if(l8==1){
00898                   figura_dib[0]=0x9D;
00899               }
00900                else{
00901                  figura_dib[0]=0x9C;
00902                }
00903            }
00904             else if(l7==1){
00905                 if(l8==1){
00906                   figura_dib[0]=0x9B;
00907                 }
00908                  else{
00909                    figura_dib[0]=0x9A;
00910                  }
00911             }
00912              else if(l8==1){
00913                  figura_dib[0]=0x99;
00914              }
00915               else{
00916                 figura_dib[0]=0x98;
00917               }
00918          }
00919           else if(l6==1){
00920               if(l7==1){
00921                 if(l8==1){
00922                   figura_dib[0]=0x97;
00923                 }
00924                  else{
00925                    figura_dib[0]=0x96;
00926                  }
00927                }
00928                 else if(l8==1){
00929                     figura_dib[0]=0x95;
00930                 }
00931                  else{
00932                    figura_dib[0]=0x94;
00933                  }
00934            }
00935             else if(l7==1){
00936                 if(l8==1){
00937                   figura_dib[0]=0x93;
00938                 }
00939                  else{
00940                    figura_dib[0]=0x92;
00941                  }
00942             }
00943              else if(l8==1){
00944                  figura_dib[0]=0x91;
00945              }
00946               else{
00947                 figura_dib[0]=0x90;
00948               }
00949       }
00950        else if(l5==1){
00951            if(l6==1){
00952              if(l7==1){
00953                if(l8==1){
00954                  figura_dib[0]=0x8F;
00955                }
00956                else{
00957                  figura_dib[0]=0x8E;
00958                }
00959              }
00960               else if(l8==1){
00961                  figura_dib[0]=0x8D;
00962               }
00963                else{
00964                  figura_dib[0]=0x8C;
00965                }
00966            }
00967             else if(l7==1){
00968                 if(l8==1){
00969                   figura_dib[0]=0x8B;
00970                 }
00971                  else{
00972                    figura_dib[0]=0x8A;
00973                  }
00974             }
00975              else if(l8==1){
00976                  figura_dib[0]=0x89;
00977              }
00978               else{
00979                 figura_dib[0]=0x88;
00980               }
00981        }
00982         else if(l6==1){
00983             if(l7==1){
00984               if(l8==1){
00985                 figura_dib[0]=0x87;
00986               }
00987                else{
00988                  figura_dib[0]=0x86;
00989                }
00990             }
00991              else if(l8==1){
00992                  figura_dib[0]=0x85;
00993              }
00994               else{
00995                 figura_dib[0]=0x84;
00996               }
00997          }
00998           else if(l7==1){
00999               if(l8==1){
01000                  figura_dib[0]=0x83;
01001               }
01002                else{
01003                  figura_dib[0]=0x82;
01004                }
01005           }
01006            else if(l8==1){
01007                figura_dib[0]=0x81;
01008            }
01009             else{
01010               figura_dib[0]=0x80;
01011             }
01012 }
01013  else if(l2==1){
01014      if(l3==1){
01015        if(l4==1){
01016          if(l5==1){
01017             if(l6==1){
01018                if(l7==1){
01019                   if(l8==1){
01020                     figura_dib[0]=0x7F;
01021                   }
01022                    else{                       
01023                      figura_dib[0]=0x7E;
01024                    }
01025                 }
01026                  else if(l8==1){
01027                      figura_dib[0]=0x7D;
01028                  }
01029                   else{
01030                     figura_dib[0]=0x7C;
01031                   }
01032             }
01033              else if(l7==1){
01034                  if(l8==1){
01035                    figura_dib[0]=0x7B;
01036                  }
01037                   else{
01038                     figura_dib[0]=0x7A;
01039                   }
01040              }
01041               else if(l8==1){
01042                   figura_dib[0]=0x79;
01043               }
01044                else{
01045                  figura_dib[0]=0x78;
01046                }                                           
01047          }
01048           else if(l6==1){
01049               if(l7==1){
01050                 if(l8==1){
01051                   figura_dib[0]=0x77;
01052                 }
01053                 else{
01054                   figura_dib[0]=0x76;
01055                 }
01056               }
01057                else if(l8==1){
01058                    figura_dib[0]=0x75;
01059                }
01060                 else{
01061                   figura_dib[0]=0x74;
01062                 }
01063           }
01064            else if(l7==1){
01065                if(l8==1){
01066                  figura_dib[0]=0x73;
01067                }
01068                 else{
01069                  figura_dib[0]=0x72;
01070                 }
01071            }
01072             else if(l8==1){
01073                 figura_dib[0]=0x71;
01074             }
01075              else{
01076                figura_dib[0]=0x70;
01077              }
01078        }
01079         else if(l5==1){
01080             if(l6==1){
01081               if(l7==1){
01082                 if(l8==1){
01083                   figura_dib[0]=0x6F;
01084                 }
01085                  else{
01086                    figura_dib[0]=0x6E;
01087                  }
01088                }
01089                 else if(l8==1){
01090                     figura_dib[0]=0x6D;
01091                 }
01092                  else{
01093                    figura_dib[0]=0x6C;
01094                  }
01095             }
01096              else if(l7==1){
01097                 if(l8==1){
01098                   figura_dib[0]=0x6B;
01099                 }
01100                  else{
01101                    figura_dib[0]=0x6A;
01102                   }
01103              }
01104               else if(l8==1){
01105                  figura_dib[0]=0x69;
01106               }
01107                else{
01108                  figura_dib[0]=0x68;
01109                }                                                              
01110         }
01111          else if(l6==1){
01112              if(l7==1){
01113                if(l8==1){
01114                  figura_dib[0]=0x67;
01115                }
01116                 else{
01117                   figura_dib[0]=0x66;
01118                 }
01119               }
01120                else if(l8==1){
01121                    figura_dib[0]=0x65;
01122                }
01123                 else{
01124                   figura_dib[0]=0x64;
01125                 }
01126           }
01127            else if(l7==1){
01128                if(l8==1){
01129                  figura_dib[0]=0x63;
01130                 }
01131                  else{
01132                    figura_dib[0]=0x62;
01133                  }
01134            }
01135             else if(l8==1){
01136                 figura_dib[0]=0x61;
01137             }
01138              else{
01139                figura_dib[0]=0x60;
01140              }
01141      }
01142       else if(l4==1){
01143           if(l5==1){
01144             if(l6==1){
01145               if(l7==1){
01146                 if(l8==1){
01147                   figura_dib[0]=0x5F;
01148                 }
01149                  else{
01150                    figura_dib[0]=0x5E;
01151                  }
01152               }
01153                else if(l8==1){
01154                    figura_dib[0]=0x5D;
01155                }
01156                 else{
01157                   figura_dib[0]=0x5C;
01158                 }
01159             }
01160              else if(l7==1){
01161                  if(l8==1){
01162                    figura_dib[0]=0x5B;
01163                  }
01164                   else{
01165                     figura_dib[0]=0x5A;
01166                   }
01167               }
01168                else if(l8==1){
01169                    figura_dib[0]=0x59;
01170                }
01171                 else{
01172                   figura_dib[0]=0x58;
01173                 }                                                           
01174           }
01175            else if(l6==1){
01176                if(l7==1){
01177                  if(l8==1){
01178                    figura_dib[0]=0x57;
01179                  }
01180                   else{
01181                     figura_dib[0]=0x56;
01182                   }
01183                }
01184                 else if(l8==1){
01185                    figura_dib[0]=0x55;
01186                 }
01187                  else{
01188                    figura_dib[0]=0x54;
01189                  }
01190            }
01191             else if(l7==1){
01192                 if(l8==1){
01193                   figura_dib[0]=0x53;
01194                 }
01195                  else{
01196                    figura_dib[0]=0x52;
01197                  }
01198             }
01199              else if(l8==1){
01200                  figura_dib[0]=0x51;
01201              }
01202               else{
01203                 figura_dib[0]=0x50;
01204               }
01205       }
01206        else if(l5==1){
01207            if(l6==1){
01208              if(l7==1){
01209                 if(l8==1){
01210                   figura_dib[0]=0x4F;
01211                 }
01212                  else{
01213                    figura_dib[0]=0x4E;
01214                  }
01215              }
01216               else if(l8==1){
01217                   figura_dib[0]=0x4D;
01218               }
01219                else{
01220                  figura_dib[0]=0x4C;
01221                }       
01222            }
01223             else if(l7==1){
01224                 if(l8==1){
01225                   figura_dib[0]=0x4B;
01226                 }
01227                  else{
01228                    figura_dib[0]=0x4A;
01229                  }
01230              }
01231               else if(l8==1){
01232                   figura_dib[0]=0x49;
01233               }
01234                else{
01235                  figura_dib[0]=0x48;
01236                }      
01237        }
01238         else if(l6==1){
01239             if(l7==1){
01240                if(l8==1){
01241                  figura_dib[0]=0x47;
01242                }
01243                 else{
01244                   figura_dib[0]=0x46;
01245                 }
01246             }
01247              else if(l8==1){
01248                  figura_dib[0]=0x45;
01249              }
01250               else{
01251                 figura_dib[0]=0x44;
01252               }
01253         }
01254          else if(l7==1){
01255              if(l8==1){
01256                figura_dib[0]=0x43;
01257              }
01258               else{
01259                 figura_dib[0]=0x42;
01260               }
01261          }
01262           else if(l8==1){
01263               figura_dib[0]=0x41;
01264           }
01265            else{
01266              figura_dib[0]=0x40;
01267            }
01268  }
01269   else if(l3==1){
01270       if(l4==1){
01271         if(l5==1){
01272           if(l6==1){
01273             if(l7==1){
01274               if(l8==1){
01275                 figura_dib[0]=0x3F;                                                                                                                                                           
01276               }
01277                else{
01278                  figura_dib[0]=0x3E;
01279                }
01280              }
01281               else if(l8==1){
01282                   figura_dib[0]=0x3D;
01283               }
01284                else{
01285                  figura_dib[0]=0x3C;
01286                }
01287           }
01288            else if(l7==1){
01289                if(l8==1){
01290                  figura_dib[0]=0x3B;
01291                }  
01292                 else{
01293                   figura_dib[0]=0x3A;
01294                 }
01295            }
01296             else if(l8==1){
01297                 figura_dib[0]=0x39;
01298             }
01299              else{
01300                figura_dib[0]=0x38;
01301              }  
01302         }
01303          else if(l6==1){
01304              if(l7==1){
01305                if(l8==1){
01306                  figura_dib[0]=0x37;
01307                }
01308                 else{
01309                   figura_dib[0]=0x36;
01310                 }
01311              }
01312               else if(l8==1){
01313                   figura_dib[0]=0x35;
01314               }
01315                else{
01316                  figura_dib[0]=0x34;
01317                }
01318          }
01319           else if(l7==1){
01320               if(l8==1){
01321                 figura_dib[0]=0x33;
01322               }
01323                else{
01324                  figura_dib[0]=0x32;
01325                }
01326            }
01327             else if(l8==1){
01328                 figura_dib[0]=0x31;
01329             }
01330              else{
01331                figura_dib[0]=0x30;
01332              }  
01333       }
01334        else if(l5==1){
01335            if(l6==1){
01336               if(l7==1){
01337                  if(l8==1){
01338                     figura_dib[0]=0x2F;
01339                  }
01340                   else{
01341                     figura_dib[0]=0x2E;
01342                   }
01343                }
01344                 else if(l8==1){
01345                     figura_dib[0]=0x2D;
01346                 }
01347                  else{
01348                    figura_dib[0]=0x2C;
01349                  }
01350            }
01351             else if(l7==1){
01352                 if(l8==1){
01353                   figura_dib[0]=0x2B;
01354                 }
01355                  else{
01356                    figura_dib[0]=0x2A;
01357                  }
01358              }
01359               else if(l8==1){
01360                   figura_dib[0]=0x29;
01361               }
01362                else{
01363                  figura_dib[0]=0x28;
01364                } 
01365        }
01366         else if(l6==1){
01367             if(l7==1){
01368                if(l8==1){
01369                   figura_dib[0]=0x27;
01370                }
01371                 else{
01372                   figura_dib[0]=0x26;
01373                 }
01374              }
01375               else if(l8==1){
01376                   figura_dib[0]=0x25;
01377               }
01378                else{
01379                  figura_dib[0]=0x24;
01380                }
01381          }
01382           else if(l7==1){
01383               if(l8==1){
01384                 figura_dib[0]=0x23;
01385               }
01386                else{
01387                  figura_dib[0]=0x22;
01388                }
01389           }
01390            else if(l8==1){
01391                figura_dib[0]=0x21;
01392            }
01393             else{
01394               figura_dib[0]=0x20;
01395             } 
01396   }
01397    else if(l4==1){
01398        if(l5==1){
01399           if(l6==1){
01400              if(l7==1){
01401                 if(l8==1){
01402                    figura_dib[0]=0x1F; 
01403                 }
01404                  else{
01405                    figura_dib[0]=0x1E;
01406                  }
01407              }
01408               else if(l8==1){
01409                   figura_dib[0]=0x1D;
01410               }
01411                else{
01412                  figura_dib[0]=0x1C;
01413                }
01414           }
01415            else if(l7==1){
01416                if(l8==1){
01417                  figura_dib[0]=0x1B;
01418                }
01419                 else{
01420                   figura_dib[0]=0x1A;
01421                 }
01422            }
01423             else if(l8==1){
01424                 figura_dib[0]=0x19;
01425             }
01426              else{
01427                figura_dib[0]=0x18;
01428              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
01429        }
01430         else if(l6==1){
01431             if(l7==1){
01432               if(l8==1){
01433                 figura_dib[0]=0x17;
01434               }
01435                else{
01436                  figura_dib[0]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
01437                }
01438             }
01439              else if(l8==1){
01440                  figura_dib[0]=0x15;
01441              }
01442               else{
01443                 figura_dib[0]=0x14;
01444               }
01445         }
01446          else if(l7==1){
01447              if(l8==1){
01448                figura_dib[0]=0x13;
01449              }
01450               else{
01451                 figura_dib[0]=0x12;
01452               }
01453           }
01454            else if(l8==1){
01455                figura_dib[0]=0x11;
01456            }
01457             else{
01458               figura_dib[0]=0x10;
01459             }  
01460    }
01461     else if(l5==1){
01462         if(l6==1){
01463           if(l7==1){
01464             if(l8==1){
01465               figura_dib[0]=0x0F; 
01466             }
01467              else{
01468                figura_dib[0]=0x0E;
01469              }
01470           }
01471            else if(l8==1){
01472                figura_dib[0]=0x0D;
01473            }
01474             else{
01475               figura_dib[0]=0x0C;
01476             }
01477         }
01478          else if(l7==1){
01479              if(l8==1){
01480                figura_dib[0]=0x0B;
01481              }
01482               else{
01483                 figura_dib[0]=0x0A;
01484               }
01485          }
01486           else if(l8==1){
01487               figura_dib[0]=0x09;
01488           }
01489            else{
01490              figura_dib[0]=0x08;
01491            }      
01492     }
01493      else if(l6==1){
01494          if(l7==1){
01495            if(l8==1){
01496              figura_dib[0]=0x07;
01497            }
01498             else{
01499               figura_dib[0]=0x06;
01500             }
01501          }
01502           else if(l8==1){
01503               figura_dib[0]=0x05;
01504           }
01505            else{
01506              figura_dib[0]=0x04;
01507            }
01508      }
01509       else if(l7==1){
01510           if(l8==1){
01511             figura_dib[0]=0x03;
01512           }  
01513            else{
01514              figura_dib[0]=0x02;
01515            }
01516       }
01517        else if(l8==1){
01518            figura_dib[0]=0x01;
01519        }
01520         else{
01521           figura_dib[0]=0x00;
01522         }                                                                                                                                                                                                                                                                                                                                                                               
01523 ///// 
01524 ////
01525 ///
01526 //
01527 //fila 2
01528 //
01529 ///
01530 ////
01531 /////
01532 if(l9==1){
01533    if(l10==1){
01534       if(l11==1){
01535          if(l12==1){
01536             if(l13==1){
01537                if(l14==1){
01538                   if(l15==1){
01539                      if(l16==1){
01540                         figura_dib[1]=0xFF;
01541                      }
01542                        else{
01543                          figura_dib[1]=0xFE;
01544                        }
01545                    }
01546                     else if(l16==1){
01547                         figura_dib[1]=0xFD;
01548                     }
01549                      else{
01550                        figura_dib[1]=0xFC;
01551                      }
01552                }
01553                 else if(l15==1){
01554                     if(l16==1){
01555                        figura_dib[1]=0xFB;
01556                     }
01557                      else{
01558                        figura_dib[1]=0xFA;
01559                      }
01560                 }
01561                  else if(l16==1){
01562                      figura_dib[1]=0xF9;
01563                  }
01564                   else{
01565                     figura_dib[1]=0xF8;
01566                   }
01567              }
01568               else if(l14==1){
01569                   if(l15==1){
01570                     if(l16==1){
01571                       figura_dib[1]=0xF7;
01572                     }
01573                      else{
01574                        figura_dib[1]=0xF6;
01575                      }
01576                    }
01577                     else if(l16==1){
01578                         figura_dib[1]=0xF5;
01579                     }
01580                      else{
01581                        figura_dib[1]=0xF4;
01582                      }
01583                }
01584                 else if(l15==1){
01585                     if(l16==1){
01586                       figura_dib[1]=0xF3;
01587                     }
01588                      else{
01589                        figura_dib[1]=0xF2;
01590                      }
01591                 }
01592                  else if(l16==1){
01593                      figura_dib[1]=0xF1;
01594                  }
01595                   else{
01596                     figura_dib[1]=0xF0;
01597                   }
01598          }
01599           else if(l13==1){
01600               if(l14==1){
01601                 if(l15==1){
01602                   if(l16==1){
01603                     figura_dib[1]=0xEF;
01604                   }
01605                    else{
01606                     figura_dib[1]=0xEE;
01607                    }
01608                 }
01609                  else if(l16==1){
01610                     figura_dib[1]=0xED;
01611                  }
01612                   else{
01613                     figura_dib[1]=0xEC;
01614                   }
01615               }
01616                else if(l15==1){
01617                    if(l16==1){
01618                       figura_dib[1]=0xEB;
01619                    }
01620                     else{
01621                       figura_dib[1]=0xEA;
01622                     }
01623                }
01624                 else if(l16==1){
01625                     figura_dib[1]=0xE9;
01626                 }
01627                  else{
01628                    figura_dib[1]=0xE8;
01629                  }                   
01630           }
01631            else if(l14==1){
01632                if(l15==1){
01633                  if(l16==1){
01634                    figura_dib[1]=0xE7;
01635                  }
01636                  else{
01637                    figura_dib[1]=0xE6;
01638                  }
01639                }
01640                 else if(l16==1){
01641                     figura_dib[1]=0xE5;
01642                 }
01643                  else{
01644                    figura_dib[1]=0xE4;
01645                  }
01646             }
01647              else if(l15==1){
01648                  if(l16==1){
01649                     figura_dib[1]=0xE3;
01650                  }
01651                   else{
01652                     figura_dib[1]=0xE2;
01653                   }
01654              }
01655               else if(l16==1){
01656                   figura_dib[1]=0xE1;
01657               }
01658                else{
01659                  figura_dib[1]=0xE0;
01660                }
01661       }
01662        else if(l12==1){
01663           if(l13==1){
01664             if(l14==1){
01665               if(l15==1){
01666                 if(l16==1){
01667                   figura_dib[1]=0xDF;
01668                 }
01669                  else{
01670                   figura_dib[1]=0xDE;
01671                  }
01672               }
01673                else if(l16==1){
01674                   figura_dib[1]=0xDD;
01675                }
01676                 else{
01677                   figura_dib[1]=0xDC;
01678                 }
01679             }
01680              else if(l15==1){
01681                 if(l16==1){
01682                   figura_dib[1]=0xDB;
01683                 }
01684                  else{
01685                    figura_dib[1]=0xDA;
01686                  }
01687              }
01688               else if(l16==1){
01689                   figura_dib[1]=0xD9;
01690               }
01691                else{
01692                  figura_dib[1]=0xD8;
01693                }
01694           }
01695            else if(l14==1){
01696                if(l15==1){
01697                  if(l16==1){
01698                    figura_dib[1]=0xD7;
01699                  }
01700                   else{
01701                     figura_dib[1]=0xD6;
01702                   }
01703                 }
01704                  else if(l16==1){
01705                      figura_dib[1]=0xD5;
01706                  }
01707                   else{
01708                     figura_dib[1]=0xD4;
01709                   }
01710            }
01711             else if(l15==1){
01712                 if(l16==1){
01713                   figura_dib[1]=0xD3;
01714                 }
01715                  else{
01716                    figura_dib[1]=0xD2;
01717                  }
01718             }
01719              else if(l16==1){
01720                  figura_dib[1]=0xD1;
01721              }
01722               else{
01723                 figura_dib[1]=0xD0;
01724               }
01725        }
01726         else if(l13==1){
01727             if(l14==1){
01728               if(l15==1){
01729                 if(l16==1){
01730                   figura_dib[1]=0xCF;
01731                 }
01732                  else{
01733                    figura_dib[1]=0xCE;
01734                  }
01735                }
01736                 else if(l16==1){
01737                     figura_dib[1]=0xCD;
01738                 }
01739                  else{
01740                    figura_dib[1]=0xCC;
01741                  }
01742              }
01743               else if(l15==1){
01744                   if(l16==1){
01745                     figura_dib[1]=0xCB;
01746                   }
01747                    else{
01748                      figura_dib[1]=0xCA;
01749                    }
01750               }
01751                else if(l16==1){
01752                    figura_dib[1]=0xC9;
01753                }
01754                 else{
01755                   figura_dib[1]=0xC8;
01756                 }
01757         }
01758          else if(l14==1){
01759              if(l15==1){
01760                if(l16==1){
01761                  figura_dib[1]=0xC7;
01762                }
01763                 else{
01764                   figura_dib[1]=0xC6;
01765                 }
01766              }
01767               else if(l16==1){
01768                   figura_dib[1]=0xC5;
01769               }
01770                else{
01771                  figura_dib[1]=0xC4;
01772                }
01773          }
01774           else if(l15==1){
01775               if(l16==1){
01776                 figura_dib[1]=0xC3;
01777               }  
01778                else{
01779                  figura_dib[1]=0xC2;
01780                }
01781           }
01782            else if(l16==1){
01783                figura_dib[1]=0xC1;
01784             }
01785              else{
01786                figura_dib[1]=0xC0;
01787              }
01788    }
01789     else if(l11==1){
01790         if(l12==1){
01791           if(l13==1){
01792             if(l14==1){
01793               if(l15==1){
01794                 if(l16==1){
01795                   figura_dib[1]=0xBF;
01796                 }
01797                  else{
01798                    figura_dib[1]=0xBE;
01799                  }
01800               }
01801                else if(l16==1){
01802                    figura_dib[1]=0xBD;
01803                }
01804                 else{
01805                   figura_dib[1]=0xBC;
01806                 }
01807             }
01808              else if(l15==1){
01809                  if(l16==1){
01810                     figura_dib[1]=0xBB;
01811                  }
01812                   else{
01813                     figura_dib[1]=0xBA;
01814                   }
01815              }
01816               else if(l16==1){
01817                   figura_dib[1]=0xB9;
01818               }
01819                else{
01820                  figura_dib[1]=0xB8;
01821                }
01822           }
01823            else if(l14==1){
01824                if(l15==1){
01825                  if(l16==1){
01826                    figura_dib[1]=0xB7;
01827                  }
01828                   else{
01829                     figura_dib[1]=0xB6;
01830                   }
01831                }
01832                 else if(l16==1){
01833                     figura_dib[1]=0xB5;
01834                 }
01835                  else{
01836                    figura_dib[1]=0xB4;
01837                  }
01838             }
01839              else if(l15==1){
01840                  if(l16==1){
01841                    figura_dib[1]=0xB3;
01842                  }
01843                   else{
01844                     figura_dib[1]=0xB2;
01845                   }
01846              }
01847               else if(l16==1){
01848                   figura_dib[1]=0xB1;
01849               }
01850                else{
01851                  figura_dib[1]=0xB0;
01852                }
01853         }
01854          else if(l13==1){
01855              if(l14==1){
01856                if(l15==1){
01857                  if(l16==1){
01858                    figura_dib[1]=0xAF;
01859                  }
01860                   else{
01861                     figura_dib[1]=0xAE;
01862                   }
01863                }
01864                 else if(l16==1){
01865                     figura_dib[1]=0xAD;
01866                 }
01867                  else{
01868                    figura_dib[1]=0xAC;
01869                  }
01870               }
01871                else if(l15==1){
01872                    if(l16==1){
01873                      figura_dib[1]=0xAB;
01874                    }
01875                     else{
01876                       figura_dib[1]=0xAA;
01877                     }
01878                }
01879                 else if(l16==1){
01880                     figura_dib[1]=0xA9;
01881                 }
01882                  else{
01883                    figura_dib[1]=0xA8;
01884                  }
01885          }
01886           else if(l14==1){
01887               if(l15==1){
01888                 if(l16==1){
01889                   figura_dib[1]=0xA7;
01890                 }
01891                  else{
01892                    figura_dib[1]=0xA6;
01893                  }
01894                }
01895                 else if(l16==1){
01896                     figura_dib[1]=0xA5;
01897                 }
01898                  else{
01899                    figura_dib[1]=0xA4;
01900                  }
01901            }
01902             else if(l15==1){
01903                 if(l16==1){
01904                   figura_dib[1]=0xA3;
01905                 }
01906                  else{
01907                    figura_dib[1]=0xA2;
01908                  }
01909             }
01910              else if(l16==1){
01911                  figura_dib[1]=0xA1;
01912              }
01913               else{
01914                 figura_dib[1]=0xA0;
01915               }
01916     }
01917      else if(l12==1){
01918          if(l13==1){
01919            if(l14==1){
01920              if(l15==1){
01921                if(l16==1){
01922                  figura_dib[1]=0x9F;
01923                }
01924                 else{
01925                   figura_dib[1]=0x9E;
01926                 }
01927              }
01928               else if(l16==1){
01929                   figura_dib[1]=0x9D;
01930               }
01931                else{
01932                  figura_dib[1]=0x9C;
01933                }
01934            }
01935             else if(l15==1){
01936                 if(l16==1){
01937                   figura_dib[1]=0x9B;
01938                 }
01939                  else{
01940                    figura_dib[1]=0x9A;
01941                  }
01942             }
01943              else if(l16==1){
01944                  figura_dib[1]=0x99;
01945              }
01946               else{
01947                 figura_dib[1]=0x98;
01948               }
01949          }
01950           else if(l14==1){
01951               if(l15==1){
01952                 if(l16==1){
01953                   figura_dib[1]=0x97;
01954                 }
01955                  else{
01956                    figura_dib[1]=0x96;
01957                  }
01958                }
01959                 else if(l16==1){
01960                     figura_dib[1]=0x95;
01961                 }
01962                  else{
01963                    figura_dib[1]=0x94;
01964                  }
01965            }
01966             else if(l15==1){
01967                 if(l16==1){
01968                   figura_dib[1]=0x93;
01969                 }
01970                  else{
01971                    figura_dib[1]=0x92;
01972                  }
01973             }
01974              else if(l16==1){
01975                  figura_dib[1]=0x91;
01976              }
01977               else{
01978                 figura_dib[1]=0x90;
01979               }
01980       }
01981        else if(l13==1){
01982            if(l14==1){
01983              if(l15==1){
01984                if(l16==1){
01985                  figura_dib[1]=0x8F;
01986                }
01987                else{
01988                  figura_dib[1]=0x8E;
01989                }
01990              }
01991               else if(l16==1){
01992                  figura_dib[1]=0x8D;
01993               }
01994                else{
01995                  figura_dib[1]=0x8C;
01996                }
01997            }
01998             else if(l15==1){
01999                 if(l16==1){
02000                   figura_dib[1]=0x8B;
02001                 }
02002                  else{
02003                    figura_dib[1]=0x8A;
02004                  }
02005             }
02006              else if(l16==1){
02007                  figura_dib[1]=0x89;
02008              }
02009               else{
02010                 figura_dib[1]=0x88;
02011               }
02012        }
02013         else if(l14==1){
02014             if(l15==1){
02015               if(l16==1){
02016                 figura_dib[1]=0x87;
02017               }
02018                else{
02019                  figura_dib[1]=0x86;
02020                }
02021             }
02022              else if(l16==1){
02023                  figura_dib[1]=0x85;
02024              }
02025               else{
02026                 figura_dib[1]=0x84;
02027               }
02028          }
02029           else if(l15==1){
02030               if(l16==1){
02031                  figura_dib[1]=0x83;
02032               }
02033                else{
02034                  figura_dib[1]=0x82;
02035                }
02036           }
02037            else if(l16==1){
02038                figura_dib[1]=0x81;
02039            }
02040             else{
02041               figura_dib[1]=0x80;
02042             }
02043 }
02044  else if(l10==1){
02045      if(l11==1){
02046        if(l12==1){
02047          if(l13==1){
02048             if(l14==1){
02049                if(l15==1){
02050                   if(l16==1){
02051                     figura_dib[1]=0x7F;
02052                   }
02053                    else{                       
02054                      figura_dib[1]=0x7E;
02055                    }
02056                 }
02057                  else if(l16==1){
02058                      figura_dib[1]=0x7D;
02059                  }
02060                   else{
02061                     figura_dib[1]=0x7C;
02062                   }
02063             }
02064              else if(l15==1){
02065                  if(l16==1){
02066                    figura_dib[1]=0x7B;
02067                  }
02068                   else{
02069                     figura_dib[1]=0x7A;
02070                   }
02071              }
02072               else if(l16==1){
02073                   figura_dib[1]=0x79;
02074               }
02075                else{
02076                  figura_dib[1]=0x78;
02077                }                                           
02078          }
02079           else if(l14==1){
02080               if(l15==1){
02081                 if(l16==1){
02082                   figura_dib[1]=0x77;
02083                 }
02084                 else{
02085                   figura_dib[1]=0x76;
02086                 }
02087               }
02088                else if(l16==1){
02089                    figura_dib[1]=0x75;
02090                }
02091                 else{
02092                   figura_dib[1]=0x74;
02093                 }
02094           }
02095            else if(l15==1){
02096                if(l16==1){
02097                  figura_dib[1]=0x73;
02098                }
02099                 else{
02100                  figura_dib[1]=0x72;
02101                 }
02102            }
02103             else if(l16==1){
02104                 figura_dib[1]=0x71;
02105             }
02106              else{
02107                figura_dib[1]=0x70;
02108              }
02109        }
02110         else if(l13==1){
02111             if(l14==1){
02112               if(l15==1){
02113                 if(l16==1){
02114                   figura_dib[1]=0x6F;
02115                 }
02116                  else{
02117                    figura_dib[1]=0x6E;
02118                  }
02119                }
02120                 else if(l16==1){
02121                     figura_dib[1]=0x6D;
02122                 }
02123                  else{
02124                    figura_dib[1]=0x6C;
02125                  }
02126             }
02127              else if(l15==1){
02128                 if(l16==1){
02129                   figura_dib[1]=0x6B;
02130                 }
02131                  else{
02132                    figura_dib[1]=0x6A;
02133                   }
02134              }
02135               else if(l16==1){
02136                  figura_dib[1]=0x69;
02137               }
02138                else{
02139                  figura_dib[1]=0x68;
02140                }                                                              
02141         }
02142          else if(l14==1){
02143              if(l15==1){
02144                if(l16==1){
02145                  figura_dib[1]=0x67;
02146                }
02147                 else{
02148                   figura_dib[1]=0x66;
02149                 }
02150               }
02151                else if(l16==1){
02152                    figura_dib[1]=0x65;
02153                }
02154                 else{
02155                   figura_dib[1]=0x64;
02156                 }
02157           }
02158            else if(l15==1){
02159                if(l16==1){
02160                  figura_dib[1]=0x63;
02161                 }
02162                  else{
02163                    figura_dib[1]=0x62;
02164                  }
02165            }
02166             else if(l16==1){
02167                 figura_dib[1]=0x61;
02168             }
02169              else{
02170                figura_dib[1]=0x60;
02171              }
02172      }
02173       else if(l12==1){
02174           if(l13==1){
02175             if(l14==1){
02176               if(l15==1){
02177                 if(l16==1){
02178                   figura_dib[1]=0x5F;
02179                 }
02180                  else{
02181                    figura_dib[1]=0x5E;
02182                  }
02183               }
02184                else if(l16==1){
02185                    figura_dib[1]=0x5D;
02186                }
02187                 else{
02188                   figura_dib[1]=0x5C;
02189                 }
02190             }
02191              else if(l15==1){
02192                  if(l16==1){
02193                    figura_dib[1]=0x5B;
02194                  }
02195                   else{
02196                     figura_dib[1]=0x5A;
02197                   }
02198               }
02199                else if(l16==1){
02200                    figura_dib[1]=0x59;
02201                }
02202                 else{
02203                   figura_dib[1]=0x58;
02204                 }                                                           
02205           }
02206            else if(l14==1){
02207                if(l15==1){
02208                  if(l16==1){
02209                    figura_dib[1]=0x57;
02210                  }
02211                   else{
02212                     figura_dib[1]=0x56;
02213                   }
02214                }
02215                 else if(l16==1){
02216                    figura_dib[1]=0x55;
02217                 }
02218                  else{
02219                    figura_dib[1]=0x54;
02220                  }
02221            }
02222             else if(l15==1){
02223                 if(l16==1){
02224                   figura_dib[1]=0x53;
02225                 }
02226                  else{
02227                    figura_dib[1]=0x52;
02228                  }
02229             }
02230              else if(l16==1){
02231                  figura_dib[1]=0x51;
02232              }
02233               else{
02234                 figura_dib[1]=0x50;
02235               }
02236       }
02237        else if(l13==1){
02238            if(l14==1){
02239              if(l15==1){
02240                 if(l16==1){
02241                   figura_dib[1]=0x4F;
02242                 }
02243                  else{
02244                    figura_dib[1]=0x4E;
02245                  }
02246              }
02247               else if(l16==1){
02248                   figura_dib[1]=0x4D;
02249               }
02250                else{
02251                  figura_dib[1]=0x4C;
02252                }       
02253            }
02254             else if(l15==1){
02255                 if(l16==1){
02256                   figura_dib[1]=0x4B;
02257                 }
02258                  else{
02259                    figura_dib[1]=0x4A;
02260                  }
02261              }
02262               else if(l16==1){
02263                   figura_dib[1]=0x49;
02264               }
02265                else{
02266                  figura_dib[1]=0x48;
02267                }      
02268        }
02269         else if(l14==1){
02270             if(l15==1){
02271                if(l16==1){
02272                  figura_dib[1]=0x47;
02273                }
02274                 else{
02275                   figura_dib[1]=0x46;
02276                 }
02277             }
02278              else if(l16==1){
02279                  figura_dib[1]=0x45;
02280              }
02281               else{
02282                 figura_dib[1]=0x44;
02283               }
02284         }
02285          else if(l15==1){
02286              if(l16==1){
02287                figura_dib[1]=0x43;
02288              }
02289               else{
02290                 figura_dib[1]=0x42;
02291               }
02292          }
02293           else if(l16==1){
02294               figura_dib[1]=0x41;
02295           }
02296            else{
02297              figura_dib[1]=0x40;
02298            }
02299  }
02300   else if(l11==1){
02301       if(l12==1){
02302         if(l13==1){
02303           if(l14==1){
02304             if(l15==1){
02305               if(l16==1){
02306                 figura_dib[1]=0x3F;                                                                                                                                                           
02307               }
02308                else{
02309                  figura_dib[1]=0x3E;
02310                }
02311              }
02312               else if(l16==1){
02313                   figura_dib[1]=0x3D;
02314               }
02315                else{
02316                  figura_dib[1]=0x3C;
02317                }
02318           }
02319            else if(l15==1){
02320                if(l16==1){
02321                  figura_dib[1]=0x3B;
02322                }  
02323                 else{
02324                   figura_dib[1]=0x3A;
02325                 }
02326            }
02327             else if(l16==1){
02328                 figura_dib[1]=0x39;
02329             }
02330              else{
02331                figura_dib[1]=0x38;
02332              }  
02333         }
02334          else if(l14==1){
02335              if(l15==1){
02336                if(l16==1){
02337                  figura_dib[1]=0x37;
02338                }
02339                 else{
02340                   figura_dib[1]=0x36;
02341                 }
02342              }
02343               else if(l16==1){
02344                   figura_dib[1]=0x35;
02345               }
02346                else{
02347                  figura_dib[1]=0x34;
02348                }
02349          }
02350           else if(l15==1){
02351               if(l16==1){
02352                 figura_dib[1]=0x33;
02353               }
02354                else{
02355                  figura_dib[1]=0x32;
02356                }
02357            }
02358             else if(l16==1){
02359                 figura_dib[1]=0x31;
02360             }
02361              else{
02362                figura_dib[1]=0x30;
02363              }  
02364       }
02365        else if(l13==1){
02366            if(l14==1){
02367               if(l15==1){
02368                  if(l16==1){
02369                     figura_dib[1]=0x2F;
02370                  }
02371                   else{
02372                     figura_dib[1]=0x2E;
02373                   }
02374                }
02375                 else if(l16==1){
02376                     figura_dib[1]=0x2D;
02377                 }
02378                  else{
02379                    figura_dib[1]=0x2C;
02380                  }
02381            }
02382             else if(l15==1){
02383                 if(l16==1){
02384                   figura_dib[1]=0x2B;
02385                 }
02386                  else{
02387                    figura_dib[1]=0x2A;
02388                  }
02389              }
02390               else if(l16==1){
02391                   figura_dib[1]=0x29;
02392               }
02393                else{
02394                  figura_dib[1]=0x28;
02395                } 
02396        }
02397         else if(l14==1){
02398             if(l15==1){
02399                if(l16==1){
02400                   figura_dib[1]=0x27;
02401                }
02402                 else{
02403                   figura_dib[1]=0x26;
02404                 }
02405              }
02406               else if(l16==1){
02407                   figura_dib[1]=0x25;
02408               }
02409                else{
02410                  figura_dib[1]=0x24;
02411                }
02412          }
02413           else if(l15==1){
02414               if(l16==1){
02415                 figura_dib[1]=0x23;
02416               }
02417                else{
02418                  figura_dib[1]=0x22;
02419                }
02420           }
02421            else if(l16==1){
02422                figura_dib[1]=0x21;
02423            }
02424             else{
02425               figura_dib[1]=0x20;
02426             } 
02427   }
02428    else if(l12==1){
02429        if(l13==1){
02430           if(l14==1){
02431              if(l15==1){
02432                 if(l16==1){
02433                    figura_dib[1]=0x1F; 
02434                 }
02435                  else{
02436                    figura_dib[1]=0x1E;
02437                  }
02438              }
02439               else if(l16==1){
02440                   figura_dib[1]=0x1D;
02441               }
02442                else{
02443                  figura_dib[1]=0x1C;
02444                }
02445           }
02446            else if(l15==1){
02447                if(l16==1){
02448                  figura_dib[1]=0x1B;
02449                }
02450                 else{
02451                   figura_dib[1]=0x1A;
02452                 }
02453            }
02454             else if(l16==1){
02455                 figura_dib[1]=0x19;
02456             }
02457              else{
02458                figura_dib[1]=0x18;
02459              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
02460        }
02461         else if(l14==1){
02462             if(l15==1){
02463               if(l16==1){
02464                 figura_dib[1]=0x17;
02465               }
02466                else{
02467                  figura_dib[1]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
02468                }
02469             }
02470              else if(l16==1){
02471                  figura_dib[1]=0x15;
02472              }
02473               else{
02474                 figura_dib[1]=0x14;
02475               }
02476         }
02477          else if(l15==1){
02478              if(l16==1){
02479                figura_dib[1]=0x13;
02480              }
02481               else{
02482                 figura_dib[1]=0x12;
02483               }
02484           }
02485            else if(l16==1){
02486                figura_dib[1]=0x11;
02487            }
02488             else{
02489               figura_dib[1]=0x10;
02490             }  
02491    }
02492     else if(l13==1){
02493         if(l14==1){
02494           if(l15==1){
02495             if(l16==1){
02496               figura_dib[1]=0x0F; 
02497             }
02498              else{
02499                figura_dib[1]=0x0E;
02500              }
02501           }
02502            else if(l16==1){
02503                figura_dib[1]=0x0D;
02504            }
02505             else{
02506               figura_dib[1]=0x0C;
02507             }
02508         }
02509          else if(l15==1){
02510              if(l16==1){
02511                figura_dib[1]=0x0B;
02512              }
02513               else{
02514                 figura_dib[1]=0x0A;
02515               }
02516          }
02517           else if(l16==1){
02518               figura_dib[1]=0x09;
02519           }
02520            else{
02521              figura_dib[1]=0x08;
02522            }      
02523     }
02524      else if(l14==1){
02525          if(l15==1){
02526            if(l16==1){
02527              figura_dib[1]=0x07;
02528            }
02529             else{
02530               figura_dib[1]=0x06;
02531             }
02532          }
02533           else if(l16==1){
02534               figura_dib[1]=0x05;
02535           }
02536            else{
02537              figura_dib[1]=0x04;
02538            }
02539      }
02540       else if(l15==1){
02541           if(l16==1){
02542             figura_dib[1]=0x03;
02543           }  
02544            else{
02545              figura_dib[1]=0x02;
02546            }
02547       }
02548        else if(l16==1){
02549            figura_dib[1]=0x01;
02550        }
02551         else{
02552           figura_dib[1]=0x00;
02553         }                                                                                                                                                                                                                                                                                                                                                                               
02554 ///// 
02555 ////
02556 ///
02557 //
02558 //fila 3
02559 //
02560 ///
02561 ////
02562 /////
02563 if(l17==1){
02564    if(l18==1){
02565       if(l19==1){
02566          if(l20==1){
02567             if(l21==1){
02568                if(l22==1){
02569                   if(l23==1){
02570                      if(l24==1){
02571                         figura_dib[2]=0xFF;
02572                      }
02573                        else{
02574                          figura_dib[2]=0xFE;
02575                        }
02576                    }
02577                     else if(l24==1){
02578                         figura_dib[2]=0xFD;
02579                     }
02580                      else{
02581                        figura_dib[2]=0xFC;
02582                      }
02583                }
02584                 else if(l23==1){
02585                     if(l24==1){
02586                        figura_dib[2]=0xFB;
02587                     }
02588                      else{
02589                        figura_dib[2]=0xFA;
02590                      }
02591                 }
02592                  else if(l24==1){
02593                      figura_dib[2]=0xF9;
02594                  }
02595                   else{
02596                     figura_dib[2]=0xF8;
02597                   }
02598              }
02599               else if(l22==1){
02600                   if(l23==1){
02601                     if(l24==1){
02602                       figura_dib[2]=0xF7;
02603                     }
02604                      else{
02605                        figura_dib[2]=0xF6;
02606                      }
02607                    }
02608                     else if(l24==1){
02609                         figura_dib[2]=0xF5;
02610                     }
02611                      else{
02612                        figura_dib[2]=0xF4;
02613                      }
02614                }
02615                 else if(l23==1){
02616                     if(l24==1){
02617                       figura_dib[2]=0xF3;
02618                     }
02619                      else{
02620                        figura_dib[2]=0xF2;
02621                      }
02622                 }
02623                  else if(l24==1){
02624                      figura_dib[2]=0xF1;
02625                  }
02626                   else{
02627                     figura_dib[2]=0xF0;
02628                   }
02629          }
02630           else if(l21==1){
02631               if(l22==1){
02632                 if(l23==1){
02633                   if(l24==1){
02634                     figura_dib[2]=0xEF;
02635                   }
02636                    else{
02637                     figura_dib[2]=0xEE;
02638                    }
02639                 }
02640                  else if(l24==1){
02641                     figura_dib[2]=0xED;
02642                  }
02643                   else{
02644                     figura_dib[2]=0xEC;
02645                   }
02646               }
02647                else if(l23==1){
02648                    if(l24==1){
02649                       figura_dib[2]=0xEB;
02650                    }
02651                     else{
02652                       figura_dib[2]=0xEA;
02653                     }
02654                }
02655                 else if(l24==1){
02656                     figura_dib[2]=0xE9;
02657                 }
02658                  else{
02659                    figura_dib[2]=0xE8;
02660                  }                   
02661           }
02662            else if(l22==1){
02663                if(l23==1){
02664                  if(l24==1){
02665                    figura_dib[2]=0xE7;
02666                  }
02667                  else{
02668                    figura_dib[2]=0xE6;
02669                  }
02670                }
02671                 else if(l24==1){
02672                     figura_dib[2]=0xE5;
02673                 }
02674                  else{
02675                    figura_dib[2]=0xE4;
02676                  }
02677             }
02678              else if(l23==1){
02679                  if(l24==1){
02680                     figura_dib[2]=0xE3;
02681                  }
02682                   else{
02683                     figura_dib[2]=0xE2;
02684                   }
02685              }
02686               else if(l24==1){
02687                   figura_dib[2]=0xE1;
02688               }
02689                else{
02690                  figura_dib[2]=0xE0;
02691                }
02692       }
02693        else if(l20==1){
02694           if(l21==1){
02695             if(l22==1){
02696               if(l23==1){
02697                 if(l24==1){
02698                   figura_dib[2]=0xDF;
02699                 }
02700                  else{
02701                   figura_dib[2]=0xDE;
02702                  }
02703               }
02704                else if(l24==1){
02705                   figura_dib[2]=0xDD;
02706                }
02707                 else{
02708                   figura_dib[2]=0xDC;
02709                 }
02710             }
02711              else if(l23==1){
02712                 if(l24==1){
02713                   figura_dib[2]=0xDB;
02714                 }
02715                  else{
02716                    figura_dib[2]=0xDA;
02717                  }
02718              }
02719               else if(l24==1){
02720                   figura_dib[2]=0xD9;
02721               }
02722                else{
02723                  figura_dib[2]=0xD8;
02724                }
02725           }
02726            else if(l22==1){
02727                if(l23==1){
02728                  if(l24==1){
02729                    figura_dib[2]=0xD7;
02730                  }
02731                   else{
02732                     figura_dib[2]=0xD6;
02733                   }
02734                 }
02735                  else if(l24==1){
02736                      figura_dib[2]=0xD5;
02737                  }
02738                   else{
02739                     figura_dib[2]=0xD4;
02740                   }
02741            }
02742             else if(l23==1){
02743                 if(l24==1){
02744                   figura_dib[2]=0xD3;
02745                 }
02746                  else{
02747                    figura_dib[2]=0xD2;
02748                  }
02749             }
02750              else if(l24==1){
02751                  figura_dib[2]=0xD1;
02752              }
02753               else{
02754                 figura_dib[2]=0xD0;
02755               }
02756        }
02757         else if(l21==1){
02758             if(l22==1){
02759               if(l23==1){
02760                 if(l24==1){
02761                   figura_dib[2]=0xCF;
02762                 }
02763                  else{
02764                    figura_dib[2]=0xCE;
02765                  }
02766                }
02767                 else if(l24==1){
02768                     figura_dib[2]=0xCD;
02769                 }
02770                  else{
02771                    figura_dib[2]=0xCC;
02772                  }
02773              }
02774               else if(l23==1){
02775                   if(l24==1){
02776                     figura_dib[2]=0xCB;
02777                   }
02778                    else{
02779                      figura_dib[2]=0xCA;
02780                    }
02781               }
02782                else if(l24==1){
02783                    figura_dib[2]=0xC9;
02784                }
02785                 else{
02786                   figura_dib[2]=0xC8;
02787                 }
02788         }
02789          else if(l22==1){
02790              if(l23==1){
02791                if(l24==1){
02792                  figura_dib[2]=0xC7;
02793                }
02794                 else{
02795                   figura_dib[2]=0xC6;
02796                 }
02797              }
02798               else if(l24==1){
02799                   figura_dib[2]=0xC5;
02800               }
02801                else{
02802                  figura_dib[2]=0xC4;
02803                }
02804          }
02805           else if(l23==1){
02806               if(l24==1){
02807                 figura_dib[2]=0xC3;
02808               }  
02809                else{
02810                  figura_dib[2]=0xC2;
02811                }
02812           }
02813            else if(l24==1){
02814                figura_dib[2]=0xC1;
02815             }
02816              else{
02817                figura_dib[2]=0xC0;
02818              }
02819    }
02820     else if(l19==1){
02821         if(l20==1){
02822           if(l21==1){
02823             if(l22==1){
02824               if(l23==1){
02825                 if(l24==1){
02826                   figura_dib[2]=0xBF;
02827                 }
02828                  else{
02829                    figura_dib[2]=0xBE;
02830                  }
02831               }
02832                else if(l24==1){
02833                    figura_dib[2]=0xBD;
02834                }
02835                 else{
02836                   figura_dib[2]=0xBC;
02837                 }
02838             }
02839              else if(l23==1){
02840                  if(l24==1){
02841                     figura_dib[2]=0xBB;
02842                  }
02843                   else{
02844                     figura_dib[2]=0xBA;
02845                   }
02846              }
02847               else if(l24==1){
02848                   figura_dib[2]=0xB9;
02849               }
02850                else{
02851                  figura_dib[2]=0xB8;
02852                }
02853           }
02854            else if(l22==1){
02855                if(l23==1){
02856                  if(l24==1){
02857                    figura_dib[2]=0xB7;
02858                  }
02859                   else{
02860                     figura_dib[2]=0xB6;
02861                   }
02862                }
02863                 else if(l24==1){
02864                     figura_dib[2]=0xB5;
02865                 }
02866                  else{
02867                    figura_dib[2]=0xB4;
02868                  }
02869             }
02870              else if(l23==1){
02871                  if(l24==1){
02872                    figura_dib[2]=0xB3;
02873                  }
02874                   else{
02875                     figura_dib[2]=0xB2;
02876                   }
02877              }
02878               else if(l24==1){
02879                   figura_dib[2]=0xB1;
02880               }
02881                else{
02882                  figura_dib[2]=0xB0;
02883                }
02884         }
02885          else if(l21==1){
02886              if(l22==1){
02887                if(l23==1){
02888                  if(l24==1){
02889                    figura_dib[2]=0xAF;
02890                  }
02891                   else{
02892                     figura_dib[2]=0xAE;
02893                   }
02894                }
02895                 else if(l24==1){
02896                     figura_dib[2]=0xAD;
02897                 }
02898                  else{
02899                    figura_dib[2]=0xAC;
02900                  }
02901               }
02902                else if(l23==1){
02903                    if(l24==1){
02904                      figura_dib[2]=0xAB;
02905                    }
02906                     else{
02907                       figura_dib[2]=0xAA;
02908                     }
02909                }
02910                 else if(l24==1){
02911                     figura_dib[2]=0xA9;
02912                 }
02913                  else{
02914                    figura_dib[2]=0xA8;
02915                  }
02916          }
02917           else if(l22==1){
02918               if(l23==1){
02919                 if(l24==1){
02920                   figura_dib[2]=0xA7;
02921                 }
02922                  else{
02923                    figura_dib[2]=0xA6;
02924                  }
02925                }
02926                 else if(l24==1){
02927                     figura_dib[2]=0xA5;
02928                 }
02929                  else{
02930                    figura_dib[2]=0xA4;
02931                  }
02932            }
02933             else if(l23==1){
02934                 if(l24==1){
02935                   figura_dib[2]=0xA3;
02936                 }
02937                  else{
02938                    figura_dib[2]=0xA2;
02939                  }
02940             }
02941              else if(l24==1){
02942                  figura_dib[2]=0xA1;
02943              }
02944               else{
02945                 figura_dib[2]=0xA0;
02946               }
02947     }
02948      else if(l20==1){
02949          if(l21==1){
02950            if(l22==1){
02951              if(l23==1){
02952                if(l24==1){
02953                  figura_dib[2]=0x9F;
02954                }
02955                 else{
02956                   figura_dib[2]=0x9E;
02957                 }
02958              }
02959               else if(l24==1){
02960                   figura_dib[2]=0x9D;
02961               }
02962                else{
02963                  figura_dib[2]=0x9C;
02964                }
02965            }
02966             else if(l23==1){
02967                 if(l24==1){
02968                   figura_dib[2]=0x9B;
02969                 }
02970                  else{
02971                    figura_dib[2]=0x9A;
02972                  }
02973             }
02974              else if(l24==1){
02975                  figura_dib[2]=0x99;
02976              }
02977               else{
02978                 figura_dib[2]=0x98;
02979               }
02980          }
02981           else if(l22==1){
02982               if(l23==1){
02983                 if(l24==1){
02984                   figura_dib[2]=0x97;
02985                 }
02986                  else{
02987                    figura_dib[2]=0x96;
02988                  }
02989                }
02990                 else if(l24==1){
02991                     figura_dib[2]=0x95;
02992                 }
02993                  else{
02994                    figura_dib[2]=0x94;
02995                  }
02996            }
02997             else if(l23==1){
02998                 if(l24==1){
02999                   figura_dib[2]=0x93;
03000                 }
03001                  else{
03002                    figura_dib[2]=0x92;
03003                  }
03004             }
03005              else if(l24==1){
03006                  figura_dib[2]=0x91;
03007              }
03008               else{
03009                 figura_dib[2]=0x90;
03010               }
03011       }
03012        else if(l21==1){
03013            if(l22==1){
03014              if(l23==1){
03015                if(l24==1){
03016                  figura_dib[2]=0x8F;
03017                }
03018                else{
03019                  figura_dib[2]=0x8E;
03020                }
03021              }
03022               else if(l24==1){
03023                  figura_dib[2]=0x8D;
03024               }
03025                else{
03026                  figura_dib[2]=0x8C;
03027                }
03028            }
03029             else if(l23==1){
03030                 if(l24==1){
03031                   figura_dib[2]=0x8B;
03032                 }
03033                  else{
03034                    figura_dib[2]=0x8A;
03035                  }
03036             }
03037              else if(l24==1){
03038                  figura_dib[2]=0x89;
03039              }
03040               else{
03041                 figura_dib[2]=0x88;
03042               }
03043        }
03044         else if(l22==1){
03045             if(l23==1){
03046               if(l24==1){
03047                 figura_dib[2]=0x87;
03048               }
03049                else{
03050                  figura_dib[2]=0x86;
03051                }
03052             }
03053              else if(l24==1){
03054                  figura_dib[2]=0x85;
03055              }
03056               else{
03057                 figura_dib[2]=0x84;
03058               }
03059          }
03060           else if(l23==1){
03061               if(l24==1){
03062                  figura_dib[2]=0x83;
03063               }
03064                else{
03065                  figura_dib[2]=0x82;
03066                }
03067           }
03068            else if(l24==1){
03069                figura_dib[2]=0x81;
03070            }
03071             else{
03072               figura_dib[2]=0x80;
03073             }
03074 }
03075  else if(l18==1){
03076      if(l19==1){
03077        if(l20==1){
03078          if(l21==1){
03079             if(l22==1){
03080                if(l23==1){
03081                   if(l24==1){
03082                     figura_dib[2]=0x7F;
03083                   }
03084                    else{                       
03085                      figura_dib[2]=0x7E;
03086                    }
03087                 }
03088                  else if(l24==1){
03089                      figura_dib[2]=0x7D;
03090                  }
03091                   else{
03092                     figura_dib[2]=0x7C;
03093                   }
03094             }
03095              else if(l23==1){
03096                  if(l24==1){
03097                    figura_dib[2]=0x7B;
03098                  }
03099                   else{
03100                     figura_dib[2]=0x7A;
03101                   }
03102              }
03103               else if(l24==1){
03104                   figura_dib[2]=0x79;
03105               }
03106                else{
03107                  figura_dib[2]=0x78;
03108                }                                           
03109          }
03110           else if(l22==1){
03111               if(l23==1){
03112                 if(l24==1){
03113                   figura_dib[2]=0x77;
03114                 }
03115                 else{
03116                   figura_dib[2]=0x76;
03117                 }
03118               }
03119                else if(l24==1){
03120                    figura_dib[2]=0x75;
03121                }
03122                 else{
03123                   figura_dib[2]=0x74;
03124                 }
03125           }
03126            else if(l23==1){
03127                if(l24==1){
03128                  figura_dib[2]=0x73;
03129                }
03130                 else{
03131                  figura_dib[2]=0x72;
03132                 }
03133            }
03134             else if(l24==1){
03135                 figura_dib[2]=0x71;
03136             }
03137              else{
03138                figura_dib[2]=0x70;
03139              }
03140        }
03141         else if(l21==1){
03142             if(l22==1){
03143               if(l23==1){
03144                 if(l24==1){
03145                   figura_dib[2]=0x6F;
03146                 }
03147                  else{
03148                    figura_dib[2]=0x6E;
03149                  }
03150                }
03151                 else if(l24==1){
03152                     figura_dib[2]=0x6D;
03153                 }
03154                  else{
03155                    figura_dib[2]=0x6C;
03156                  }
03157             }
03158              else if(l23==1){
03159                 if(l24==1){
03160                   figura_dib[2]=0x6B;
03161                 }
03162                  else{
03163                    figura_dib[2]=0x6A;
03164                   }
03165              }
03166               else if(l24==1){
03167                  figura_dib[2]=0x69;
03168               }
03169                else{
03170                  figura_dib[2]=0x68;
03171                }                                                              
03172         }
03173          else if(l22==1){
03174              if(l23==1){
03175                if(l24==1){
03176                  figura_dib[2]=0x67;
03177                }
03178                 else{
03179                   figura_dib[2]=0x66;
03180                 }
03181               }
03182                else if(l24==1){
03183                    figura_dib[2]=0x65;
03184                }
03185                 else{
03186                   figura_dib[2]=0x64;
03187                 }
03188           }
03189            else if(l23==1){
03190                if(l24==1){
03191                  figura_dib[2]=0x63;
03192                 }
03193                  else{
03194                    figura_dib[2]=0x62;
03195                  }
03196            }
03197             else if(l24==1){
03198                 figura_dib[2]=0x61;
03199             }
03200              else{
03201                figura_dib[2]=0x60;
03202              }
03203      }
03204       else if(l20==1){
03205           if(l21==1){
03206             if(l22==1){
03207               if(l23==1){
03208                 if(l24==1){
03209                   figura_dib[2]=0x5F;
03210                 }
03211                  else{
03212                    figura_dib[2]=0x5E;
03213                  }
03214               }
03215                else if(l24==1){
03216                    figura_dib[2]=0x5D;
03217                }
03218                 else{
03219                   figura_dib[2]=0x5C;
03220                 }
03221             }
03222              else if(l23==1){
03223                  if(l24==1){
03224                    figura_dib[2]=0x5B;
03225                  }
03226                   else{
03227                     figura_dib[2]=0x5A;
03228                   }
03229               }
03230                else if(l24==1){
03231                    figura_dib[2]=0x59;
03232                }
03233                 else{
03234                   figura_dib[2]=0x58;
03235                 }                                                           
03236           }
03237            else if(l22==1){
03238                if(l23==1){
03239                  if(l24==1){
03240                    figura_dib[2]=0x57;
03241                  }
03242                   else{
03243                     figura_dib[2]=0x56;
03244                   }
03245                }
03246                 else if(l24==1){
03247                    figura_dib[2]=0x55;
03248                 }
03249                  else{
03250                    figura_dib[2]=0x54;
03251                  }
03252            }
03253             else if(l23==1){
03254                 if(l24==1){
03255                   figura_dib[2]=0x53;
03256                 }
03257                  else{
03258                    figura_dib[2]=0x52;
03259                  }
03260             }
03261              else if(l24==1){
03262                  figura_dib[2]=0x51;
03263              }
03264               else{
03265                 figura_dib[2]=0x50;
03266               }
03267       }
03268        else if(l21==1){
03269            if(l22==1){
03270              if(l23==1){
03271                 if(l24==1){
03272                   figura_dib[2]=0x4F;
03273                 }
03274                  else{
03275                    figura_dib[2]=0x4E;
03276                  }
03277              }
03278               else if(l24==1){
03279                   figura_dib[2]=0x4D;
03280               }
03281                else{
03282                  figura_dib[2]=0x4C;
03283                }       
03284            }
03285             else if(l23==1){
03286                 if(l24==1){
03287                   figura_dib[2]=0x4B;
03288                 }
03289                  else{
03290                    figura_dib[2]=0x4A;
03291                  }
03292              }
03293               else if(l24==1){
03294                   figura_dib[2]=0x49;
03295               }
03296                else{
03297                  figura_dib[2]=0x48;
03298                }      
03299        }
03300         else if(l22==1){
03301             if(l23==1){
03302                if(l24==1){
03303                  figura_dib[2]=0x47;
03304                }
03305                 else{
03306                   figura_dib[2]=0x46;
03307                 }
03308             }
03309              else if(l24==1){
03310                  figura_dib[2]=0x45;
03311              }
03312               else{
03313                 figura_dib[2]=0x44;
03314               }
03315         }
03316          else if(l23==1){
03317              if(l24==1){
03318                figura_dib[2]=0x43;
03319              }
03320               else{
03321                 figura_dib[2]=0x42;
03322               }
03323          }
03324           else if(l24==1){
03325               figura_dib[2]=0x41;
03326           }
03327            else{
03328              figura_dib[2]=0x40;
03329            }
03330  }
03331   else if(l19==1){
03332       if(l20==1){
03333         if(l21==1){
03334           if(l22==1){
03335             if(l23==1){
03336               if(l24==1){
03337                 figura_dib[2]=0x3F;                                                                                                                                                           
03338               }
03339                else{
03340                  figura_dib[2]=0x3E;
03341                }
03342              }
03343               else if(l24==1){
03344                   figura_dib[2]=0x3D;
03345               }
03346                else{
03347                  figura_dib[2]=0x3C;
03348                }
03349           }
03350            else if(l23==1){
03351                if(l24==1){
03352                  figura_dib[2]=0x3B;
03353                }  
03354                 else{
03355                   figura_dib[2]=0x3A;
03356                 }
03357            }
03358             else if(l24==1){
03359                 figura_dib[2]=0x39;
03360             }
03361              else{
03362                figura_dib[2]=0x38;
03363              }  
03364         }
03365          else if(l22==1){
03366              if(l23==1){
03367                if(l24==1){
03368                  figura_dib[2]=0x37;
03369                }
03370                 else{
03371                   figura_dib[2]=0x36;
03372                 }
03373              }
03374               else if(l24==1){
03375                   figura_dib[2]=0x35;
03376               }
03377                else{
03378                  figura_dib[2]=0x34;
03379                }
03380          }
03381           else if(l23==1){
03382               if(l24==1){
03383                 figura_dib[2]=0x33;
03384               }
03385                else{
03386                  figura_dib[2]=0x32;
03387                }
03388            }
03389             else if(l24==1){
03390                 figura_dib[2]=0x31;
03391             }
03392              else{
03393                figura_dib[2]=0x30;
03394              }  
03395       }
03396        else if(l21==1){
03397            if(l22==1){
03398               if(l23==1){
03399                  if(l24==1){
03400                     figura_dib[2]=0x2F;
03401                  }
03402                   else{
03403                     figura_dib[2]=0x2E;
03404                   }
03405                }
03406                 else if(l24==1){
03407                     figura_dib[2]=0x2D;
03408                 }
03409                  else{
03410                    figura_dib[2]=0x2C;
03411                  }
03412            }
03413             else if(l23==1){
03414                 if(l24==1){
03415                   figura_dib[2]=0x2B;
03416                 }
03417                  else{
03418                    figura_dib[2]=0x2A;
03419                  }
03420              }
03421               else if(l24==1){
03422                   figura_dib[2]=0x29;
03423               }
03424                else{
03425                  figura_dib[2]=0x28;
03426                } 
03427        }
03428         else if(l22==1){
03429             if(l23==1){
03430                if(l24==1){
03431                   figura_dib[2]=0x27;
03432                }
03433                 else{
03434                   figura_dib[2]=0x26;
03435                 }
03436              }
03437               else if(l24==1){
03438                   figura_dib[2]=0x25;
03439               }
03440                else{
03441                  figura_dib[2]=0x24;
03442                }
03443          }
03444           else if(l23==1){
03445               if(l24==1){
03446                 figura_dib[2]=0x23;
03447               }
03448                else{
03449                  figura_dib[2]=0x22;
03450                }
03451           }
03452            else if(l24==1){
03453                figura_dib[2]=0x21;
03454            }
03455             else{
03456               figura_dib[2]=0x20;
03457             } 
03458   }
03459    else if(l20==1){
03460        if(l21==1){
03461           if(l22==1){
03462              if(l23==1){
03463                 if(l24==1){
03464                    figura_dib[2]=0x1F; 
03465                 }
03466                  else{
03467                    figura_dib[2]=0x1E;
03468                  }
03469              }
03470               else if(l24==1){
03471                   figura_dib[2]=0x1D;
03472               }
03473                else{
03474                  figura_dib[2]=0x1C;
03475                }
03476           }
03477            else if(l23==1){
03478                if(l24==1){
03479                  figura_dib[2]=0x1B;
03480                }
03481                 else{
03482                   figura_dib[2]=0x1A;
03483                 }
03484            }
03485             else if(l24==1){
03486                 figura_dib[2]=0x19;
03487             }
03488              else{
03489                figura_dib[2]=0x18;
03490              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
03491        }
03492         else if(l22==1){
03493             if(l23==1){
03494               if(l24==1){
03495                 figura_dib[2]=0x17;
03496               }
03497                else{
03498                  figura_dib[2]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
03499                }
03500             }
03501              else if(l24==1){
03502                  figura_dib[2]=0x15;
03503              }
03504               else{
03505                 figura_dib[2]=0x14;
03506               }
03507         }
03508          else if(l23==1){
03509              if(l24==1){
03510                figura_dib[2]=0x13;
03511              }
03512               else{
03513                 figura_dib[2]=0x12;
03514               }
03515           }
03516            else if(l24==1){
03517                figura_dib[2]=0x11;
03518            }
03519             else{
03520               figura_dib[2]=0x10;
03521             }  
03522    }
03523     else if(l21==1){
03524         if(l22==1){
03525           if(l23==1){
03526             if(l24==1){
03527               figura_dib[2]=0x0F; 
03528             }
03529              else{
03530                figura_dib[2]=0x0E;
03531              }
03532           }
03533            else if(l24==1){
03534                figura_dib[2]=0x0D;
03535            }
03536             else{
03537               figura_dib[2]=0x0C;
03538             }
03539         }
03540          else if(l23==1){
03541              if(l24==1){
03542                figura_dib[2]=0x0B;
03543              }
03544               else{
03545                 figura_dib[2]=0x0A;
03546               }
03547          }
03548           else if(l24==1){
03549               figura_dib[2]=0x09;
03550           }
03551            else{
03552              figura_dib[2]=0x08;
03553            }      
03554     }
03555      else if(l22==1){
03556          if(l23==1){
03557            if(l24==1){
03558              figura_dib[2]=0x07;
03559            }
03560             else{
03561               figura_dib[2]=0x06;
03562             }
03563          }
03564           else if(l24==1){
03565               figura_dib[2]=0x05;
03566           }
03567            else{
03568              figura_dib[2]=0x04;
03569            }
03570      }
03571       else if(l23==1){
03572           if(l24==1){
03573             figura_dib[2]=0x03;
03574           }  
03575            else{
03576              figura_dib[2]=0x02;
03577            }
03578       }
03579        else if(l24==1){
03580            figura_dib[2]=0x01;
03581        }
03582         else{
03583           figura_dib[2]=0x00;
03584         }                                                                                                                                                                                                                                                                                                                                                                               
03585 ///// 
03586 ////
03587 ///
03588 //
03589 //fila 4
03590 //
03591 ///
03592 ////
03593 /////
03594 if(l25==1){
03595    if(l26==1){
03596       if(l27==1){
03597          if(l28==1){
03598             if(l29==1){
03599                if(l30==1){
03600                   if(l31==1){
03601                      if(l32==1){
03602                         figura_dib[3]=0xFF;
03603                      }
03604                        else{
03605                          figura_dib[3]=0xFE;
03606                        }
03607                    }
03608                     else if(l32==1){
03609                         figura_dib[3]=0xFD;
03610                     }
03611                      else{
03612                        figura_dib[3]=0xFC;
03613                      }
03614                }
03615                 else if(l31==1){
03616                     if(l32==1){
03617                        figura_dib[3]=0xFB;
03618                     }
03619                      else{
03620                        figura_dib[3]=0xFA;
03621                      }
03622                 }
03623                  else if(l32==1){
03624                      figura_dib[3]=0xF9;
03625                  }
03626                   else{
03627                     figura_dib[3]=0xF8;
03628                   }
03629              }
03630               else if(l30==1){
03631                   if(l31==1){
03632                     if(l32==1){
03633                       figura_dib[3]=0xF7;
03634                     }
03635                      else{
03636                        figura_dib[3]=0xF6;
03637                      }
03638                    }
03639                     else if(l32==1){
03640                         figura_dib[3]=0xF5;
03641                     }
03642                      else{
03643                        figura_dib[3]=0xF4;
03644                      }
03645                }
03646                 else if(l31==1){
03647                     if(l32==1){
03648                       figura_dib[3]=0xF3;
03649                     }
03650                      else{
03651                        figura_dib[3]=0xF2;
03652                      }
03653                 }
03654                  else if(l32==1){
03655                      figura_dib[3]=0xF1;
03656                  }
03657                   else{
03658                     figura_dib[3]=0xF0;
03659                   }
03660          }
03661           else if(l29==1){
03662               if(l30==1){
03663                 if(l31==1){
03664                   if(l32==1){
03665                     figura_dib[3]=0xEF;
03666                   }
03667                    else{
03668                     figura_dib[3]=0xEE;
03669                    }
03670                 }
03671                  else if(l32==1){
03672                     figura_dib[3]=0xED;
03673                  }
03674                   else{
03675                     figura_dib[3]=0xEC;
03676                   }
03677               }
03678                else if(l31==1){
03679                    if(l32==1){
03680                       figura_dib[3]=0xEB;
03681                    }
03682                     else{
03683                       figura_dib[3]=0xEA;
03684                     }
03685                }
03686                 else if(l32==1){
03687                     figura_dib[3]=0xE9;
03688                 }
03689                  else{
03690                    figura_dib[3]=0xE8;
03691                  }                   
03692           }
03693            else if(l30==1){
03694                if(l31==1){
03695                  if(l32==1){
03696                    figura_dib[3]=0xE7;
03697                  }
03698                  else{
03699                    figura_dib[3]=0xE6;
03700                  }
03701                }
03702                 else if(l32==1){
03703                     figura_dib[3]=0xE5;
03704                 }
03705                  else{
03706                    figura_dib[3]=0xE4;
03707                  }
03708             }
03709              else if(l31==1){
03710                  if(l32==1){
03711                     figura_dib[3]=0xE3;
03712                  }
03713                   else{
03714                     figura_dib[3]=0xE2;
03715                   }
03716              }
03717               else if(l32==1){
03718                   figura_dib[3]=0xE1;
03719               }
03720                else{
03721                  figura_dib[3]=0xE0;
03722                }
03723       }
03724        else if(l28==1){
03725           if(l29==1){
03726             if(l30==1){
03727               if(l31==1){
03728                 if(l32==1){
03729                   figura_dib[3]=0xDF;
03730                 }
03731                  else{
03732                   figura_dib[3]=0xDE;
03733                  }
03734               }
03735                else if(l32==1){
03736                   figura_dib[3]=0xDD;
03737                }
03738                 else{
03739                   figura_dib[3]=0xDC;
03740                 }
03741             }
03742              else if(l31==1){
03743                 if(l32==1){
03744                   figura_dib[3]=0xDB;
03745                 }
03746                  else{
03747                    figura_dib[3]=0xDA;
03748                  }
03749              }
03750               else if(l32==1){
03751                   figura_dib[3]=0xD9;
03752               }
03753                else{
03754                  figura_dib[3]=0xD8;
03755                }
03756           }
03757            else if(l30==1){
03758                if(l31==1){
03759                  if(l32==1){
03760                    figura_dib[3]=0xD7;
03761                  }
03762                   else{
03763                     figura_dib[3]=0xD6;
03764                   }
03765                 }
03766                  else if(l32==1){
03767                      figura_dib[3]=0xD5;
03768                  }
03769                   else{
03770                     figura_dib[3]=0xD4;
03771                   }
03772            }
03773             else if(l31==1){
03774                 if(l32==1){
03775                   figura_dib[3]=0xD3;
03776                 }
03777                  else{
03778                    figura_dib[3]=0xD2;
03779                  }
03780             }
03781              else if(l32==1){
03782                  figura_dib[3]=0xD1;
03783              }
03784               else{
03785                 figura_dib[3]=0xD0;
03786               }
03787        }
03788         else if(l29==1){
03789             if(l30==1){
03790               if(l31==1){
03791                 if(l32==1){
03792                   figura_dib[3]=0xCF;
03793                 }
03794                  else{
03795                    figura_dib[3]=0xCE;
03796                  }
03797                }
03798                 else if(l32==1){
03799                     figura_dib[3]=0xCD;
03800                 }
03801                  else{
03802                    figura_dib[3]=0xCC;
03803                  }
03804              }
03805               else if(l31==1){
03806                   if(l32==1){
03807                     figura_dib[3]=0xCB;
03808                   }
03809                    else{
03810                      figura_dib[3]=0xCA;
03811                    }
03812               }
03813                else if(l32==1){
03814                    figura_dib[3]=0xC9;
03815                }
03816                 else{
03817                   figura_dib[3]=0xC8;
03818                 }
03819         }
03820          else if(l30==1){
03821              if(l31==1){
03822                if(l32==1){
03823                  figura_dib[3]=0xC7;
03824                }
03825                 else{
03826                   figura_dib[3]=0xC6;
03827                 }
03828              }
03829               else if(l32==1){
03830                   figura_dib[3]=0xC5;
03831               }
03832                else{
03833                  figura_dib[3]=0xC4;
03834                }
03835          }
03836           else if(l31==1){
03837               if(l32==1){
03838                 figura_dib[3]=0xC3;
03839               }  
03840                else{
03841                  figura_dib[3]=0xC2;
03842                }
03843           }
03844            else if(l32==1){
03845                figura_dib[3]=0xC1;
03846             }
03847              else{
03848                figura_dib[3]=0xC0;
03849              }
03850    }
03851     else if(l27==1){
03852         if(l28==1){
03853           if(l29==1){
03854             if(l30==1){
03855               if(l31==1){
03856                 if(l32==1){
03857                   figura_dib[3]=0xBF;
03858                 }
03859                  else{
03860                    figura_dib[3]=0xBE;
03861                  }
03862               }
03863                else if(l32==1){
03864                    figura_dib[3]=0xBD;
03865                }
03866                 else{
03867                   figura_dib[3]=0xBC;
03868                 }
03869             }
03870              else if(l31==1){
03871                  if(l32==1){
03872                     figura_dib[3]=0xBB;
03873                  }
03874                   else{
03875                     figura_dib[3]=0xBA;
03876                   }
03877              }
03878               else if(l32==1){
03879                   figura_dib[3]=0xB9;
03880               }
03881                else{
03882                  figura_dib[3]=0xB8;
03883                }
03884           }
03885            else if(l30==1){
03886                if(l31==1){
03887                  if(l32==1){
03888                    figura_dib[3]=0xB7;
03889                  }
03890                   else{
03891                     figura_dib[3]=0xB6;
03892                   }
03893                }
03894                 else if(l32==1){
03895                     figura_dib[3]=0xB5;
03896                 }
03897                  else{
03898                    figura_dib[3]=0xB4;
03899                  }
03900             }
03901              else if(l31==1){
03902                  if(l32==1){
03903                    figura_dib[3]=0xB3;
03904                  }
03905                   else{
03906                     figura_dib[3]=0xB2;
03907                   }
03908              }
03909               else if(l32==1){
03910                   figura_dib[3]=0xB1;
03911               }
03912                else{
03913                  figura_dib[3]=0xB0;
03914                }
03915         }
03916          else if(l29==1){
03917              if(l30==1){
03918                if(l31==1){
03919                  if(l32==1){
03920                    figura_dib[3]=0xAF;
03921                  }
03922                   else{
03923                     figura_dib[3]=0xAE;
03924                   }
03925                }
03926                 else if(l32==1){
03927                     figura_dib[3]=0xAD;
03928                 }
03929                  else{
03930                    figura_dib[3]=0xAC;
03931                  }
03932               }
03933                else if(l31==1){
03934                    if(l32==1){
03935                      figura_dib[3]=0xAB;
03936                    }
03937                     else{
03938                       figura_dib[3]=0xAA;
03939                     }
03940                }
03941                 else if(l32==1){
03942                     figura_dib[3]=0xA9;
03943                 }
03944                  else{
03945                    figura_dib[3]=0xA8;
03946                  }
03947          }
03948           else if(l30==1){
03949               if(l31==1){
03950                 if(l32==1){
03951                   figura_dib[3]=0xA7;
03952                 }
03953                  else{
03954                    figura_dib[3]=0xA6;
03955                  }
03956                }
03957                 else if(l32==1){
03958                     figura_dib[3]=0xA5;
03959                 }
03960                  else{
03961                    figura_dib[3]=0xA4;
03962                  }
03963            }
03964             else if(l31==1){
03965                 if(l32==1){
03966                   figura_dib[3]=0xA3;
03967                 }
03968                  else{
03969                    figura_dib[3]=0xA2;
03970                  }
03971             }
03972              else if(l32==1){
03973                  figura_dib[3]=0xA1;
03974              }
03975               else{
03976                 figura_dib[3]=0xA0;
03977               }
03978     }
03979      else if(l28==1){
03980          if(l29==1){
03981            if(l30==1){
03982              if(l31==1){
03983                if(l32==1){
03984                  figura_dib[3]=0x9F;
03985                }
03986                 else{
03987                   figura_dib[3]=0x9E;
03988                 }
03989              }
03990               else if(l32==1){
03991                   figura_dib[3]=0x9D;
03992               }
03993                else{
03994                  figura_dib[3]=0x9C;
03995                }
03996            }
03997             else if(l31==1){
03998                 if(l32==1){
03999                   figura_dib[3]=0x9B;
04000                 }
04001                  else{
04002                    figura_dib[3]=0x9A;
04003                  }
04004             }
04005              else if(l32==1){
04006                  figura_dib[3]=0x99;
04007              }
04008               else{
04009                 figura_dib[3]=0x98;
04010               }
04011          }
04012           else if(l30==1){
04013               if(l31==1){
04014                 if(l32==1){
04015                   figura_dib[3]=0x97;
04016                 }
04017                  else{
04018                    figura_dib[3]=0x96;
04019                  }
04020                }
04021                 else if(l32==1){
04022                     figura_dib[3]=0x95;
04023                 }
04024                  else{
04025                    figura_dib[3]=0x94;
04026                  }
04027            }
04028             else if(l31==1){
04029                 if(l32==1){
04030                   figura_dib[3]=0x93;
04031                 }
04032                  else{
04033                    figura_dib[3]=0x92;
04034                  }
04035             }
04036              else if(l32==1){
04037                  figura_dib[3]=0x91;
04038              }
04039               else{
04040                 figura_dib[3]=0x90;
04041               }
04042       }
04043        else if(l29==1){
04044            if(l30==1){
04045              if(l31==1){
04046                if(l32==1){
04047                  figura_dib[3]=0x8F;
04048                }
04049                else{
04050                  figura_dib[3]=0x8E;
04051                }
04052              }
04053               else if(l32==1){
04054                  figura_dib[3]=0x8D;
04055               }
04056                else{
04057                  figura_dib[3]=0x8C;
04058                }
04059            }
04060             else if(l31==1){
04061                 if(l32==1){
04062                   figura_dib[3]=0x8B;
04063                 }
04064                  else{
04065                    figura_dib[3]=0x8A;
04066                  }
04067             }
04068              else if(l32==1){
04069                  figura_dib[3]=0x89;
04070              }
04071               else{
04072                 figura_dib[3]=0x88;
04073               }
04074        }
04075         else if(l30==1){
04076             if(l31==1){
04077               if(l32==1){
04078                 figura_dib[3]=0x87;
04079               }
04080                else{
04081                  figura_dib[3]=0x86;
04082                }
04083             }
04084              else if(l32==1){
04085                  figura_dib[3]=0x85;
04086              }
04087               else{
04088                 figura_dib[3]=0x84;
04089               }
04090          }
04091           else if(l31==1){
04092               if(l32==1){
04093                  figura_dib[3]=0x83;
04094               }
04095                else{
04096                  figura_dib[3]=0x82;
04097                }
04098           }
04099            else if(l32==1){
04100                figura_dib[3]=0x81;
04101            }
04102             else{
04103               figura_dib[3]=0x80;
04104             }
04105 }
04106  else if(l26==1){
04107      if(l27==1){
04108        if(l28==1){
04109          if(l29==1){
04110             if(l30==1){
04111                if(l31==1){
04112                   if(l32==1){
04113                     figura_dib[3]=0x7F;
04114                   }
04115                    else{                       
04116                      figura_dib[3]=0x7E;
04117                    }
04118                 }
04119                  else if(l32==1){
04120                      figura_dib[3]=0x7D;
04121                  }
04122                   else{
04123                     figura_dib[3]=0x7C;
04124                   }
04125             }
04126              else if(l31==1){
04127                  if(l32==1){
04128                    figura_dib[3]=0x7B;
04129                  }
04130                   else{
04131                     figura_dib[3]=0x7A;
04132                   }
04133              }
04134               else if(l32==1){
04135                   figura_dib[3]=0x79;
04136               }
04137                else{
04138                  figura_dib[3]=0x78;
04139                }                                           
04140          }
04141           else if(l30==1){
04142               if(l31==1){
04143                 if(l32==1){
04144                   figura_dib[3]=0x77;
04145                 }
04146                 else{
04147                   figura_dib[3]=0x76;
04148                 }
04149               }
04150                else if(l32==1){
04151                    figura_dib[3]=0x75;
04152                }
04153                 else{
04154                   figura_dib[3]=0x74;
04155                 }
04156           }
04157            else if(l31==1){
04158                if(l32==1){
04159                  figura_dib[3]=0x73;
04160                }
04161                 else{
04162                  figura_dib[3]=0x72;
04163                 }
04164            }
04165             else if(l32==1){
04166                 figura_dib[3]=0x71;
04167             }
04168              else{
04169                figura_dib[3]=0x70;
04170              }
04171        }
04172         else if(l29==1){
04173             if(l30==1){
04174               if(l31==1){
04175                 if(l30==1){
04176                   figura_dib[3]=0x6F;
04177                 }
04178                  else{
04179                    figura_dib[3]=0x6E;
04180                  }
04181                }
04182                 else if(l32==1){
04183                     figura_dib[3]=0x6D;
04184                 }
04185                  else{
04186                    figura_dib[3]=0x6C;
04187                  }
04188             }
04189              else if(l31==1){
04190                 if(l32==1){
04191                   figura_dib[3]=0x6B;
04192                 }
04193                  else{
04194                    figura_dib[3]=0x6A;
04195                   }
04196              }
04197               else if(l32==1){
04198                  figura_dib[3]=0x69;
04199               }
04200                else{
04201                  figura_dib[3]=0x68;
04202                }                                                              
04203         }
04204          else if(l30==1){
04205              if(l31==1){
04206                if(l32==1){
04207                  figura_dib[3]=0x67;
04208                }
04209                 else{
04210                   figura_dib[3]=0x66;
04211                 }
04212               }
04213                else if(l32==1){
04214                    figura_dib[3]=0x65;
04215                }
04216                 else{
04217                   figura_dib[3]=0x64;
04218                 }
04219           }
04220            else if(l31==1){
04221                if(l32==1){
04222                  figura_dib[3]=0x63;
04223                 }
04224                  else{
04225                    figura_dib[3]=0x62;
04226                  }
04227            }
04228             else if(l32==1){
04229                 figura_dib[3]=0x61;
04230             }
04231              else{
04232                figura_dib[3]=0x60;
04233              }
04234      }
04235       else if(l28==1){
04236           if(l29==1){
04237             if(l30==1){
04238               if(l31==1){
04239                 if(l32==1){
04240                   figura_dib[3]=0x5F;
04241                 }
04242                  else{
04243                    figura_dib[3]=0x5E;
04244                  }
04245               }
04246                else if(l32==1){
04247                    figura_dib[3]=0x5D;
04248                }
04249                 else{
04250                   figura_dib[3]=0x5C;
04251                 }
04252             }
04253              else if(l31==1){
04254                  if(l32==1){
04255                    figura_dib[3]=0x5B;
04256                  }
04257                   else{
04258                     figura_dib[3]=0x5A;
04259                   }
04260               }
04261                else if(l32==1){
04262                    figura_dib[3]=0x59;
04263                }
04264                 else{
04265                   figura_dib[3]=0x58;
04266                 }                                                           
04267           }
04268            else if(l30==1){
04269                if(l31==1){
04270                  if(l32==1){
04271                    figura_dib[3]=0x57;
04272                  }
04273                   else{
04274                     figura_dib[3]=0x56;
04275                   }
04276                }
04277                 else if(l32==1){
04278                    figura_dib[3]=0x55;
04279                 }
04280                  else{
04281                    figura_dib[3]=0x54;
04282                  }
04283            }
04284             else if(l31==1){
04285                 if(l32==1){
04286                   figura_dib[3]=0x53;
04287                 }
04288                  else{
04289                    figura_dib[3]=0x52;
04290                  }
04291             }
04292              else if(l32==1){
04293                  figura_dib[3]=0x51;
04294              }
04295               else{
04296                 figura_dib[3]=0x50;
04297               }
04298       }
04299        else if(l29==1){
04300            if(l30==1){
04301              if(l31==1){
04302                 if(l32==1){
04303                   figura_dib[3]=0x4F;
04304                 }
04305                  else{
04306                    figura_dib[3]=0x4E;
04307                  }
04308              }
04309               else if(l32==1){
04310                   figura_dib[3]=0x4D;
04311               }
04312                else{
04313                  figura_dib[3]=0x4C;
04314                }       
04315            }
04316             else if(l31==1){
04317                 if(l32==1){
04318                   figura_dib[3]=0x4B;
04319                 }
04320                  else{
04321                    figura_dib[3]=0x4A;
04322                  }
04323              }
04324               else if(l32==1){
04325                   figura_dib[3]=0x49;
04326               }
04327                else{
04328                  figura_dib[3]=0x48;
04329                }      
04330        }
04331         else if(l30==1){
04332             if(l31==1){
04333                if(l32==1){
04334                  figura_dib[3]=0x47;
04335                }
04336                 else{
04337                   figura_dib[3]=0x46;
04338                 }
04339             }
04340              else if(l32==1){
04341                  figura_dib[3]=0x45;
04342              }
04343               else{
04344                 figura_dib[3]=0x44;
04345               }
04346         }
04347          else if(l31==1){
04348              if(l32==1){
04349                figura_dib[3]=0x43;
04350              }
04351               else{
04352                 figura_dib[3]=0x42;
04353               }
04354          }
04355           else if(l32==1){
04356               figura_dib[3]=0x41;
04357           }
04358            else{
04359              figura_dib[3]=0x40;
04360            }
04361  }
04362   else if(l27==1){
04363       if(l28==1){
04364         if(l29==1){
04365           if(l30==1){
04366             if(l31==1){
04367               if(l32==1){
04368                 figura_dib[3]=0x3F;                                                                                                                                                           
04369               }
04370                else{
04371                  figura_dib[3]=0x3E;
04372                }
04373              }
04374               else if(l32==1){
04375                   figura_dib[3]=0x3D;
04376               }
04377                else{
04378                  figura_dib[3]=0x3C;
04379                }
04380           }
04381            else if(l31==1){
04382                if(l32==1){
04383                  figura_dib[3]=0x3B;
04384                }  
04385                 else{
04386                   figura_dib[3]=0x3A;
04387                 }
04388            }
04389             else if(l32==1){
04390                 figura_dib[3]=0x39;
04391             }
04392              else{
04393                figura_dib[3]=0x38;
04394              }  
04395         }
04396          else if(l30==1){
04397              if(l31==1){
04398                if(l32==1){
04399                  figura_dib[3]=0x37;
04400                }
04401                 else{
04402                   figura_dib[3]=0x36;
04403                 }
04404              }
04405               else if(l32==1){
04406                   figura_dib[3]=0x35;
04407               }
04408                else{
04409                  figura_dib[3]=0x34;
04410                }
04411          }
04412           else if(l31==1){
04413               if(l32==1){
04414                 figura_dib[3]=0x33;
04415               }
04416                else{
04417                  figura_dib[3]=0x32;
04418                }
04419            }
04420             else if(l32==1){
04421                 figura_dib[3]=0x31;
04422             }
04423              else{
04424                figura_dib[3]=0x30;
04425              }  
04426       }
04427        else if(l29==1){
04428            if(l30==1){
04429               if(l31==1){
04430                  if(l32==1){
04431                     figura_dib[3]=0x2F;
04432                  }
04433                   else{
04434                     figura_dib[3]=0x2E;
04435                   }
04436                }
04437                 else if(l32==1){
04438                     figura_dib[3]=0x2D;
04439                 }
04440                  else{
04441                    figura_dib[3]=0x2C;
04442                  }
04443            }
04444             else if(l31==1){
04445                 if(l32==1){
04446                   figura_dib[3]=0x2B;
04447                 }
04448                  else{
04449                    figura_dib[3]=0x2A;
04450                  }
04451              }
04452               else if(l32==1){
04453                   figura_dib[3]=0x29;
04454               }
04455                else{
04456                  figura_dib[3]=0x28;
04457                } 
04458        }
04459         else if(l30==1){
04460             if(l31==1){
04461                if(l32==1){
04462                   figura_dib[3]=0x27;
04463                }
04464                 else{
04465                   figura_dib[3]=0x26;
04466                 }
04467              }
04468               else if(l32==1){
04469                   figura_dib[3]=0x25;
04470               }
04471                else{
04472                  figura_dib[3]=0x24;
04473                }
04474          }
04475           else if(l31==1){
04476               if(l32==1){
04477                 figura_dib[3]=0x23;
04478               }
04479                else{
04480                  figura_dib[3]=0x22;
04481                }
04482           }
04483            else if(l32==1){
04484                figura_dib[3]=0x21;
04485            }
04486             else{
04487               figura_dib[3]=0x20;
04488             } 
04489   }
04490    else if(l28==1){
04491        if(l29==1){
04492           if(l30==1){
04493              if(l31==1){
04494                 if(l32==1){
04495                    figura_dib[3]=0x1F; 
04496                 }
04497                  else{
04498                    figura_dib[3]=0x1E;
04499                  }
04500              }
04501               else if(l32==1){
04502                   figura_dib[3]=0x1D;
04503               }
04504                else{
04505                  figura_dib[3]=0x1C;
04506                }
04507           }
04508            else if(l31==1){
04509                if(l32==1){
04510                  figura_dib[3]=0x1B;
04511                }
04512                 else{
04513                   figura_dib[3]=0x1A;
04514                 }
04515            }
04516             else if(l32==1){
04517                 figura_dib[3]=0x19;
04518             }
04519              else{
04520                figura_dib[3]=0x18;
04521              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
04522        }
04523         else if(l30==1){
04524             if(l31==1){
04525               if(l32==1){
04526                 figura_dib[3]=0x17;
04527               }
04528                else{
04529                  figura_dib[3]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
04530                }
04531             }
04532              else if(l32==1){
04533                  figura_dib[3]=0x15;
04534              }
04535               else{
04536                 figura_dib[3]=0x14;
04537               }
04538         }
04539          else if(l31==1){
04540              if(l32==1){
04541                figura_dib[3]=0x13;
04542              }
04543               else{
04544                 figura_dib[3]=0x12;
04545               }
04546           }
04547            else if(l32==1){
04548                figura_dib[3]=0x11;
04549            }
04550             else{
04551               figura_dib[3]=0x10;
04552             }  
04553    }
04554     else if(l29==1){
04555         if(l30==1){
04556           if(l31==1){
04557             if(l32==1){
04558               figura_dib[3]=0x0F; 
04559             }
04560              else{
04561                figura_dib[3]=0x0E;
04562              }
04563           }
04564            else if(l32==1){
04565                figura_dib[3]=0x0D;
04566            }
04567             else{
04568               figura_dib[3]=0x0C;
04569             }
04570         }
04571          else if(l31==1){
04572              if(l32==1){
04573                figura_dib[3]=0x0B;
04574              }
04575               else{
04576                 figura_dib[3]=0x0A;
04577               }
04578          }
04579           else if(l32==1){
04580               figura_dib[3]=0x09;
04581           }
04582            else{
04583              figura_dib[3]=0x08;
04584            }      
04585     }
04586      else if(l30==1){
04587          if(l31==1){
04588            if(l32==1){
04589              figura_dib[3]=0x07;
04590            }
04591             else{
04592               figura_dib[3]=0x06;
04593             }
04594          }
04595           else if(l32==1){
04596               figura_dib[3]=0x05;
04597           }
04598            else{
04599              figura_dib[3]=0x04;
04600            }
04601      }
04602       else if(l31==1){
04603           if(l32==1){
04604             figura_dib[3]=0x03;
04605           }  
04606            else{
04607              figura_dib[3]=0x02;
04608            }
04609       }
04610        else if(l32==1){
04611            figura_dib[3]=0x01;
04612        }
04613         else{
04614           figura_dib[3]=0x00;
04615         }                                                                                                                                                                                                                                                                                                                                                                               
04616 ///// 
04617 ////
04618 ///
04619 //
04620 //fila 5
04621 //
04622 ///
04623 ////
04624 /////
04625 if(l33==1){
04626    if(l34==1){
04627       if(l35==1){
04628          if(l36==1){
04629             if(l37==1){
04630                if(l38==1){
04631                   if(l39==1){
04632                      if(l40==1){
04633                         figura_dib[4]=0xFF;
04634                      }
04635                        else{
04636                          figura_dib[4]=0xFE;
04637                        }
04638                    }
04639                     else if(l40==1){
04640                         figura_dib[4]=0xFD;
04641                     }
04642                      else{
04643                        figura_dib[4]=0xFC;
04644                      }
04645                }
04646                 else if(l39==1){
04647                     if(l40==1){
04648                        figura_dib[4]=0xFB;
04649                     }
04650                      else{
04651                        figura_dib[4]=0xFA;
04652                      }
04653                 }
04654                  else if(l40==1){
04655                      figura_dib[4]=0xF9;
04656                  }
04657                   else{
04658                     figura_dib[4]=0xF8;
04659                   }
04660              }
04661               else if(l38==1){
04662                   if(l39==1){
04663                     if(l40==1){
04664                       figura_dib[4]=0xF7;
04665                     }
04666                      else{
04667                        figura_dib[4]=0xF6;
04668                      }
04669                    }
04670                     else if(l40==1){
04671                         figura_dib[4]=0xF5;
04672                     }
04673                      else{
04674                        figura_dib[4]=0xF4;
04675                      }
04676                }
04677                 else if(l39==1){
04678                     if(l40==1){
04679                       figura_dib[4]=0xF3;
04680                     }
04681                      else{
04682                        figura_dib[4]=0xF2;
04683                      }
04684                 }
04685                  else if(l40==1){
04686                      figura_dib[4]=0xF1;
04687                  }
04688                   else{
04689                     figura_dib[4]=0xF0;
04690                   }
04691          }
04692           else if(l37==1){
04693               if(l38==1){
04694                 if(l39==1){
04695                   if(l40==1){
04696                     figura_dib[4]=0xEF;
04697                   }
04698                    else{
04699                     figura_dib[4]=0xEE;
04700                    }
04701                 }
04702                  else if(l40==1){
04703                     figura_dib[4]=0xED;
04704                  }
04705                   else{
04706                     figura_dib[4]=0xEC;
04707                   }
04708               }
04709                else if(l39==1){
04710                    if(l40==1){
04711                       figura_dib[4]=0xEB;
04712                    }
04713                     else{
04714                       figura_dib[4]=0xEA;
04715                     }
04716                }
04717                 else if(l40==1){
04718                     figura_dib[4]=0xE9;
04719                 }
04720                  else{
04721                    figura_dib[4]=0xE8;
04722                  }                   
04723           }
04724            else if(l38==1){
04725                if(l39==1){
04726                  if(l40==1){
04727                    figura_dib[4]=0xE7;
04728                  }
04729                  else{
04730                    figura_dib[4]=0xE6;
04731                  }
04732                }
04733                 else if(l40==1){
04734                     figura_dib[4]=0xE5;
04735                 }
04736                  else{
04737                    figura_dib[4]=0xE4;
04738                  }
04739             }
04740              else if(l39==1){
04741                  if(l40==1){
04742                     figura_dib[4]=0xE3;
04743                  }
04744                   else{
04745                     figura_dib[4]=0xE2;
04746                   }
04747              }
04748               else if(l40==1){
04749                   figura_dib[4]=0xE1;
04750               }
04751                else{
04752                  figura_dib[4]=0xE0;
04753                }
04754       }
04755        else if(l36==1){
04756           if(l37==1){
04757             if(l38==1){
04758               if(l39==1){
04759                 if(l40==1){
04760                   figura_dib[4]=0xDF;
04761                 }
04762                  else{
04763                   figura_dib[4]=0xDE;
04764                  }
04765               }
04766                else if(l40==1){
04767                   figura_dib[4]=0xDD;
04768                }
04769                 else{
04770                   figura_dib[4]=0xDC;
04771                 }
04772             }
04773              else if(l39==1){
04774                 if(l40==1){
04775                   figura_dib[4]=0xDB;
04776                 }
04777                  else{
04778                    figura_dib[4]=0xDA;
04779                  }
04780              }
04781               else if(l40==1){
04782                   figura_dib[4]=0xD9;
04783               }
04784                else{
04785                  figura_dib[4]=0xD8;
04786                }
04787           }
04788            else if(l38==1){
04789                if(l39==1){
04790                  if(l40==1){
04791                    figura_dib[4]=0xD7;
04792                  }
04793                   else{
04794                     figura_dib[4]=0xD6;
04795                   }
04796                 }
04797                  else if(l40==1){
04798                      figura_dib[4]=0xD5;
04799                  }
04800                   else{
04801                     figura_dib[4]=0xD4;
04802                   }
04803            }
04804             else if(l39==1){
04805                 if(l40==1){
04806                   figura_dib[4]=0xD3;
04807                 }
04808                  else{
04809                    figura_dib[4]=0xD2;
04810                  }
04811             }
04812              else if(l40==1){
04813                  figura_dib[4]=0xD1;
04814              }
04815               else{
04816                 figura_dib[4]=0xD0;
04817               }
04818        }
04819         else if(l37==1){
04820             if(l38==1){
04821               if(l39==1){
04822                 if(l40==1){
04823                   figura_dib[4]=0xCF;
04824                 }
04825                  else{
04826                    figura_dib[4]=0xCE;
04827                  }
04828                }
04829                 else if(l40==1){
04830                     figura_dib[4]=0xCD;
04831                 }
04832                  else{
04833                    figura_dib[4]=0xCC;
04834                  }
04835              }
04836               else if(l39==1){
04837                   if(l40==1){
04838                     figura_dib[4]=0xCB;
04839                   }
04840                    else{
04841                      figura_dib[4]=0xCA;
04842                    }
04843               }
04844                else if(l40==1){
04845                    figura_dib[4]=0xC9;
04846                }
04847                 else{
04848                   figura_dib[4]=0xC8;
04849                 }
04850         }
04851          else if(l38==1){
04852              if(l39==1){
04853                if(l40==1){
04854                  figura_dib[4]=0xC7;
04855                }
04856                 else{
04857                   figura_dib[4]=0xC6;
04858                 }
04859              }
04860               else if(l40==1){
04861                   figura_dib[4]=0xC5;
04862               }
04863                else{
04864                  figura_dib[4]=0xC4;
04865                }
04866          }
04867           else if(l39==1){
04868               if(l40==1){
04869                 figura_dib[4]=0xC3;
04870               }  
04871                else{
04872                  figura_dib[4]=0xC2;
04873                }
04874           }
04875            else if(l40==1){
04876                figura_dib[4]=0xC1;
04877             }
04878              else{
04879                figura_dib[4]=0xC0;
04880              }
04881    }
04882     else if(l35==1){
04883         if(l36==1){
04884           if(l37==1){
04885             if(l38==1){
04886               if(l39==1){
04887                 if(l40==1){
04888                   figura_dib[4]=0xBF;
04889                 }
04890                  else{
04891                    figura_dib[4]=0xBE;
04892                  }
04893               }
04894                else if(l40==1){
04895                    figura_dib[4]=0xBD;
04896                }
04897                 else{
04898                   figura_dib[4]=0xBC;
04899                 }
04900             }
04901              else if(l39==1){
04902                  if(l40==1){
04903                     figura_dib[4]=0xBB;
04904                  }
04905                   else{
04906                     figura_dib[4]=0xBA;
04907                   }
04908              }
04909               else if(l40==1){
04910                   figura_dib[4]=0xB9;
04911               }
04912                else{
04913                  figura_dib[4]=0xB8;
04914                }
04915           }
04916            else if(l38==1){
04917                if(l39==1){
04918                  if(l40==1){
04919                    figura_dib[4]=0xB7;
04920                  }
04921                   else{
04922                     figura_dib[4]=0xB6;
04923                   }
04924                }
04925                 else if(l40==1){
04926                     figura_dib[4]=0xB5;
04927                 }
04928                  else{
04929                    figura_dib[4]=0xB4;
04930                  }
04931             }
04932              else if(l39==1){
04933                  if(l40==1){
04934                    figura_dib[4]=0xB3;
04935                  }
04936                   else{
04937                     figura_dib[4]=0xB2;
04938                   }
04939              }
04940               else if(l40==1){
04941                   figura_dib[4]=0xB1;
04942               }
04943                else{
04944                  figura_dib[4]=0xB0;
04945                }
04946         }
04947          else if(l37==1){
04948              if(l38==1){
04949                if(l39==1){
04950                  if(l40==1){
04951                    figura_dib[4]=0xAF;
04952                  }
04953                   else{
04954                     figura_dib[4]=0xAE;
04955                   }
04956                }
04957                 else if(l40==1){
04958                     figura_dib[4]=0xAD;
04959                 }
04960                  else{
04961                    figura_dib[4]=0xAC;
04962                  }
04963               }
04964                else if(l39==1){
04965                    if(l40==1){
04966                      figura_dib[4]=0xAB;
04967                    }
04968                     else{
04969                       figura_dib[4]=0xAA;
04970                     }
04971                }
04972                 else if(l40==1){
04973                     figura_dib[4]=0xA9;
04974                 }
04975                  else{
04976                    figura_dib[4]=0xA8;
04977                  }
04978          }
04979           else if(l38==1){
04980               if(l39==1){
04981                 if(l40==1){
04982                   figura_dib[4]=0xA7;
04983                 }
04984                  else{
04985                    figura_dib[4]=0xA6;
04986                  }
04987                }
04988                 else if(l40==1){
04989                     figura_dib[4]=0xA5;
04990                 }
04991                  else{
04992                    figura_dib[4]=0xA4;
04993                  }
04994            }
04995             else if(l39==1){
04996                 if(l40==1){
04997                   figura_dib[4]=0xA3;
04998                 }
04999                  else{
05000                    figura_dib[4]=0xA2;
05001                  }
05002             }
05003              else if(l40==1){
05004                  figura_dib[4]=0xA1;
05005              }
05006               else{
05007                 figura_dib[4]=0xA0;
05008               }
05009     }
05010      else if(l36==1){
05011          if(l37==1){
05012            if(l38==1){
05013              if(l39==1){
05014                if(l40==1){
05015                  figura_dib[4]=0x9F;
05016                }
05017                 else{
05018                   figura_dib[4]=0x9E;
05019                 }
05020              }
05021               else if(l40==1){
05022                   figura_dib[4]=0x9D;
05023               }
05024                else{
05025                  figura_dib[4]=0x9C;
05026                }
05027            }
05028             else if(l39==1){
05029                 if(l40==1){
05030                   figura_dib[4]=0x9B;
05031                 }
05032                  else{
05033                    figura_dib[4]=0x9A;
05034                  }
05035             }
05036              else if(l40==1){
05037                  figura_dib[4]=0x99;
05038              }
05039               else{
05040                 figura_dib[4]=0x98;
05041               }
05042          }
05043           else if(l38==1){
05044               if(l39==1){
05045                 if(l40==1){
05046                   figura_dib[4]=0x97;
05047                 }
05048                  else{
05049                    figura_dib[4]=0x96;
05050                  }
05051                }
05052                 else if(l40==1){
05053                     figura_dib[4]=0x95;
05054                 }
05055                  else{
05056                    figura_dib[4]=0x94;
05057                  }
05058            }
05059             else if(l39==1){
05060                 if(l40==1){
05061                   figura_dib[4]=0x93;
05062                 }
05063                  else{
05064                    figura_dib[4]=0x92;
05065                  }
05066             }
05067              else if(l40==1){
05068                  figura_dib[4]=0x91;
05069              }
05070               else{
05071                 figura_dib[4]=0x90;
05072               }
05073       }
05074        else if(l37==1){
05075            if(l38==1){
05076              if(l39==1){
05077                if(l40==1){
05078                  figura_dib[4]=0x8F;
05079                }
05080                else{
05081                  figura_dib[4]=0x8E;
05082                }
05083              }
05084               else if(l40==1){
05085                  figura_dib[4]=0x8D;
05086               }
05087                else{
05088                  figura_dib[4]=0x8C;
05089                }
05090            }
05091             else if(l39==1){
05092                 if(l40==1){
05093                   figura_dib[4]=0x8B;
05094                 }
05095                  else{
05096                    figura_dib[4]=0x8A;
05097                  }
05098             }
05099              else if(l40==1){
05100                  figura_dib[4]=0x89;
05101              }
05102               else{
05103                 figura_dib[4]=0x88;
05104               }
05105        }
05106         else if(l38==1){
05107             if(l39==1){
05108               if(l40==1){
05109                 figura_dib[4]=0x87;
05110               }
05111                else{
05112                  figura_dib[4]=0x86;
05113                }
05114             }
05115              else if(l40==1){
05116                  figura_dib[4]=0x85;
05117              }
05118               else{
05119                 figura_dib[4]=0x84;
05120               }
05121          }
05122           else if(l39==1){
05123               if(l40==1){
05124                  figura_dib[4]=0x83;
05125               }
05126                else{
05127                  figura_dib[4]=0x82;
05128                }
05129           }
05130            else if(l40==1){
05131                figura_dib[4]=0x81;
05132            }
05133             else{
05134               figura_dib[4]=0x80;
05135             }
05136 }
05137  else if(l34==1){
05138      if(l35==1){
05139        if(l36==1){
05140          if(l37==1){
05141             if(l38==1){
05142                if(l39==1){
05143                   if(l40==1){
05144                     figura_dib[4]=0x7F;
05145                   }
05146                    else{                       
05147                      figura_dib[4]=0x7E;
05148                    }
05149                 }
05150                  else if(l40==1){
05151                      figura_dib[4]=0x7D;
05152                  }
05153                   else{
05154                     figura_dib[4]=0x7C;
05155                   }
05156             }
05157              else if(l39==1){
05158                  if(l40==1){
05159                    figura_dib[4]=0x7B;
05160                  }
05161                   else{
05162                     figura_dib[4]=0x7A;
05163                   }
05164              }
05165               else if(l40==1){
05166                   figura_dib[4]=0x79;
05167               }
05168                else{
05169                  figura_dib[4]=0x78;
05170                }                                           
05171          }
05172           else if(l38==1){
05173               if(l39==1){
05174                 if(l40==1){
05175                   figura_dib[4]=0x77;
05176                 }
05177                 else{
05178                   figura_dib[4]=0x76;
05179                 }
05180               }
05181                else if(l40==1){
05182                    figura_dib[4]=0x75;
05183                }
05184                 else{
05185                   figura_dib[4]=0x74;
05186                 }
05187           }
05188            else if(l39==1){
05189                if(l40==1){
05190                  figura_dib[4]=0x73;
05191                }
05192                 else{
05193                  figura_dib[4]=0x72;
05194                 }
05195            }
05196             else if(l40==1){
05197                 figura_dib[4]=0x71;
05198             }
05199              else{
05200                figura_dib[4]=0x70;
05201              }
05202        }
05203         else if(l37==1){
05204             if(l38==1){
05205               if(l39==1){
05206                 if(l40==1){
05207                   figura_dib[4]=0x6F;
05208                 }
05209                  else{
05210                    figura_dib[4]=0x6E;
05211                  }
05212                }
05213                 else if(l40==1){
05214                     figura_dib[4]=0x6D;
05215                 }
05216                  else{
05217                    figura_dib[4]=0x6C;
05218                  }
05219             }
05220              else if(l39==1){
05221                 if(l40==1){
05222                   figura_dib[4]=0x6B;
05223                 }
05224                  else{
05225                    figura_dib[4]=0x6A;
05226                   }
05227              }
05228               else if(l40==1){
05229                  figura_dib[4]=0x69;
05230               }
05231                else{
05232                  figura_dib[4]=0x68;
05233                }                                                              
05234         }
05235          else if(l38==1){
05236              if(l39==1){
05237                if(l40==1){
05238                  figura_dib[4]=0x67;
05239                }
05240                 else{
05241                   figura_dib[4]=0x66;
05242                 }
05243               }
05244                else if(l40==1){
05245                    figura_dib[4]=0x65;
05246                }
05247                 else{
05248                   figura_dib[4]=0x64;
05249                 }
05250           }
05251            else if(l39==1){
05252                if(l40==1){
05253                  figura_dib[4]=0x63;
05254                 }
05255                  else{
05256                    figura_dib[4]=0x62;
05257                  }
05258            }
05259             else if(l40==1){
05260                 figura_dib[4]=0x61;
05261             }
05262              else{
05263                figura_dib[4]=0x60;
05264              }
05265      }
05266       else if(l36==1){
05267           if(l37==1){
05268             if(l38==1){
05269               if(l39==1){
05270                 if(l40==1){
05271                   figura_dib[4]=0x5F;
05272                 }
05273                  else{
05274                    figura_dib[4]=0x5E;
05275                  }
05276               }
05277                else if(l40==1){
05278                    figura_dib[4]=0x5D;
05279                }
05280                 else{
05281                   figura_dib[4]=0x5C;
05282                 }
05283             }
05284              else if(l39==1){
05285                  if(l40==1){
05286                    figura_dib[4]=0x5B;
05287                  }
05288                   else{
05289                     figura_dib[4]=0x5A;
05290                   }
05291               }
05292                else if(l40==1){
05293                    figura_dib[4]=0x59;
05294                }
05295                 else{
05296                   figura_dib[4]=0x58;
05297                 }                                                           
05298           }
05299            else if(l38==1){
05300                if(l39==1){
05301                  if(l40==1){
05302                    figura_dib[4]=0x57;
05303                  }
05304                   else{
05305                     figura_dib[4]=0x56;
05306                   }
05307                }
05308                 else if(l40==1){
05309                    figura_dib[4]=0x55;
05310                 }
05311                  else{
05312                    figura_dib[4]=0x54;
05313                  }
05314            }
05315             else if(l39==1){
05316                 if(l40==1){
05317                   figura_dib[4]=0x53;
05318                 }
05319                  else{
05320                    figura_dib[4]=0x52;
05321                  }
05322             }
05323              else if(l40==1){
05324                  figura_dib[4]=0x51;
05325              }
05326               else{
05327                 figura_dib[4]=0x50;
05328               }
05329       }
05330        else if(l37==1){
05331            if(l38==1){
05332              if(l39==1){
05333                 if(l40==1){
05334                   figura_dib[4]=0x4F;
05335                 }
05336                  else{
05337                    figura_dib[4]=0x4E;
05338                  }
05339              }
05340               else if(l40==1){
05341                   figura_dib[4]=0x4D;
05342               }
05343                else{
05344                  figura_dib[4]=0x4C;
05345                }       
05346            }
05347             else if(l39==1){
05348                 if(l40==1){
05349                   figura_dib[4]=0x4B;
05350                 }
05351                  else{
05352                    figura_dib[4]=0x4A;
05353                  }
05354              }
05355               else if(l40==1){
05356                   figura_dib[4]=0x49;
05357               }
05358                else{
05359                  figura_dib[4]=0x48;
05360                }      
05361        }
05362         else if(l38==1){
05363             if(l39==1){
05364                if(l40==1){
05365                  figura_dib[4]=0x47;
05366                }
05367                 else{
05368                   figura_dib[4]=0x46;
05369                 }
05370             }
05371              else if(l40==1){
05372                  figura_dib[4]=0x45;
05373              }
05374               else{
05375                 figura_dib[4]=0x44;
05376               }
05377         }
05378          else if(l39==1){
05379              if(l40==1){
05380                figura_dib[4]=0x43;
05381              }
05382               else{
05383                 figura_dib[4]=0x42;
05384               }
05385          }
05386           else if(l40==1){
05387               figura_dib[4]=0x41;
05388           }
05389            else{
05390              figura_dib[4]=0x40;
05391            }
05392  }
05393   else if(l35==1){
05394       if(l36==1){
05395         if(l37==1){
05396           if(l38==1){
05397             if(l39==1){
05398               if(l40==1){
05399                 figura_dib[4]=0x3F;                                                                                                                                                           
05400               }
05401                else{
05402                  figura_dib[4]=0x3E;
05403                }
05404              }
05405               else if(l40==1){
05406                   figura_dib[4]=0x3D;
05407               }
05408                else{
05409                  figura_dib[4]=0x3C;
05410                }
05411           }
05412            else if(l39==1){
05413                if(l40==1){
05414                  figura_dib[4]=0x3B;
05415                }  
05416                 else{
05417                   figura_dib[4]=0x3A;
05418                 }
05419            }
05420             else if(l40==1){
05421                 figura_dib[4]=0x39;
05422             }
05423              else{
05424                figura_dib[4]=0x38;
05425              }  
05426         }
05427          else if(l38==1){
05428              if(l39==1){
05429                if(l40==1){
05430                  figura_dib[4]=0x37;
05431                }
05432                 else{
05433                   figura_dib[4]=0x36;
05434                 }
05435              }
05436               else if(l40==1){
05437                   figura_dib[4]=0x35;
05438               }
05439                else{
05440                  figura_dib[4]=0x34;
05441                }
05442          }
05443           else if(l39==1){
05444               if(l40==1){
05445                 figura_dib[4]=0x33;
05446               }
05447                else{
05448                  figura_dib[4]=0x32;
05449                }
05450            }
05451             else if(l40==1){
05452                 figura_dib[4]=0x31;
05453             }
05454              else{
05455                figura_dib[4]=0x30;
05456              }  
05457       }
05458        else if(l37==1){
05459            if(l38==1){
05460               if(l39==1){
05461                  if(l40==1){
05462                     figura_dib[4]=0x2F;
05463                  }
05464                   else{
05465                     figura_dib[4]=0x2E;
05466                   }
05467                }
05468                 else if(l40==1){
05469                     figura_dib[4]=0x2D;
05470                 }
05471                  else{
05472                    figura_dib[4]=0x2C;
05473                  }
05474            }
05475             else if(l39==1){
05476                 if(l40==1){
05477                   figura_dib[4]=0x2B;
05478                 }
05479                  else{
05480                    figura_dib[4]=0x2A;
05481                  }
05482              }
05483               else if(l40==1){
05484                   figura_dib[4]=0x29;
05485               }
05486                else{
05487                  figura_dib[4]=0x28;
05488                } 
05489        }
05490         else if(l38==1){
05491             if(l39==1){
05492                if(l40==1){
05493                   figura_dib[4]=0x27;
05494                }
05495                 else{
05496                   figura_dib[4]=0x26;
05497                 }
05498              }
05499               else if(l40==1){
05500                   figura_dib[4]=0x25;
05501               }
05502                else{
05503                  figura_dib[4]=0x24;
05504                }
05505          }
05506           else if(l39==1){
05507               if(l40==1){
05508                 figura_dib[4]=0x23;
05509               }
05510                else{
05511                  figura_dib[4]=0x22;
05512                }
05513           }
05514            else if(l40==1){
05515                figura_dib[4]=0x21;
05516            }
05517             else{
05518               figura_dib[4]=0x20;
05519             } 
05520   }
05521    else if(l36==1){
05522        if(l37==1){
05523           if(l38==1){
05524              if(l39==1){
05525                 if(l40==1){
05526                    figura_dib[4]=0x1F; 
05527                 }
05528                  else{
05529                    figura_dib[4]=0x1E;
05530                  }
05531              }
05532               else if(l40==1){
05533                   figura_dib[4]=0x1D;
05534               }
05535                else{
05536                  figura_dib[4]=0x1C;
05537                }
05538           }
05539            else if(l39==1){
05540                if(l40==1){
05541                  figura_dib[4]=0x1B;
05542                }
05543                 else{
05544                   figura_dib[4]=0x1A;
05545                 }
05546            }
05547             else if(l40==1){
05548                 figura_dib[4]=0x19;
05549             }
05550              else{
05551                figura_dib[4]=0x18;
05552              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
05553        }
05554         else if(l38==1){
05555             if(l39==1){
05556               if(l40==1){
05557                 figura_dib[4]=0x17;
05558               }
05559                else{
05560                  figura_dib[4]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
05561                }
05562             }
05563              else if(l40==1){
05564                  figura_dib[4]=0x15;
05565              }
05566               else{
05567                 figura_dib[4]=0x14;
05568               }
05569         }
05570          else if(l39==1){
05571              if(l40==1){
05572                figura_dib[4]=0x13;
05573              }
05574               else{
05575                 figura_dib[4]=0x12;
05576               }
05577           }
05578            else if(l40==1){
05579                figura_dib[4]=0x11;
05580            }
05581             else{
05582               figura_dib[4]=0x10;
05583             }  
05584    }
05585     else if(l37==1){
05586         if(l38==1){
05587           if(l39==1){
05588             if(l40==1){
05589               figura_dib[4]=0x0F; 
05590             }
05591              else{
05592                figura_dib[4]=0x0E;
05593              }
05594           }
05595            else if(l40==1){
05596                figura_dib[4]=0x0D;
05597            }
05598             else{
05599               figura_dib[4]=0x0C;
05600             }
05601         }
05602          else if(l39==1){
05603              if(l40==1){
05604                figura_dib[4]=0x0B;
05605              }
05606               else{
05607                 figura_dib[4]=0x0A;
05608               }
05609          }
05610           else if(l40==1){
05611               figura_dib[4]=0x09;
05612           }
05613            else{
05614              figura_dib[4]=0x08;
05615            }      
05616     }
05617      else if(l38==1){
05618          if(l39==1){
05619            if(l40==1){
05620              figura_dib[4]=0x07;
05621            }
05622             else{
05623               figura_dib[4]=0x06;
05624             }
05625          }
05626           else if(l40==1){
05627               figura_dib[4]=0x05;
05628           }
05629            else{
05630              figura_dib[4]=0x04;
05631            }
05632      }
05633       else if(l39==1){
05634           if(l40==1){
05635             figura_dib[4]=0x03;
05636           }  
05637            else{
05638              figura_dib[4]=0x02;
05639            }
05640       }
05641        else if(l40==1){
05642            figura_dib[4]=0x01;
05643        }
05644         else{
05645           figura_dib[4]=0x00;
05646         }                                                                                                                                                                                                                                                                                                                                                                               
05647 ///// 
05648 ////
05649 ///
05650 //
05651 //fila 6
05652 //
05653 ///
05654 ////
05655 /////
05656 if(l41==1){
05657    if(l42==1){
05658       if(l43==1){
05659          if(l44==1){
05660             if(l45==1){
05661                if(l46==1){
05662                   if(l47==1){
05663                      if(l48==1){
05664                         figura_dib[5]=0xFF;
05665                      }
05666                        else{
05667                          figura_dib[5]=0xFE;
05668                        }
05669                    }
05670                     else if(l48==1){
05671                         figura_dib[5]=0xFD;
05672                     }
05673                      else{
05674                        figura_dib[5]=0xFC;
05675                      }
05676                }
05677                 else if(l47==1){
05678                     if(l48==1){
05679                        figura_dib[5]=0xFB;
05680                     }
05681                      else{
05682                        figura_dib[5]=0xFA;
05683                      }
05684                 }
05685                  else if(l48==1){
05686                      figura_dib[5]=0xF9;
05687                  }
05688                   else{
05689                     figura_dib[5]=0xF8;
05690                   }
05691              }
05692               else if(l46==1){
05693                   if(l47==1){
05694                     if(l48==1){
05695                       figura_dib[5]=0xF7;
05696                     }
05697                      else{
05698                        figura_dib[5]=0xF6;
05699                      }
05700                    }
05701                     else if(l48==1){
05702                         figura_dib[5]=0xF5;
05703                     }
05704                      else{
05705                        figura_dib[5]=0xF4;
05706                      }
05707                }
05708                 else if(l47==1){
05709                     if(l48==1){
05710                       figura_dib[5]=0xF3;
05711                     }
05712                      else{
05713                        figura_dib[5]=0xF2;
05714                      }
05715                 }
05716                  else if(l48==1){
05717                      figura_dib[5]=0xF1;
05718                  }
05719                   else{
05720                     figura_dib[5]=0xF0;
05721                   }
05722          }
05723           else if(l45==1){
05724               if(l46==1){
05725                 if(l47==1){
05726                   if(l48==1){
05727                     figura_dib[5]=0xEF;
05728                   }
05729                    else{
05730                     figura_dib[5]=0xEE;
05731                    }
05732                 }
05733                  else if(l48==1){
05734                     figura_dib[5]=0xED;
05735                  }
05736                   else{
05737                     figura_dib[5]=0xEC;
05738                   }
05739               }
05740                else if(l47==1){
05741                    if(l48==1){
05742                       figura_dib[5]=0xEB;
05743                    }
05744                     else{
05745                       figura_dib[5]=0xEA;
05746                     }
05747                }
05748                 else if(l48==1){
05749                     figura_dib[5]=0xE9;
05750                 }
05751                  else{
05752                    figura_dib[5]=0xE8;
05753                  }                   
05754           }
05755            else if(l46==1){
05756                if(l47==1){
05757                  if(l48==1){
05758                    figura_dib[5]=0xE7;
05759                  }
05760                  else{
05761                    figura_dib[5]=0xE6;
05762                  }
05763                }
05764                 else if(l45==1){
05765                     figura_dib[5]=0xE5;
05766                 }
05767                  else{
05768                    figura_dib[5]=0xE4;
05769                  }
05770             }
05771              else if(l47==1){
05772                  if(l48==1){
05773                     figura_dib[5]=0xE3;
05774                  }
05775                   else{
05776                     figura_dib[5]=0xE2;
05777                   }
05778              }
05779               else if(l48==1){
05780                   figura_dib[5]=0xE1;
05781               }
05782                else{
05783                  figura_dib[5]=0xE0;
05784                }
05785       }
05786        else if(l44==1){
05787           if(l45==1){
05788             if(l46==1){
05789               if(l47==1){
05790                 if(l48==1){
05791                   figura_dib[5]=0xDF;
05792                 }
05793                  else{
05794                   figura_dib[5]=0xDE;
05795                  }
05796               }
05797                else if(l48==1){
05798                   figura_dib[5]=0xDD;
05799                }
05800                 else{
05801                   figura_dib[5]=0xDC;
05802                 }
05803             }
05804              else if(l47==1){
05805                 if(l48==1){
05806                   figura_dib[5]=0xDB;
05807                 }
05808                  else{
05809                    figura_dib[5]=0xDA;
05810                  }
05811              }
05812               else if(l48==1){
05813                   figura_dib[5]=0xD9;
05814               }
05815                else{
05816                  figura_dib[5]=0xD8;
05817                }
05818           }
05819            else if(l46==1){
05820                if(l47==1){
05821                  if(l48==1){
05822                    figura_dib[5]=0xD7;
05823                  }
05824                   else{
05825                     figura_dib[5]=0xD6;
05826                   }
05827                 }
05828                  else if(l48==1){
05829                      figura_dib[5]=0xD5;
05830                  }
05831                   else{
05832                     figura_dib[5]=0xD4;
05833                   }
05834            }
05835             else if(l47==1){
05836                 if(l48==1){
05837                   figura_dib[5]=0xD3;
05838                 }
05839                  else{
05840                    figura_dib[5]=0xD2;
05841                  }
05842             }
05843              else if(l48==1){
05844                  figura_dib[5]=0xD1;
05845              }
05846               else{
05847                 figura_dib[5]=0xD0;
05848               }
05849        }
05850         else if(l45==1){
05851             if(l46==1){
05852               if(l47==1){
05853                 if(l48==1){
05854                   figura_dib[5]=0xCF;
05855                 }
05856                  else{
05857                    figura_dib[5]=0xCE;
05858                  }
05859                }
05860                 else if(l48==1){
05861                     figura_dib[5]=0xCD;
05862                 }
05863                  else{
05864                    figura_dib[5]=0xCC;
05865                  }
05866              }
05867               else if(l47==1){
05868                   if(l48==1){
05869                     figura_dib[5]=0xCB;
05870                   }
05871                    else{
05872                      figura_dib[5]=0xCA;
05873                    }
05874               }
05875                else if(l48==1){
05876                    figura_dib[5]=0xC9;
05877                }
05878                 else{
05879                   figura_dib[5]=0xC8;
05880                 }
05881         }
05882          else if(l46==1){
05883              if(l47==1){
05884                if(l48==1){
05885                  figura_dib[5]=0xC7;
05886                }
05887                 else{
05888                   figura_dib[5]=0xC6;
05889                 }
05890              }
05891               else if(l48==1){
05892                   figura_dib[5]=0xC5;
05893               }
05894                else{
05895                  figura_dib[5]=0xC4;
05896                }
05897          }
05898           else if(l47==1){
05899               if(l48==1){
05900                 figura_dib[5]=0xC3;
05901               }  
05902                else{
05903                  figura_dib[5]=0xC2;
05904                }
05905           }
05906            else if(l48==1){
05907                figura_dib[5]=0xC1;
05908             }
05909              else{
05910                figura_dib[5]=0xC0;
05911              }
05912    }
05913     else if(l43==1){
05914         if(l44==1){
05915           if(l45==1){
05916             if(l46==1){
05917               if(l47==1){
05918                 if(l48==1){
05919                   figura_dib[5]=0xBF;
05920                 }
05921                  else{
05922                    figura_dib[5]=0xBE;
05923                  }
05924               }
05925                else if(l48==1){
05926                    figura_dib[5]=0xBD;
05927                }
05928                 else{
05929                   figura_dib[5]=0xBC;
05930                 }
05931             }
05932              else if(l47==1){
05933                  if(l48==1){
05934                     figura_dib[5]=0xBB;
05935                  }
05936                   else{
05937                     figura_dib[5]=0xBA;
05938                   }
05939              }
05940               else if(l48==1){
05941                   figura_dib[5]=0xB9;
05942               }
05943                else{
05944                  figura_dib[5]=0xB8;
05945                }
05946           }
05947            else if(l46==1){
05948                if(l47==1){
05949                  if(l48==1){
05950                    figura_dib[5]=0xB7;
05951                  }
05952                   else{
05953                     figura_dib[5]=0xB6;
05954                   }
05955                }
05956                 else if(l48==1){
05957                     figura_dib[5]=0xB5;
05958                 }
05959                  else{
05960                    figura_dib[5]=0xB4;
05961                  }
05962             }
05963              else if(l47==1){
05964                  if(l48==1){
05965                    figura_dib[5]=0xB3;
05966                  }
05967                   else{
05968                     figura_dib[5]=0xB2;
05969                   }
05970              }
05971               else if(l48==1){
05972                   figura_dib[5]=0xB1;
05973               }
05974                else{
05975                  figura_dib[5]=0xB0;
05976                }
05977         }
05978          else if(l45==1){
05979              if(l46==1){
05980                if(l47==1){
05981                  if(l48==1){
05982                    figura_dib[5]=0xAF;
05983                  }
05984                   else{
05985                     figura_dib[5]=0xAE;
05986                   }
05987                }
05988                 else if(l48==1){
05989                     figura_dib[5]=0xAD;
05990                 }
05991                  else{
05992                    figura_dib[5]=0xAC;
05993                  }
05994               }
05995                else if(l47==1){
05996                    if(l48==1){
05997                      figura_dib[5]=0xAB;
05998                    }
05999                     else{
06000                       figura_dib[5]=0xAA;
06001                     }
06002                }
06003                 else if(l48==1){
06004                     figura_dib[5]=0xA9;
06005                 }
06006                  else{
06007                    figura_dib[5]=0xA8;
06008                  }
06009          }
06010           else if(l46==1){
06011               if(l47==1){
06012                 if(l48==1){
06013                   figura_dib[5]=0xA7;
06014                 }
06015                  else{
06016                    figura_dib[5]=0xA6;
06017                  }
06018                }
06019                 else if(l48==1){
06020                     figura_dib[5]=0xA5;
06021                 }
06022                  else{
06023                    figura_dib[5]=0xA4;
06024                  }
06025            }
06026             else if(l47==1){
06027                 if(l48==1){
06028                   figura_dib[5]=0xA3;
06029                 }
06030                  else{
06031                    figura_dib[5]=0xA2;
06032                  }
06033             }
06034              else if(l48==1){
06035                  figura_dib[5]=0xA1;
06036              }
06037               else{
06038                 figura_dib[5]=0xA0;
06039               }
06040     }
06041      else if(l44==1){
06042          if(l45==1){
06043            if(l46==1){
06044              if(l47==1){
06045                if(l48==1){
06046                  figura_dib[5]=0x9F;
06047                }
06048                 else{
06049                   figura_dib[5]=0x9E;
06050                 }
06051              }
06052               else if(l48==1){
06053                   figura_dib[5]=0x9D;
06054               }
06055                else{
06056                  figura_dib[5]=0x9C;
06057                }
06058            }
06059             else if(l47==1){
06060                 if(l48==1){
06061                   figura_dib[5]=0x9B;
06062                 }
06063                  else{
06064                    figura_dib[5]=0x9A;
06065                  }
06066             }
06067              else if(l48==1){
06068                  figura_dib[5]=0x99;
06069              }
06070               else{
06071                 figura_dib[5]=0x98;
06072               }
06073          }
06074           else if(l46==1){
06075               if(l47==1){
06076                 if(l48==1){
06077                   figura_dib[5]=0x97;
06078                 }
06079                  else{
06080                    figura_dib[5]=0x96;
06081                  }
06082                }
06083                 else if(l48==1){
06084                     figura_dib[5]=0x95;
06085                 }
06086                  else{
06087                    figura_dib[5]=0x94;
06088                  }
06089            }
06090             else if(l47==1){
06091                 if(l48==1){
06092                   figura_dib[5]=0x93;
06093                 }
06094                  else{
06095                    figura_dib[5]=0x92;
06096                  }
06097             }
06098              else if(l48==1){
06099                  figura_dib[5]=0x91;
06100              }
06101               else{
06102                 figura_dib[5]=0x90;
06103               }
06104       }
06105        else if(l45==1){
06106            if(l46==1){
06107              if(l47==1){
06108                if(l48==1){
06109                  figura_dib[5]=0x8F;
06110                }
06111                else{
06112                  figura_dib[5]=0x8E;
06113                }
06114              }
06115               else if(l48==1){
06116                  figura_dib[5]=0x8D;
06117               }
06118                else{
06119                  figura_dib[5]=0x8C;
06120                }
06121            }
06122             else if(l47==1){
06123                 if(l48==1){
06124                   figura_dib[5]=0x8B;
06125                 }
06126                  else{
06127                    figura_dib[5]=0x8A;
06128                  }
06129             }
06130              else if(l48==1){
06131                  figura_dib[5]=0x89;
06132              }
06133               else{
06134                 figura_dib[5]=0x88;
06135               }
06136        }
06137         else if(l46==1){
06138             if(l47==1){
06139               if(l48==1){
06140                 figura_dib[5]=0x87;
06141               }
06142                else{
06143                  figura_dib[5]=0x86;
06144                }
06145             }
06146              else if(l48==1){
06147                  figura_dib[5]=0x85;
06148              }
06149               else{
06150                 figura_dib[5]=0x84;
06151               }
06152          }
06153           else if(l47==1){
06154               if(l48==1){
06155                  figura_dib[5]=0x83;
06156               }
06157                else{
06158                  figura_dib[5]=0x82;
06159                }
06160           }
06161            else if(l48==1){
06162                figura_dib[5]=0x81;
06163            }
06164             else{
06165               figura_dib[5]=0x80;
06166             }
06167 }
06168  else if(l42==1){
06169      if(l43==1){
06170        if(l44==1){
06171          if(l45==1){
06172             if(l46==1){
06173                if(l47==1){
06174                   if(l48==1){
06175                     figura_dib[5]=0x7F;
06176                   }
06177                    else{                       
06178                      figura_dib[5]=0x7E;
06179                    }
06180                 }
06181                  else if(l48==1){
06182                      figura_dib[5]=0x7D;
06183                  }
06184                   else{
06185                     figura_dib[5]=0x7C;
06186                   }
06187             }
06188              else if(l47==1){
06189                  if(l48==1){
06190                    figura_dib[5]=0x7B;
06191                  }
06192                   else{
06193                     figura_dib[5]=0x7A;
06194                   }
06195              }
06196               else if(l48==1){
06197                   figura_dib[5]=0x79;
06198               }
06199                else{
06200                  figura_dib[5]=0x78;
06201                }                                           
06202          }
06203           else if(l46==1){
06204               if(l47==1){
06205                 if(l48==1){
06206                   figura_dib[5]=0x77;
06207                 }
06208                 else{
06209                   figura_dib[5]=0x76;
06210                 }
06211               }
06212                else if(l48==1){
06213                    figura_dib[5]=0x75;
06214                }
06215                 else{
06216                   figura_dib[5]=0x74;
06217                 }
06218           }
06219            else if(l47==1){
06220                if(l48==1){
06221                  figura_dib[5]=0x73;
06222                }
06223                 else{
06224                  figura_dib[5]=0x72;
06225                 }
06226            }
06227             else if(l48==1){
06228                 figura_dib[5]=0x71;
06229             }
06230              else{
06231                figura_dib[5]=0x70;
06232              }
06233        }
06234         else if(l45==1){
06235             if(l46==1){
06236               if(l47==1){
06237                 if(l48==1){
06238                   figura_dib[5]=0x6F;
06239                 }
06240                  else{
06241                    figura_dib[5]=0x6E;
06242                  }
06243                }
06244                 else if(l48==1){
06245                     figura_dib[5]=0x6D;
06246                 }
06247                  else{
06248                    figura_dib[5]=0x6C;
06249                  }
06250             }
06251              else if(l47==1){
06252                 if(l48==1){
06253                   figura_dib[5]=0x6B;
06254                 }
06255                  else{
06256                    figura_dib[5]=0x6A;
06257                   }
06258              }
06259               else if(l48==1){
06260                  figura_dib[5]=0x69;
06261               }
06262                else{
06263                  figura_dib[5]=0x68;
06264                }                                                              
06265         }
06266          else if(l46==1){
06267              if(l47==1){
06268                if(l48==1){
06269                  figura_dib[5]=0x67;
06270                }
06271                 else{
06272                   figura_dib[5]=0x66;
06273                 }
06274               }
06275                else if(l48==1){
06276                    figura_dib[5]=0x65;
06277                }
06278                 else{
06279                   figura_dib[5]=0x64;
06280                 }
06281           }
06282            else if(l47==1){
06283                if(l48==1){
06284                  figura_dib[5]=0x63;
06285                 }
06286                  else{
06287                    figura_dib[5]=0x62;
06288                  }
06289            }
06290             else if(l48==1){
06291                 figura_dib[5]=0x61;
06292             }
06293              else{
06294                figura_dib[5]=0x60;
06295              }
06296      }
06297       else if(l44==1){
06298           if(l45==1){
06299             if(l46==1){
06300               if(l47==1){
06301                 if(l48==1){
06302                   figura_dib[5]=0x5F;
06303                 }
06304                  else{
06305                    figura_dib[5]=0x5E;
06306                  }
06307               }
06308                else if(l48==1){
06309                    figura_dib[5]=0x5D;
06310                }
06311                 else{
06312                   figura_dib[5]=0x5C;
06313                 }
06314             }
06315              else if(l47==1){
06316                  if(l48==1){
06317                    figura_dib[5]=0x5B;
06318                  }
06319                   else{
06320                     figura_dib[5]=0x5A;
06321                   }
06322               }
06323                else if(l48==1){
06324                    figura_dib[5]=0x59;
06325                }
06326                 else{
06327                   figura_dib[5]=0x58;
06328                 }                                                           
06329           }
06330            else if(l46==1){
06331                if(l47==1){
06332                  if(l48==1){
06333                    figura_dib[5]=0x57;
06334                  }
06335                   else{
06336                     figura_dib[5]=0x56;
06337                   }
06338                }
06339                 else if(l48==1){
06340                    figura_dib[5]=0x55;
06341                 }
06342                  else{
06343                    figura_dib[5]=0x54;
06344                  }
06345            }
06346             else if(l47==1){
06347                 if(l48==1){
06348                   figura_dib[5]=0x53;
06349                 }
06350                  else{
06351                    figura_dib[5]=0x52;
06352                  }
06353             }
06354              else if(l48==1){
06355                  figura_dib[5]=0x51;
06356              }
06357               else{
06358                 figura_dib[5]=0x50;
06359               }
06360       }
06361        else if(l45==1){
06362            if(l46==1){
06363              if(l47==1){
06364                 if(l48==1){
06365                   figura_dib[5]=0x4F;
06366                 }
06367                  else{
06368                    figura_dib[5]=0x4E;
06369                  }
06370              }
06371               else if(l48==1){
06372                   figura_dib[5]=0x4D;
06373               }
06374                else{
06375                  figura_dib[5]=0x4C;
06376                }       
06377            }
06378             else if(l47==1){
06379                 if(l48==1){
06380                   figura_dib[5]=0x4B;
06381                 }
06382                  else{
06383                    figura_dib[5]=0x4A;
06384                  }
06385              }
06386               else if(l48==1){
06387                   figura_dib[5]=0x49;
06388               }
06389                else{
06390                  figura_dib[5]=0x48;
06391                }      
06392        }
06393         else if(l46==1){
06394             if(l47==1){
06395                if(l48==1){
06396                  figura_dib[5]=0x47;
06397                }
06398                 else{
06399                   figura_dib[5]=0x46;
06400                 }
06401             }
06402              else if(l48==1){
06403                  figura_dib[5]=0x45;
06404              }
06405               else{
06406                 figura_dib[5]=0x44;
06407               }
06408         }
06409          else if(l47==1){
06410              if(l48==1){
06411                figura_dib[5]=0x43;
06412              }
06413               else{
06414                 figura_dib[5]=0x42;
06415               }
06416          }
06417           else if(l48==1){
06418               figura_dib[5]=0x41;
06419           }
06420            else{
06421              figura_dib[5]=0x40;
06422            }
06423  }
06424   else if(l43==1){
06425       if(l44==1){
06426         if(l45==1){
06427           if(l46==1){
06428             if(l47==1){
06429               if(l48==1){
06430                 figura_dib[5]=0x3F;                                                                                                                                                           
06431               }
06432                else{
06433                  figura_dib[5]=0x3E;
06434                }
06435              }
06436               else if(l48==1){
06437                   figura_dib[5]=0x3D;
06438               }
06439                else{
06440                  figura_dib[5]=0x3C;
06441                }
06442           }
06443            else if(l47==1){
06444                if(l48==1){
06445                  figura_dib[5]=0x3B;
06446                }  
06447                 else{
06448                   figura_dib[5]=0x3A;
06449                 }
06450            }
06451             else if(l48==1){
06452                 figura_dib[5]=0x39;
06453             }
06454              else{
06455                figura_dib[5]=0x38;
06456              }  
06457         }
06458          else if(l46==1){
06459              if(l47==1){
06460                if(l48==1){
06461                  figura_dib[5]=0x37;
06462                }
06463                 else{
06464                   figura_dib[5]=0x36;
06465                 }
06466              }
06467               else if(l48==1){
06468                   figura_dib[5]=0x35;
06469               }
06470                else{
06471                  figura_dib[5]=0x34;
06472                }
06473          }
06474           else if(l47==1){
06475               if(l48==1){
06476                 figura_dib[5]=0x33;
06477               }
06478                else{
06479                  figura_dib[5]=0x32;
06480                }
06481            }
06482             else if(l48==1){
06483                 figura_dib[5]=0x31;
06484             }
06485              else{
06486                figura_dib[5]=0x30;
06487              }  
06488       }
06489        else if(l45==1){
06490            if(l46==1){
06491               if(l47==1){
06492                  if(l48==1){
06493                     figura_dib[5]=0x2F;
06494                  }
06495                   else{
06496                     figura_dib[5]=0x2E;
06497                   }
06498                }
06499                 else if(l48==1){
06500                     figura_dib[5]=0x2D;
06501                 }
06502                  else{
06503                    figura_dib[5]=0x2C;
06504                  }
06505            }
06506             else if(l47==1){
06507                 if(l48==1){
06508                   figura_dib[5]=0x2B;
06509                 }
06510                  else{
06511                    figura_dib[5]=0x2A;
06512                  }
06513              }
06514               else if(l48==1){
06515                   figura_dib[5]=0x29;
06516               }
06517                else{
06518                  figura_dib[5]=0x28;
06519                } 
06520        }
06521         else if(l46==1){
06522             if(l47==1){
06523                if(l48==1){
06524                   figura_dib[5]=0x27;
06525                }
06526                 else{
06527                   figura_dib[5]=0x26;
06528                 }
06529              }
06530               else if(l48==1){
06531                   figura_dib[5]=0x25;
06532               }
06533                else{
06534                  figura_dib[5]=0x24;
06535                }
06536          }
06537           else if(l47==1){
06538               if(l48==1){
06539                 figura_dib[5]=0x23;
06540               }
06541                else{
06542                  figura_dib[5]=0x22;
06543                }
06544           }
06545            else if(l48==1){
06546                figura_dib[5]=0x21;
06547            }
06548             else{
06549               figura_dib[5]=0x20;
06550             } 
06551   }
06552    else if(l44==1){
06553        if(l45==1){
06554           if(l46==1){
06555              if(l47==1){
06556                 if(l48==1){
06557                    figura_dib[5]=0x1F; 
06558                 }
06559                  else{
06560                    figura_dib[5]=0x1E;
06561                  }
06562              }
06563               else if(l48==1){
06564                   figura_dib[5]=0x1D;
06565               }
06566                else{
06567                  figura_dib[5]=0x1C;
06568                }
06569           }
06570            else if(l47==1){
06571                if(l48==1){
06572                  figura_dib[5]=0x1B;
06573                }
06574                 else{
06575                   figura_dib[5]=0x1A;
06576                 }
06577            }
06578             else if(l48==1){
06579                 figura_dib[5]=0x19;
06580             }
06581              else{
06582                figura_dib[5]=0x18;
06583              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
06584        }
06585         else if(l46==1){
06586             if(l47==1){
06587               if(l48==1){
06588                 figura_dib[5]=0x17;
06589               }
06590                else{
06591                  figura_dib[5]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
06592                }
06593             }
06594              else if(l48==1){
06595                  figura_dib[5]=0x15;
06596              }
06597               else{
06598                 figura_dib[5]=0x14;
06599               }
06600         }
06601          else if(l47==1){
06602              if(l48==1){
06603                figura_dib[5]=0x13;
06604              }
06605               else{
06606                 figura_dib[5]=0x12;
06607               }
06608           }
06609            else if(l48==1){
06610                figura_dib[5]=0x11;
06611            }
06612             else{
06613               figura_dib[5]=0x10;
06614             }  
06615    }
06616     else if(l45==1){
06617         if(l46==1){
06618           if(l47==1){
06619             if(l48==1){
06620               figura_dib[5]=0x0F; 
06621             }
06622              else{
06623                figura_dib[5]=0x0E;
06624              }
06625           }
06626            else if(l48==1){
06627                figura_dib[5]=0x0D;
06628            }
06629             else{
06630               figura_dib[5]=0x0C;
06631             }
06632         }
06633          else if(l47==1){
06634              if(l48==1){
06635                figura_dib[5]=0x0B;
06636              }
06637               else{
06638                 figura_dib[5]=0x0A;
06639               }
06640          }
06641           else if(l48==1){
06642               figura_dib[5]=0x09;
06643           }
06644            else{
06645              figura_dib[5]=0x08;
06646            }      
06647     }
06648      else if(l46==1){
06649          if(l47==1){
06650            if(l48==1){
06651              figura_dib[5]=0x07;
06652            }
06653             else{
06654               figura_dib[5]=0x06;
06655             }
06656          }
06657           else if(l48==1){
06658               figura_dib[5]=0x05;
06659           }
06660            else{
06661              figura_dib[5]=0x04;
06662            }
06663      }
06664       else if(l47==1){
06665           if(l48==1){
06666             figura_dib[5]=0x03;
06667           }  
06668            else{
06669              figura_dib[5]=0x02;
06670            }
06671       }
06672        else if(l48==1){
06673            figura_dib[5]=0x01;
06674        }
06675         else{
06676           figura_dib[5]=0x00;
06677         }                                                                                                                                                                                                                                                                                                                                                                               
06678 ///// 
06679 ////
06680 ///
06681 //
06682 //fila 7
06683 //
06684 ///
06685 ////
06686 /////
06687 if(l49==1){
06688    if(l50==1){
06689       if(l51==1){
06690          if(l52==1){
06691             if(l53==1){
06692                if(l54==1){
06693                   if(l55==1){
06694                      if(l56==1){
06695                         figura_dib[6]=0xFF;
06696                      }
06697                        else{
06698                          figura_dib[6]=0xFE;
06699                        }
06700                    }
06701                     else if(l56==1){
06702                         figura_dib[6]=0xFD;
06703                     }
06704                      else{
06705                        figura_dib[6]=0xFC;
06706                      }
06707                }
06708                 else if(l55==1){
06709                     if(l56==1){
06710                        figura_dib[6]=0xFB;
06711                     }
06712                      else{
06713                        figura_dib[6]=0xFA;
06714                      }
06715                 }
06716                  else if(l56==1){
06717                      figura_dib[6]=0xF9;
06718                  }
06719                   else{
06720                     figura_dib[6]=0xF8;
06721                   }
06722              }
06723               else if(l54==1){
06724                   if(l55==1){
06725                     if(l56==1){
06726                       figura_dib[6]=0xF7;
06727                     }
06728                      else{
06729                        figura_dib[6]=0xF6;
06730                      }
06731                    }
06732                     else if(l56==1){
06733                         figura_dib[6]=0xF5;
06734                     }
06735                      else{
06736                        figura_dib[6]=0xF4;
06737                      }
06738                }
06739                 else if(l55==1){
06740                     if(l56==1){
06741                       figura_dib[6]=0xF3;
06742                     }
06743                      else{
06744                        figura_dib[6]=0xF2;
06745                      }
06746                 }
06747                  else if(l56==1){
06748                      figura_dib[6]=0xF1;
06749                  }
06750                   else{
06751                     figura_dib[6]=0xF0;
06752                   }
06753          }
06754           else if(l53==1){
06755               if(l54==1){
06756                 if(l55==1){
06757                   if(l56==1){
06758                     figura_dib[6]=0xEF;
06759                   }
06760                    else{
06761                     figura_dib[6]=0xEE;
06762                    }
06763                 }
06764                  else if(l56==1){
06765                     figura_dib[6]=0xED;
06766                  }
06767                   else{
06768                     figura_dib[6]=0xEC;
06769                   }
06770               }
06771                else if(l55==1){
06772                    if(l56==1){
06773                       figura_dib[6]=0xEB;
06774                    }
06775                     else{
06776                       figura_dib[6]=0xEA;
06777                     }
06778                }
06779                 else if(l56==1){
06780                     figura_dib[6]=0xE9;
06781                 }
06782                  else{
06783                    figura_dib[6]=0xE8;
06784                  }                   
06785           }
06786            else if(l54==1){
06787                if(l55==1){
06788                  if(l56==1){
06789                    figura_dib[6]=0xE7;
06790                  }
06791                  else{
06792                    figura_dib[6]=0xE6;
06793                  }
06794                }
06795                 else if(l56==1){
06796                     figura_dib[6]=0xE5;
06797                 }
06798                  else{
06799                    figura_dib[6]=0xE4;
06800                  }
06801             }
06802              else if(l55==1){
06803                  if(l56==1){
06804                     figura_dib[6]=0xE3;
06805                  }
06806                   else{
06807                     figura_dib[6]=0xE2;
06808                   }
06809              }
06810               else if(l56==1){
06811                   figura_dib[6]=0xE1;
06812               }
06813                else{
06814                  figura_dib[6]=0xE0;
06815                }
06816       }
06817        else if(l52==1){
06818           if(l53==1){
06819             if(l54==1){
06820               if(l55==1){
06821                 if(l56==1){
06822                   figura_dib[6]=0xDF;
06823                 }
06824                  else{
06825                   figura_dib[6]=0xDE;
06826                  }
06827               }
06828                else if(l56==1){
06829                   figura_dib[6]=0xDD;
06830                }
06831                 else{
06832                   figura_dib[6]=0xDC;
06833                 }
06834             }
06835              else if(l55==1){
06836                 if(l56==1){
06837                   figura_dib[6]=0xDB;
06838                 }
06839                  else{
06840                    figura_dib[6]=0xDA;
06841                  }
06842              }
06843               else if(l56==1){
06844                   figura_dib[6]=0xD9;
06845               }
06846                else{
06847                  figura_dib[6]=0xD8;
06848                }
06849           }
06850            else if(l54==1){
06851                if(l55==1){
06852                  if(l56==1){
06853                    figura_dib[6]=0xD7;
06854                  }
06855                   else{
06856                     figura_dib[6]=0xD6;
06857                   }
06858                 }
06859                  else if(l56==1){
06860                      figura_dib[6]=0xD5;
06861                  }
06862                   else{
06863                     figura_dib[6]=0xD4;
06864                   }
06865            }
06866             else if(l55==1){
06867                 if(l56==1){
06868                   figura_dib[6]=0xD3;
06869                 }
06870                  else{
06871                    figura_dib[6]=0xD2;
06872                  }
06873             }
06874              else if(l56==1){
06875                  figura_dib[6]=0xD1;
06876              }
06877               else{
06878                 figura_dib[6]=0xD0;
06879               }
06880        }
06881         else if(l53==1){
06882             if(l54==1){
06883               if(l55==1){
06884                 if(l56==1){
06885                   figura_dib[6]=0xCF;
06886                 }
06887                  else{
06888                    figura_dib[6]=0xCE;
06889                  }
06890                }
06891                 else if(l56==1){
06892                     figura_dib[6]=0xCD;
06893                 }
06894                  else{
06895                    figura_dib[6]=0xCC;
06896                  }
06897              }
06898               else if(l55==1){
06899                   if(l56==1){
06900                     figura_dib[6]=0xCB;
06901                   }
06902                    else{
06903                      figura_dib[6]=0xCA;
06904                    }
06905               }
06906                else if(l56==1){
06907                    figura_dib[6]=0xC9;
06908                }
06909                 else{
06910                   figura_dib[6]=0xC8;
06911                 }
06912         }
06913          else if(l54==1){
06914              if(l55==1){
06915                if(l56==1){
06916                  figura_dib[6]=0xC7;
06917                }
06918                 else{
06919                   figura_dib[6]=0xC6;
06920                 }
06921              }
06922               else if(l56==1){
06923                   figura_dib[6]=0xC5;
06924               }
06925                else{
06926                  figura_dib[6]=0xC4;
06927                }
06928          }
06929           else if(l55==1){
06930               if(l56==1){
06931                 figura_dib[6]=0xC3;
06932               }  
06933                else{
06934                  figura_dib[6]=0xC2;
06935                }
06936           }
06937            else if(l56==1){
06938                figura_dib[6]=0xC1;
06939             }
06940              else{
06941                figura_dib[6]=0xC0;
06942              }
06943    }
06944     else if(l51==1){
06945         if(l52==1){
06946           if(l53==1){
06947             if(l54==1){
06948               if(l55==1){
06949                 if(l56==1){
06950                   figura_dib[6]=0xBF;
06951                 }
06952                  else{
06953                    figura_dib[6]=0xBE;
06954                  }
06955               }
06956                else if(l56==1){
06957                    figura_dib[6]=0xBD;
06958                }
06959                 else{
06960                   figura_dib[6]=0xBC;
06961                 }
06962             }
06963              else if(l55==1){
06964                  if(l56==1){
06965                     figura_dib[6]=0xBB;
06966                  }
06967                   else{
06968                     figura_dib[6]=0xBA;
06969                   }
06970              }
06971               else if(l56==1){
06972                   figura_dib[6]=0xB9;
06973               }
06974                else{
06975                  figura_dib[6]=0xB8;
06976                }
06977           }
06978            else if(l54==1){
06979                if(l55==1){
06980                  if(l56==1){
06981                    figura_dib[6]=0xB7;
06982                  }
06983                   else{
06984                     figura_dib[6]=0xB6;
06985                   }
06986                }
06987                 else if(l56==1){
06988                     figura_dib[6]=0xB5;
06989                 }
06990                  else{
06991                    figura_dib[6]=0xB4;
06992                  }
06993             }
06994              else if(l55==1){
06995                  if(l56==1){
06996                    figura_dib[6]=0xB3;
06997                  }
06998                   else{
06999                     figura_dib[6]=0xB2;
07000                   }
07001              }
07002               else if(l56==1){
07003                   figura_dib[6]=0xB1;
07004               }
07005                else{
07006                  figura_dib[6]=0xB0;
07007                }
07008         }
07009          else if(l53==1){
07010              if(l54==1){
07011                if(l55==1){
07012                  if(l56==1){
07013                    figura_dib[6]=0xAF;
07014                  }
07015                   else{
07016                     figura_dib[6]=0xAE;
07017                   }
07018                }
07019                 else if(l56==1){
07020                     figura_dib[6]=0xAD;
07021                 }
07022                  else{
07023                    figura_dib[6]=0xAC;
07024                  }
07025               }
07026                else if(l55==1){
07027                    if(l56==1){
07028                      figura_dib[6]=0xAB;
07029                    }
07030                     else{
07031                       figura_dib[6]=0xAA;
07032                     }
07033                }
07034                 else if(l56==1){
07035                     figura_dib[6]=0xA9;
07036                 }
07037                  else{
07038                    figura_dib[6]=0xA8;
07039                  }
07040          }
07041           else if(l54==1){
07042               if(l55==1){
07043                 if(l56==1){
07044                   figura_dib[6]=0xA7;
07045                 }
07046                  else{
07047                    figura_dib[6]=0xA6;
07048                  }
07049                }
07050                 else if(l56==1){
07051                     figura_dib[6]=0xA5;
07052                 }
07053                  else{
07054                    figura_dib[6]=0xA4;
07055                  }
07056            }
07057             else if(l55==1){
07058                 if(l56==1){
07059                   figura_dib[6]=0xA3;
07060                 }
07061                  else{
07062                    figura_dib[6]=0xA2;
07063                  }
07064             }
07065              else if(l56==1){
07066                  figura_dib[6]=0xA1;
07067              }
07068               else{
07069                 figura_dib[6]=0xA0;
07070               }
07071     }
07072      else if(l52==1){
07073          if(l53==1){
07074            if(l54==1){
07075              if(l55==1){
07076                if(l56==1){
07077                  figura_dib[6]=0x9F;
07078                }
07079                 else{
07080                   figura_dib[6]=0x9E;
07081                 }
07082              }
07083               else if(l56==1){
07084                   figura_dib[6]=0x9D;
07085               }
07086                else{
07087                  figura_dib[6]=0x9C;
07088                }
07089            }
07090             else if(l55==1){
07091                 if(l56==1){
07092                   figura_dib[6]=0x9B;
07093                 }
07094                  else{
07095                    figura_dib[6]=0x9A;
07096                  }
07097             }
07098              else if(l56==1){
07099                  figura_dib[6]=0x99;
07100              }
07101               else{
07102                 figura_dib[6]=0x98;
07103               }
07104          }
07105           else if(l54==1){
07106               if(l55==1){
07107                 if(l56==1){
07108                   figura_dib[6]=0x97;
07109                 }
07110                  else{
07111                    figura_dib[6]=0x96;
07112                  }
07113                }
07114                 else if(l56==1){
07115                     figura_dib[6]=0x95;
07116                 }
07117                  else{
07118                    figura_dib[6]=0x94;
07119                  }
07120            }
07121             else if(l55==1){
07122                 if(l56==1){
07123                   figura_dib[6]=0x93;
07124                 }
07125                  else{
07126                    figura_dib[6]=0x92;
07127                  }
07128             }
07129              else if(l56==1){
07130                  figura_dib[6]=0x91;
07131              }
07132               else{
07133                 figura_dib[6]=0x90;
07134               }
07135       }
07136        else if(l53==1){
07137            if(l54==1){
07138              if(l55==1){
07139                if(l56==1){
07140                  figura_dib[6]=0x8F;
07141                }
07142                else{
07143                  figura_dib[6]=0x8E;
07144                }
07145              }
07146               else if(l56==1){
07147                  figura_dib[6]=0x8D;
07148               }
07149                else{
07150                  figura_dib[6]=0x8C;
07151                }
07152            }
07153             else if(l55==1){
07154                 if(l56==1){
07155                   figura_dib[6]=0x8B;
07156                 }
07157                  else{
07158                    figura_dib[6]=0x8A;
07159                  }
07160             }
07161              else if(l56==1){
07162                  figura_dib[6]=0x89;
07163              }
07164               else{
07165                 figura_dib[6]=0x88;
07166               }
07167        }
07168         else if(l54==1){
07169             if(l55==1){
07170               if(l56==1){
07171                 figura_dib[6]=0x87;
07172               }
07173                else{
07174                  figura_dib[6]=0x86;
07175                }
07176             }
07177              else if(l56==1){
07178                  figura_dib[6]=0x85;
07179              }
07180               else{
07181                 figura_dib[6]=0x84;
07182               }
07183          }
07184           else if(l55==1){
07185               if(l56==1){
07186                  figura_dib[6]=0x83;
07187               }
07188                else{
07189                  figura_dib[6]=0x82;
07190                }
07191           }
07192            else if(l56==1){
07193                figura_dib[6]=0x81;
07194            }
07195             else{
07196               figura_dib[6]=0x80;
07197             }
07198 }
07199  else if(l50==1){
07200      if(l51==1){
07201        if(l52==1){
07202          if(l53==1){
07203             if(l54==1){
07204                if(l55==1){
07205                   if(l56==1){
07206                     figura_dib[6]=0x7F;
07207                   }
07208                    else{                       
07209                      figura_dib[6]=0x7E;
07210                    }
07211                 }
07212                  else if(l56==1){
07213                      figura_dib[6]=0x7D;
07214                  }
07215                   else{
07216                     figura_dib[6]=0x7C;
07217                   }
07218             }
07219              else if(l55==1){
07220                  if(l56==1){
07221                    figura_dib[6]=0x7B;
07222                  }
07223                   else{
07224                     figura_dib[6]=0x7A;
07225                   }
07226              }
07227               else if(l56==1){
07228                   figura_dib[6]=0x79;
07229               }
07230                else{
07231                  figura_dib[6]=0x78;
07232                }                                           
07233          }
07234           else if(l54==1){
07235               if(l55==1){
07236                 if(l56==1){
07237                   figura_dib[6]=0x77;
07238                 }
07239                 else{
07240                   figura_dib[6]=0x76;
07241                 }
07242               }
07243                else if(l56==1){
07244                    figura_dib[6]=0x75;
07245                }
07246                 else{
07247                   figura_dib[6]=0x74;
07248                 }
07249           }
07250            else if(l55==1){
07251                if(l56==1){
07252                  figura_dib[6]=0x73;
07253                }
07254                 else{
07255                  figura_dib[6]=0x72;
07256                 }
07257            }
07258             else if(l56==1){
07259                 figura_dib[6]=0x71;
07260             }
07261              else{
07262                figura_dib[6]=0x70;
07263              }
07264        }
07265         else if(l53==1){
07266             if(l54==1){
07267               if(l55==1){
07268                 if(l56==1){
07269                   figura_dib[6]=0x6F;
07270                 }
07271                  else{
07272                    figura_dib[6]=0x6E;
07273                  }
07274                }
07275                 else if(l56==1){
07276                     figura_dib[6]=0x6D;
07277                 }
07278                  else{
07279                    figura_dib[6]=0x6C;
07280                  }
07281             }
07282              else if(l55==1){
07283                 if(l56==1){
07284                   figura_dib[6]=0x6B;
07285                 }
07286                  else{
07287                    figura_dib[6]=0x6A;
07288                   }
07289              }
07290               else if(l56==1){
07291                  figura_dib[6]=0x69;
07292               }
07293                else{
07294                  figura_dib[6]=0x68;
07295                }                                                              
07296         }
07297          else if(l54==1){
07298              if(l55==1){
07299                if(l56==1){
07300                  figura_dib[6]=0x67;
07301                }
07302                 else{
07303                   figura_dib[6]=0x66;
07304                 }
07305               }
07306                else if(l56==1){
07307                    figura_dib[6]=0x65;
07308                }
07309                 else{
07310                   figura_dib[6]=0x64;
07311                 }
07312           }
07313            else if(l55==1){
07314                if(l56==1){
07315                  figura_dib[6]=0x63;
07316                 }
07317                  else{
07318                    figura_dib[6]=0x62;
07319                  }
07320            }
07321             else if(l56==1){
07322                 figura_dib[6]=0x61;
07323             }
07324              else{
07325                figura_dib[6]=0x60;
07326              }
07327      }
07328       else if(l52==1){
07329           if(l53==1){
07330             if(l54==1){
07331               if(l55==1){
07332                 if(l56==1){
07333                   figura_dib[6]=0x5F;
07334                 }
07335                  else{
07336                    figura_dib[6]=0x5E;
07337                  }
07338               }
07339                else if(l56==1){
07340                    figura_dib[6]=0x5D;
07341                }
07342                 else{
07343                   figura_dib[6]=0x5C;
07344                 }
07345             }
07346              else if(l55==1){
07347                  if(l56==1){
07348                    figura_dib[6]=0x5B;
07349                  }
07350                   else{
07351                     figura_dib[6]=0x5A;
07352                   }
07353               }
07354                else if(l56==1){
07355                    figura_dib[6]=0x59;
07356                }
07357                 else{
07358                   figura_dib[6]=0x58;
07359                 }                                                           
07360           }
07361            else if(l54==1){
07362                if(l55==1){
07363                  if(l56==1){
07364                    figura_dib[6]=0x57;
07365                  }
07366                   else{
07367                     figura_dib[6]=0x56;
07368                   }
07369                }
07370                 else if(l56==1){
07371                    figura_dib[6]=0x55;
07372                 }
07373                  else{
07374                    figura_dib[6]=0x54;
07375                  }
07376            }
07377             else if(l55==1){
07378                 if(l56==1){
07379                   figura_dib[6]=0x53;
07380                 }
07381                  else{
07382                    figura_dib[6]=0x52;
07383                  }
07384             }
07385              else if(l56==1){
07386                  figura_dib[6]=0x51;
07387              }
07388               else{
07389                 figura_dib[6]=0x50;
07390               }
07391       }
07392        else if(l53==1){
07393            if(l54==1){
07394              if(l55==1){
07395                 if(l56==1){
07396                   figura_dib[6]=0x4F;
07397                 }
07398                  else{
07399                    figura_dib[6]=0x4E;
07400                  }
07401              }
07402               else if(l56==1){
07403                   figura_dib[6]=0x4D;
07404               }
07405                else{
07406                  figura_dib[6]=0x4C;
07407                }       
07408            }
07409             else if(l55==1){
07410                 if(l56==1){
07411                   figura_dib[6]=0x4B;
07412                 }
07413                  else{
07414                    figura_dib[6]=0x4A;
07415                  }
07416              }
07417               else if(l56==1){
07418                   figura_dib[6]=0x49;
07419               }
07420                else{
07421                  figura_dib[6]=0x48;
07422                }      
07423        }
07424         else if(l54==1){
07425             if(l55==1){
07426                if(l56==1){
07427                  figura_dib[6]=0x47;
07428                }
07429                 else{
07430                   figura_dib[6]=0x46;
07431                 }
07432             }
07433              else if(l56==1){
07434                  figura_dib[6]=0x45;
07435              }
07436               else{
07437                 figura_dib[6]=0x44;
07438               }
07439         }
07440          else if(l55==1){
07441              if(l56==1){
07442                figura_dib[6]=0x43;
07443              }
07444               else{
07445                 figura_dib[6]=0x42;
07446               }
07447          }
07448           else if(l56==1){
07449               figura_dib[6]=0x41;
07450           }
07451            else{
07452              figura_dib[6]=0x40;
07453            }
07454  }
07455   else if(l51==1){
07456       if(l52==1){
07457         if(l53==1){
07458           if(l54==1){
07459             if(l55==1){
07460               if(l56==1){
07461                 figura_dib[6]=0x3F;                                                                                                                                                           
07462               }
07463                else{
07464                  figura_dib[6]=0x3E;
07465                }
07466              }
07467               else if(l56==1){
07468                   figura_dib[6]=0x3D;
07469               }
07470                else{
07471                  figura_dib[6]=0x3C;
07472                }
07473           }
07474            else if(l55==1){
07475                if(l56==1){
07476                  figura_dib[6]=0x3B;
07477                }  
07478                 else{
07479                   figura_dib[6]=0x3A;
07480                 }
07481            }
07482             else if(l56==1){
07483                 figura_dib[6]=0x39;
07484             }
07485              else{
07486                figura_dib[6]=0x38;
07487              }  
07488         }
07489          else if(l54==1){
07490              if(l55==1){
07491                if(l56==1){
07492                  figura_dib[6]=0x37;
07493                }
07494                 else{
07495                   figura_dib[6]=0x36;
07496                 }
07497              }
07498               else if(l56==1){
07499                   figura_dib[6]=0x35;
07500               }
07501                else{
07502                  figura_dib[6]=0x34;
07503                }
07504          }
07505           else if(l55==1){
07506               if(l56==1){
07507                 figura_dib[6]=0x33;
07508               }
07509                else{
07510                  figura_dib[6]=0x32;
07511                }
07512            }
07513             else if(l56==1){
07514                 figura_dib[6]=0x31;
07515             }
07516              else{
07517                figura_dib[6]=0x30;
07518              }  
07519       }
07520        else if(l53==1){
07521            if(l54==1){
07522               if(l55==1){
07523                  if(l56==1){
07524                     figura_dib[6]=0x2F;
07525                  }
07526                   else{
07527                     figura_dib[6]=0x2E;
07528                   }
07529                }
07530                 else if(l56==1){
07531                     figura_dib[6]=0x2D;
07532                 }
07533                  else{
07534                    figura_dib[6]=0x2C;
07535                  }
07536            }
07537             else if(l55==1){
07538                 if(l56==1){
07539                   figura_dib[6]=0x2B;
07540                 }
07541                  else{
07542                    figura_dib[6]=0x2A;
07543                  }
07544              }
07545               else if(l56==1){
07546                   figura_dib[6]=0x29;
07547               }
07548                else{
07549                  figura_dib[6]=0x28;
07550                } 
07551        }
07552         else if(l54==1){
07553             if(l55==1){
07554                if(l56==1){
07555                   figura_dib[6]=0x27;
07556                }
07557                 else{
07558                   figura_dib[6]=0x26;
07559                 }
07560              }
07561               else if(l56==1){
07562                   figura_dib[6]=0x25;
07563               }
07564                else{
07565                  figura_dib[6]=0x24;
07566                }
07567          }
07568           else if(l55==1){
07569               if(l56==1){
07570                 figura_dib[6]=0x23;
07571               }
07572                else{
07573                  figura_dib[6]=0x22;
07574                }
07575           }
07576            else if(l56==1){
07577                figura_dib[6]=0x21;
07578            }
07579             else{
07580               figura_dib[6]=0x20;
07581             } 
07582   }
07583    else if(l52==1){
07584        if(l53==1){
07585           if(l54==1){
07586              if(l55==1){
07587                 if(l56==1){
07588                    figura_dib[6]=0x1F; 
07589                 }
07590                  else{
07591                    figura_dib[6]=0x1E;
07592                  }
07593              }
07594               else if(l56==1){
07595                   figura_dib[6]=0x1D;
07596               }
07597                else{
07598                  figura_dib[6]=0x1C;
07599                }
07600           }
07601            else if(l55==1){
07602                if(l56==1){
07603                  figura_dib[6]=0x1B;
07604                }
07605                 else{
07606                   figura_dib[6]=0x1A;
07607                 }
07608            }
07609             else if(l56==1){
07610                 figura_dib[6]=0x19;
07611             }
07612              else{
07613                figura_dib[6]=0x18;
07614              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
07615        }
07616         else if(l54==1){
07617             if(l55==1){
07618               if(l56==1){
07619                 figura_dib[6]=0x17;
07620               }
07621                else{
07622                  figura_dib[6]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
07623                }
07624             }
07625              else if(l56==1){
07626                  figura_dib[6]=0x15;
07627              }
07628               else{
07629                 figura_dib[6]=0x14;
07630               }
07631         }
07632          else if(l55==1){
07633              if(l56==1){
07634                figura_dib[6]=0x13;
07635              }
07636               else{
07637                 figura_dib[6]=0x12;
07638               }
07639           }
07640            else if(l56==1){
07641                figura_dib[6]=0x11;
07642            }
07643             else{
07644               figura_dib[6]=0x10;
07645             }  
07646    }
07647     else if(l53==1){
07648         if(l54==1){
07649           if(l55==1){
07650             if(l56==1){
07651               figura_dib[6]=0x0F; 
07652             }
07653              else{
07654                figura_dib[6]=0x0E;
07655              }
07656           }
07657            else if(l56==1){
07658                figura_dib[6]=0x0D;
07659            }
07660             else{
07661               figura_dib[6]=0x0C;
07662             }
07663         }
07664          else if(l55==1){
07665              if(l56==1){
07666                figura_dib[6]=0x0B;
07667              }
07668               else{
07669                 figura_dib[6]=0x0A;
07670               }
07671          }
07672           else if(l56==1){
07673               figura_dib[6]=0x09;
07674           }
07675            else{
07676              figura_dib[6]=0x08;
07677            }      
07678     }
07679      else if(l54==1){
07680          if(l55==1){
07681            if(l56==1){
07682              figura_dib[6]=0x07;
07683            }
07684             else{
07685               figura_dib[6]=0x06;
07686             }
07687          }
07688           else if(l56==1){
07689               figura_dib[6]=0x05;
07690           }
07691            else{
07692              figura_dib[6]=0x04;
07693            }
07694      }
07695       else if(l55==1){
07696           if(l56==1){
07697             figura_dib[6]=0x03;
07698           }  
07699            else{
07700              figura_dib[6]=0x02;
07701            }
07702       }
07703        else if(l56==1){
07704            figura_dib[6]=0x01;
07705        }
07706         else{
07707           figura_dib[6]=0x00;
07708         }                                                                                                                                                                                                                                                                                                                                                                               
07709 ///// 
07710 ////
07711 ///
07712 //
07713 //fila 8
07714 //
07715 ///
07716 ////
07717 /////
07718 if(l57==1){
07719    if(l58==1){
07720       if(l59==1){
07721          if(l60==1){
07722             if(l61==1){
07723                if(l62==1){
07724                   if(l63==1){
07725                      if(l64==1){
07726                         figura_dib[7]=0xFF;
07727                      }
07728                        else{
07729                          figura_dib[7]=0xFE;
07730                        }
07731                    }
07732                     else if(l64==1){
07733                         figura_dib[7]=0xFD;
07734                     }
07735                      else{
07736                        figura_dib[7]=0xFC;
07737                      }
07738                }
07739                 else if(l63==1){
07740                     if(l64==1){
07741                        figura_dib[7]=0xFB;
07742                     }
07743                      else{
07744                        figura_dib[7]=0xFA;
07745                      }
07746                 }
07747                  else if(l64==1){
07748                      figura_dib[7]=0xF9;
07749                  }
07750                   else{
07751                     figura_dib[7]=0xF8;
07752                   }
07753              }
07754               else if(l62==1){
07755                   if(l63==1){
07756                     if(l64==1){
07757                       figura_dib[7]=0xF7;
07758                     }
07759                      else{
07760                        figura_dib[7]=0xF6;
07761                      }
07762                    }
07763                     else if(l64==1){
07764                         figura_dib[7]=0xF5;
07765                     }
07766                      else{
07767                        figura_dib[7]=0xF4;
07768                      }
07769                }
07770                 else if(l63==1){
07771                     if(l64==1){
07772                       figura_dib[7]=0xF3;
07773                     }
07774                      else{
07775                        figura_dib[7]=0xF2;
07776                      }
07777                 }
07778                  else if(l64==1){
07779                      figura_dib[7]=0xF1;
07780                  }
07781                   else{
07782                     figura_dib[7]=0xF0;
07783                   }
07784          }
07785           else if(l61==1){
07786               if(l62==1){
07787                 if(l63==1){
07788                   if(l64==1){
07789                     figura_dib[7]=0xEF;
07790                   }
07791                    else{
07792                     figura_dib[7]=0xEE;
07793                    }
07794                 }
07795                  else if(l64==1){
07796                     figura_dib[7]=0xED;
07797                  }
07798                   else{
07799                     figura_dib[7]=0xEC;
07800                   }
07801               }
07802                else if(l63==1){
07803                    if(l64==1){
07804                       figura_dib[7]=0xEB;
07805                    }
07806                     else{
07807                       figura_dib[7]=0xEA;
07808                     }
07809                }
07810                 else if(l64==1){
07811                     figura_dib[7]=0xE9;
07812                 }
07813                  else{
07814                    figura_dib[7]=0xE8;
07815                  }                   
07816           }
07817            else if(l62==1){
07818                if(l63==1){
07819                  if(l64==1){
07820                    figura_dib[7]=0xE7;
07821                  }
07822                  else{
07823                    figura_dib[7]=0xE6;
07824                  }
07825                }
07826                 else if(l64==1){
07827                     figura_dib[7]=0xE5;
07828                 }
07829                  else{
07830                    figura_dib[7]=0xE4;
07831                  }
07832             }
07833              else if(l63==1){
07834                  if(l64==1){
07835                     figura_dib[7]=0xE3;
07836                  }
07837                   else{
07838                     figura_dib[7]=0xE2;
07839                   }
07840              }
07841               else if(l64==1){
07842                   figura_dib[7]=0xE1;
07843               }
07844                else{
07845                  figura_dib[7]=0xE0;
07846                }
07847       }
07848        else if(l60==1){
07849           if(l61==1){
07850             if(l62==1){
07851               if(l63==1){
07852                 if(l64==1){
07853                   figura_dib[7]=0xDF;
07854                 }
07855                  else{
07856                   figura_dib[7]=0xDE;
07857                  }
07858               }
07859                else if(l64==1){
07860                   figura_dib[7]=0xDD;
07861                }
07862                 else{
07863                   figura_dib[7]=0xDC;
07864                 }
07865             }
07866              else if(l63==1){
07867                 if(l64==1){
07868                   figura_dib[7]=0xDB;
07869                 }
07870                  else{
07871                    figura_dib[7]=0xDA;
07872                  }
07873              }
07874               else if(l64==1){
07875                   figura_dib[7]=0xD9;
07876               }
07877                else{
07878                  figura_dib[7]=0xD8;
07879                }
07880           }
07881            else if(l62==1){
07882                if(l63==1){
07883                  if(l64==1){
07884                    figura_dib[7]=0xD7;
07885                  }
07886                   else{
07887                     figura_dib[7]=0xD6;
07888                   }
07889                 }
07890                  else if(l64==1){
07891                      figura_dib[7]=0xD5;
07892                  }
07893                   else{
07894                     figura_dib[7]=0xD4;
07895                   }
07896            }
07897             else if(l63==1){
07898                 if(l64==1){
07899                   figura_dib[7]=0xD3;
07900                 }
07901                  else{
07902                    figura_dib[7]=0xD2;
07903                  }
07904             }
07905              else if(l64==1){
07906                  figura_dib[7]=0xD1;
07907              }
07908               else{
07909                 figura_dib[7]=0xD0;
07910               }
07911        }
07912         else if(l61==1){
07913             if(l62==1){
07914               if(l63==1){
07915                 if(l64==1){
07916                   figura_dib[7]=0xCF;
07917                 }
07918                  else{
07919                    figura_dib[7]=0xCE;
07920                  }
07921                }
07922                 else if(l64==1){
07923                     figura_dib[7]=0xCD;
07924                 }
07925                  else{
07926                    figura_dib[7]=0xCC;
07927                  }
07928              }
07929               else if(l63==1){
07930                   if(l64==1){
07931                     figura_dib[7]=0xCB;
07932                   }
07933                    else{
07934                      figura_dib[7]=0xCA;
07935                    }
07936               }
07937                else if(l64==1){
07938                    figura_dib[7]=0xC9;
07939                }
07940                 else{
07941                   figura_dib[7]=0xC8;
07942                 }
07943         }
07944          else if(l62==1){
07945              if(l63==1){
07946                if(l64==1){
07947                  figura_dib[7]=0xC7;
07948                }
07949                 else{
07950                   figura_dib[7]=0xC6;
07951                 }
07952              }
07953               else if(l64==1){
07954                   figura_dib[7]=0xC5;
07955               }
07956                else{
07957                  figura_dib[7]=0xC4;
07958                }
07959          }
07960           else if(l63==1){
07961               if(l64==1){
07962                 figura_dib[7]=0xC3;
07963               }  
07964                else{
07965                  figura_dib[7]=0xC2;
07966                }
07967           }
07968            else if(l64==1){
07969                figura_dib[7]=0xC1;
07970             }
07971              else{
07972                figura_dib[7]=0xC0;
07973              }
07974    }
07975     else if(l59==1){
07976         if(l60==1){
07977           if(l61==1){
07978             if(l62==1){
07979               if(l63==1){
07980                 if(l64==1){
07981                   figura_dib[7]=0xBF;
07982                 }
07983                  else{
07984                    figura_dib[7]=0xBE;
07985                  }
07986               }
07987                else if(l64==1){
07988                    figura_dib[7]=0xBD;
07989                }
07990                 else{
07991                   figura_dib[7]=0xBC;
07992                 }
07993             }
07994              else if(l63==1){
07995                  if(l64==1){
07996                     figura_dib[7]=0xBB;
07997                  }
07998                   else{
07999                     figura_dib[7]=0xBA;
08000                   }
08001              }
08002               else if(l64==1){
08003                   figura_dib[7]=0xB9;
08004               }
08005                else{
08006                  figura_dib[7]=0xB8;
08007                }
08008           }
08009            else if(l62==1){
08010                if(l63==1){
08011                  if(l64==1){
08012                    figura_dib[7]=0xB7;
08013                  }
08014                   else{
08015                     figura_dib[7]=0xB6;
08016                   }
08017                }
08018                 else if(l64==1){
08019                     figura_dib[7]=0xB5;
08020                 }
08021                  else{
08022                    figura_dib[7]=0xB4;
08023                  }
08024             }
08025              else if(l63==1){
08026                  if(l64==1){
08027                    figura_dib[7]=0xB3;
08028                  }
08029                   else{
08030                     figura_dib[7]=0xB2;
08031                   }
08032              }
08033               else if(l64==1){
08034                   figura_dib[7]=0xB1;
08035               }
08036                else{
08037                  figura_dib[7]=0xB0;
08038                }
08039         }
08040          else if(l61==1){
08041              if(l62==1){
08042                if(l63==1){
08043                  if(l64==1){
08044                    figura_dib[7]=0xAF;
08045                  }
08046                   else{
08047                     figura_dib[7]=0xAE;
08048                   }
08049                }
08050                 else if(l64==1){
08051                     figura_dib[7]=0xAD;
08052                 }
08053                  else{
08054                    figura_dib[7]=0xAC;
08055                  }
08056               }
08057                else if(l63==1){
08058                    if(l64==1){
08059                      figura_dib[7]=0xAB;
08060                    }
08061                     else{
08062                       figura_dib[7]=0xAA;
08063                     }
08064                }
08065                 else if(l64==1){
08066                     figura_dib[7]=0xA9;
08067                 }
08068                  else{
08069                    figura_dib[7]=0xA8;
08070                  }
08071          }
08072           else if(l62==1){
08073               if(l63==1){
08074                 if(l64==1){
08075                   figura_dib[7]=0xA7;
08076                 }
08077                  else{
08078                    figura_dib[7]=0xA6;
08079                  }
08080                }
08081                 else if(l64==1){
08082                     figura_dib[7]=0xA5;
08083                 }
08084                  else{
08085                    figura_dib[7]=0xA4;
08086                  }
08087            }
08088             else if(l63==1){
08089                 if(l64==1){
08090                   figura_dib[7]=0xA3;
08091                 }
08092                  else{
08093                    figura_dib[7]=0xA2;
08094                  }
08095             }
08096              else if(l64==1){
08097                  figura_dib[7]=0xA1;
08098              }
08099               else{
08100                 figura_dib[7]=0xA0;
08101               }
08102     }
08103      else if(l60==1){
08104          if(l61==1){
08105            if(l62==1){
08106              if(l63==1){
08107                if(l64==1){
08108                  figura_dib[7]=0x9F;
08109                }
08110                 else{
08111                   figura_dib[7]=0x9E;
08112                 }
08113              }
08114               else if(l64==1){
08115                   figura_dib[7]=0x9D;
08116               }
08117                else{
08118                  figura_dib[7]=0x9C;
08119                }
08120            }
08121             else if(l63==1){
08122                 if(l64==1){
08123                   figura_dib[7]=0x9B;
08124                 }
08125                  else{
08126                    figura_dib[7]=0x9A;
08127                  }
08128             }
08129              else if(l64==1){
08130                  figura_dib[7]=0x99;
08131              }
08132               else{
08133                 figura_dib[7]=0x98;
08134               }
08135          }
08136           else if(l62==1){
08137               if(l63==1){
08138                 if(l64==1){
08139                   figura_dib[7]=0x97;
08140                 }
08141                  else{
08142                    figura_dib[7]=0x96;
08143                  }
08144                }
08145                 else if(l64==1){
08146                     figura_dib[7]=0x95;
08147                 }
08148                  else{
08149                    figura_dib[7]=0x94;
08150                  }
08151            }
08152             else if(l63==1){
08153                 if(l64==1){
08154                   figura_dib[7]=0x93;
08155                 }
08156                  else{
08157                    figura_dib[7]=0x92;
08158                  }
08159             }
08160              else if(l64==1){
08161                  figura_dib[7]=0x91;
08162              }
08163               else{
08164                 figura_dib[7]=0x90;
08165               }
08166       }
08167        else if(l61==1){
08168            if(l62==1){
08169              if(l63==1){
08170                if(l64==1){
08171                  figura_dib[7]=0x8F;
08172                }
08173                else{
08174                  figura_dib[7]=0x8E;
08175                }
08176              }
08177               else if(l64==1){
08178                  figura_dib[7]=0x8D;
08179               }
08180                else{
08181                  figura_dib[7]=0x8C;
08182                }
08183            }
08184             else if(l63==1){
08185                 if(l64==1){
08186                   figura_dib[7]=0x8B;
08187                 }
08188                  else{
08189                    figura_dib[7]=0x8A;
08190                  }
08191             }
08192              else if(l64==1){
08193                  figura_dib[7]=0x89;
08194              }
08195               else{
08196                 figura_dib[7]=0x88;
08197               }
08198        }
08199         else if(l62==1){
08200             if(l63==1){
08201               if(l64==1){
08202                 figura_dib[7]=0x87;
08203               }
08204                else{
08205                  figura_dib[7]=0x86;
08206                }
08207             }
08208              else if(l64==1){
08209                  figura_dib[7]=0x85;
08210              }
08211               else{
08212                 figura_dib[7]=0x84;
08213               }
08214          }
08215           else if(l63==1){
08216               if(l64==1){
08217                  figura_dib[7]=0x83;
08218               }
08219                else{
08220                  figura_dib[7]=0x82;
08221                }
08222           }
08223            else if(l64==1){
08224                figura_dib[7]=0x81;
08225            }
08226             else{
08227               figura_dib[7]=0x80;
08228             }
08229 }
08230  else if(l58==1){
08231      if(l59==1){
08232        if(l60==1){
08233          if(l61==1){
08234             if(l62==1){
08235                if(l63==1){
08236                   if(l64==1){
08237                     figura_dib[7]=0x7F;
08238                   }
08239                    else{                       
08240                      figura_dib[7]=0x7E;
08241                    }
08242                 }
08243                  else if(l64==1){
08244                      figura_dib[7]=0x7D;
08245                  }
08246                   else{
08247                     figura_dib[7]=0x7C;
08248                   }
08249             }
08250              else if(l63==1){
08251                  if(l64==1){
08252                    figura_dib[7]=0x7B;
08253                  }
08254                   else{
08255                     figura_dib[7]=0x7A;
08256                   }
08257              }
08258               else if(l64==1){
08259                   figura_dib[7]=0x79;
08260               }
08261                else{
08262                  figura_dib[7]=0x78;
08263                }                                           
08264          }
08265           else if(l62==1){
08266               if(l63==1){
08267                 if(l64==1){
08268                   figura_dib[7]=0x77;
08269                 }
08270                 else{
08271                   figura_dib[7]=0x76;
08272                 }
08273               }
08274                else if(l64==1){
08275                    figura_dib[7]=0x75;
08276                }
08277                 else{
08278                   figura_dib[7]=0x74;
08279                 }
08280           }
08281            else if(l63==1){
08282                if(l64==1){
08283                  figura_dib[7]=0x73;
08284                }
08285                 else{
08286                  figura_dib[7]=0x72;
08287                 }
08288            }
08289             else if(l64==1){
08290                 figura_dib[7]=0x71;
08291             }
08292              else{
08293                figura_dib[7]=0x70;
08294              }
08295        }
08296         else if(l61==1){
08297             if(l62==1){
08298               if(l63==1){
08299                 if(l64==1){
08300                   figura_dib[7]=0x6F;
08301                 }
08302                  else{
08303                    figura_dib[7]=0x6E;
08304                  }
08305                }
08306                 else if(l64==1){
08307                     figura_dib[7]=0x6D;
08308                 }
08309                  else{
08310                    figura_dib[7]=0x6C;
08311                  }
08312             }
08313              else if(l63==1){
08314                 if(l64==1){
08315                   figura_dib[7]=0x6B;
08316                 }
08317                  else{
08318                    figura_dib[7]=0x6A;
08319                   }
08320              }
08321               else if(l64==1){
08322                  figura_dib[7]=0x69;
08323               }
08324                else{
08325                  figura_dib[7]=0x68;
08326                }                                                              
08327         }
08328          else if(l62==1){
08329              if(l63==1){
08330                if(l64==1){
08331                  figura_dib[7]=0x67;
08332                }
08333                 else{
08334                   figura_dib[7]=0x66;
08335                 }
08336               }
08337                else if(l64==1){
08338                    figura_dib[7]=0x65;
08339                }
08340                 else{
08341                   figura_dib[7]=0x64;
08342                 }
08343           }
08344            else if(l63==1){
08345                if(l64==1){
08346                  figura_dib[7]=0x63;
08347                 }
08348                  else{
08349                    figura_dib[7]=0x62;
08350                  }
08351            }
08352             else if(l64==1){
08353                 figura_dib[7]=0x61;
08354             }
08355              else{
08356                figura_dib[7]=0x60;
08357              }
08358      }
08359       else if(l60==1){
08360           if(l61==1){
08361             if(l62==1){
08362               if(l63==1){
08363                 if(l64==1){
08364                   figura_dib[7]=0x5F;
08365                 }
08366                  else{
08367                    figura_dib[7]=0x5E;
08368                  }
08369               }
08370                else if(l64==1){
08371                    figura_dib[7]=0x5D;
08372                }
08373                 else{
08374                   figura_dib[7]=0x5C;
08375                 }
08376             }
08377              else if(l63==1){
08378                  if(l64==1){
08379                    figura_dib[7]=0x5B;
08380                  }
08381                   else{
08382                     figura_dib[7]=0x5A;
08383                   }
08384               }
08385                else if(l64==1){
08386                    figura_dib[7]=0x59;
08387                }
08388                 else{
08389                   figura_dib[7]=0x58;
08390                 }                                                           
08391           }
08392            else if(l62==1){
08393                if(l63==1){
08394                  if(l64==1){
08395                    figura_dib[7]=0x57;
08396                  }
08397                   else{
08398                     figura_dib[7]=0x56;
08399                   }
08400                }
08401                 else if(l64==1){
08402                    figura_dib[7]=0x55;
08403                 }
08404                  else{
08405                    figura_dib[7]=0x54;
08406                  }
08407            }
08408             else if(l63==1){
08409                 if(l64==1){
08410                   figura_dib[7]=0x53;
08411                 }
08412                  else{
08413                    figura_dib[7]=0x52;
08414                  }
08415             }
08416              else if(l64==1){
08417                  figura_dib[7]=0x51;
08418              }
08419               else{
08420                 figura_dib[7]=0x50;
08421               }
08422       }
08423        else if(l61==1){
08424            if(l62==1){
08425              if(l63==1){
08426                 if(l64==1){
08427                   figura_dib[7]=0x4F;
08428                 }
08429                  else{
08430                    figura_dib[7]=0x4E;
08431                  }
08432              }
08433               else if(l64==1){
08434                   figura_dib[7]=0x4D;
08435               }
08436                else{
08437                  figura_dib[7]=0x4C;
08438                }       
08439            }
08440             else if(l63==1){
08441                 if(l64==1){
08442                   figura_dib[7]=0x4B;
08443                 }
08444                  else{
08445                    figura_dib[7]=0x4A;
08446                  }
08447              }
08448               else if(l64==1){
08449                   figura_dib[7]=0x49;
08450               }
08451                else{
08452                  figura_dib[7]=0x48;
08453                }      
08454        }
08455         else if(l62==1){
08456             if(l63==1){
08457                if(l64==1){
08458                  figura_dib[7]=0x47;
08459                }
08460                 else{
08461                   figura_dib[7]=0x46;
08462                 }
08463             }
08464              else if(l64==1){
08465                  figura_dib[7]=0x45;
08466              }
08467               else{
08468                 figura_dib[7]=0x44;
08469               }
08470         }
08471          else if(l63==1){
08472              if(l64==1){
08473                figura_dib[7]=0x43;
08474              }
08475               else{
08476                 figura_dib[7]=0x42;
08477               }
08478          }
08479           else if(l64==1){
08480               figura_dib[7]=0x41;
08481           }
08482            else{
08483              figura_dib[7]=0x40;
08484            }
08485  }
08486   else if(l59==1){
08487       if(l60==1){
08488         if(l61==1){
08489           if(l62==1){
08490             if(l63==1){
08491               if(l64==1){
08492                 figura_dib[7]=0x3F;                                                                                                                                                           
08493               }
08494                else{
08495                  figura_dib[7]=0x3E;
08496                }
08497              }
08498               else if(l64==1){
08499                   figura_dib[7]=0x3D;
08500               }
08501                else{
08502                  figura_dib[7]=0x3C;
08503                }
08504           }
08505            else if(l63==1){
08506                if(l64==1){
08507                  figura_dib[7]=0x3B;
08508                }  
08509                 else{
08510                   figura_dib[7]=0x3A;
08511                 }
08512            }
08513             else if(l64==1){
08514                 figura_dib[7]=0x39;
08515             }
08516              else{
08517                figura_dib[7]=0x38;
08518              }  
08519         }
08520          else if(l62==1){
08521              if(l63==1){
08522                if(l64==1){
08523                  figura_dib[7]=0x37;
08524                }
08525                 else{
08526                   figura_dib[7]=0x36;
08527                 }
08528              }
08529               else if(l64==1){
08530                   figura_dib[7]=0x35;
08531               }
08532                else{
08533                  figura_dib[7]=0x34;
08534                }
08535          }
08536           else if(l63==1){
08537               if(l64==1){
08538                 figura_dib[7]=0x33;
08539               }
08540                else{
08541                  figura_dib[7]=0x32;
08542                }
08543            }
08544             else if(l64==1){
08545                 figura_dib[7]=0x31;
08546             }
08547              else{
08548                figura_dib[7]=0x30;
08549              }  
08550       }
08551        else if(l61==1){
08552            if(l62==1){
08553               if(l63==1){
08554                  if(l64==1){
08555                     figura_dib[7]=0x2F;
08556                  }
08557                   else{
08558                     figura_dib[7]=0x2E;
08559                   }
08560                }
08561                 else if(l64==1){
08562                     figura_dib[7]=0x2D;
08563                 }
08564                  else{
08565                    figura_dib[7]=0x2C;
08566                  }
08567            }
08568             else if(l63==1){
08569                 if(l64==1){
08570                   figura_dib[7]=0x2B;
08571                 }
08572                  else{
08573                    figura_dib[7]=0x2A;
08574                  }
08575              }
08576               else if(l64==1){
08577                   figura_dib[7]=0x29;
08578               }
08579                else{
08580                  figura_dib[7]=0x28;
08581                } 
08582        }
08583         else if(l62==1){
08584             if(l63==1){
08585                if(l64==1){
08586                   figura_dib[7]=0x27;
08587                }
08588                 else{
08589                   figura_dib[7]=0x26;
08590                 }
08591              }
08592               else if(l64==1){
08593                   figura_dib[7]=0x25;
08594               }
08595                else{
08596                  figura_dib[7]=0x24;
08597                }
08598          }
08599           else if(l63==1){
08600               if(l62==1){
08601                 figura_dib[7]=0x23;
08602               }
08603                else{
08604                  figura_dib[7]=0x22;
08605                }
08606           }
08607            else if(l64==1){
08608                figura_dib[7]=0x21;
08609            }
08610             else{
08611               figura_dib[7]=0x20;
08612             } 
08613   }
08614    else if(l60==1){
08615        if(l61==1){
08616           if(l62==1){
08617              if(l63==1){
08618                 if(l64==1){
08619                    figura_dib[7]=0x1F; 
08620                 }
08621                  else{
08622                    figura_dib[7]=0x1E;
08623                  }
08624              }
08625               else if(l64==1){
08626                   figura_dib[7]=0x1D;
08627               }
08628                else{
08629                  figura_dib[7]=0x1C;
08630                }
08631           }
08632            else if(l63==1){
08633                if(l64==1){
08634                  figura_dib[7]=0x1B;
08635                }
08636                 else{
08637                   figura_dib[7]=0x1A;
08638                 }
08639            }
08640             else if(l64==1){
08641                 figura_dib[7]=0x19;
08642             }
08643              else{
08644                figura_dib[7]=0x18;
08645              }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
08646        }
08647         else if(l62==1){
08648             if(l63==1){
08649               if(l64==1){
08650                 figura_dib[7]=0x17;
08651               }
08652                else{
08653                  figura_dib[7]=0x16;                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
08654                }
08655             }
08656              else if(l64==1){
08657                  figura_dib[7]=0x15;
08658              }
08659               else{
08660                 figura_dib[7]=0x14;
08661               }
08662         }
08663          else if(l63==1){
08664              if(l64==1){
08665                figura_dib[7]=0x13;
08666              }
08667               else{
08668                 figura_dib[7]=0x12;
08669               }
08670           }
08671            else if(l64==1){
08672                figura_dib[7]=0x11;
08673            }
08674             else{
08675               figura_dib[7]=0x10;
08676             }  
08677    }
08678     else if(l61==1){
08679         if(l62==1){
08680           if(l63==1){
08681             if(l64==1){
08682               figura_dib[7]=0x0F; 
08683             }
08684              else{
08685                figura_dib[7]=0x0E;
08686              }
08687           }
08688            else if(l64==1){
08689                figura_dib[7]=0x0D;
08690            }
08691             else{
08692               figura_dib[7]=0x0C;
08693             }
08694         }
08695          else if(l63==1){
08696              if(l64==1){
08697                figura_dib[7]=0x0B;
08698              }
08699               else{
08700                 figura_dib[7]=0x0A;
08701               }
08702          }
08703           else if(l64==1){
08704               figura_dib[7]=0x09;
08705           }
08706            else{
08707              figura_dib[7]=0x08;
08708            }      
08709     }
08710      else if(l62==1){
08711          if(l63==1){
08712            if(l64==1){
08713              figura_dib[7]=0x07;
08714            }
08715             else{
08716               figura_dib[7]=0x06;
08717             }
08718          }
08719           else if(l64==1){
08720               figura_dib[7]=0x05;
08721           }
08722            else{
08723              figura_dib[7]=0x04;
08724            }
08725      }
08726       else if(l63==1){
08727           if(l64==1){
08728             figura_dib[7]=0x03;
08729           }  
08730            else{
08731              figura_dib[7]=0x02;
08732            }
08733       }
08734        else if(l64==1){
08735            figura_dib[7]=0x01;
08736        }
08737         else{
08738           figura_dib[7]=0x00;
08739         }                                                                                                                                                                                                                                                                                                                                                                               
08740 ///// 
08741 ////
08742 ///
08743 //
08744 ///////////////
08745 switch(cambio_im){
08746      case 1:
08747        row=cuadrado[counter];
08748      break;     
08749       case 2:
08750        row=triangulo[counter];
08751      break;  
08752      case 3:
08753        row=rombo[counter];
08754      break;            
08755 }
08756 ////////
08757 switch(im_escogida){
08758      case 1:
08759        row=cuadrado[counter];
08760        if(cuadrado[0]==figura_dib[0] && cuadrado[1]==figura_dib[1] && cuadrado[2]==figura_dib[2] && cuadrado[3]==figura_dib[3] &&  cuadrado[4]==figura_dib[4] &&  cuadrado[5]==figura_dib[5] && cuadrado[6]==figura_dib[6] && cuadrado[7]==figura_dib[7]){
08761            im_escogida=4;
08762         }   
08763      break;     
08764       case 2:
08765        row=triangulo[counter];
08766        if(triangulo[0]==figura_dib[0] && triangulo[1]==figura_dib[1] && triangulo[2]==figura_dib[2] && triangulo[3]==figura_dib[3] &&  triangulo[4]==figura_dib[4] &&  triangulo[5]==figura_dib[5] && triangulo[6]==figura_dib[6] && triangulo[7]==figura_dib[7]){
08767            im_escogida=4;
08768         }        
08769      break;  
08770      case 3:
08771        row=rombo[counter];
08772        if(rombo[0]==figura_dib[0] && rombo[1]==figura_dib[1] && rombo[2]==figura_dib[2] && rombo[3]==figura_dib[3] &&  rombo[4]==figura_dib[4] &&  rombo[5]==figura_dib[5] && rombo[6]==figura_dib[6] && rombo[7]==figura_dib[7]){
08773            im_escogida=4;
08774         }        
08775      break;  
08776      case 4:
08777        row=feliz[counter];
08778      break;                 
08779 }
08780 /////////
08781 if(perder==1){
08782     row=triste[counter];
08783 }
08784 /////////
08785 row_2= figura_dib[counter];
08786      switch (counter){
08787      case 0:
08788      colum=0x01;
08789      colum_2=0x01;
08790      break;
08791      case 1:
08792      colum=0x02;
08793      colum_2=0x02;
08794      break;     
08795       case 2:
08796      colum=0x04;
08797      colum_2=0x04;
08798      break;  
08799      case 3:
08800      colum=0x08;
08801      colum_2=0x08;
08802      break;  
08803      case 4:
08804      colum=0x10;
08805      colum_2=0x10;     
08806      break;       
08807      case 5:
08808      colum=0x20; 
08809      colum_2=0x20;     
08810      break;   
08811      case 6:
08812      colum=0x40;
08813      colum_2=0x40;     
08814      break;     
08815      case 7:
08816      colum=0x80;
08817      colum_2=0x80;     
08818      break;       
08819 }       
08820                counter++;                        
08821     if(counter==8)counter=0; 
08822     }
08823     
08824 int main()
08825 {
08826  FILE *wave_file;
08827  
08828   //     wave_file=fopen("/sd/pista1.wav","r");
08829   //      waver.play(wave_file);
08830   //      fclose(wave_file);
08831    
08832  columna.attach(&visualiza,0.00208333333333333333333333333333); 
08833  imagen.attach(&cambio,0.70);
08834     pc.baud(9600);
08835     pc.attach(&receivedByte);
08836     
08837     lcd.cls(); //Limpia el LCD
08838     lcd.locate(0, 0); //Posiciona en columna 2, fila 0)
08839     lcd.printf("Tiempo de juego"); //Imprime en LCD "Reloj digital"
08840     while(true) {
08841       reloj(); 
08842       if(im_escogida==1||im_escogida==2||im_escogida==3){
08843         seg1++; //Inician el primer contador de unidades de segundo
08844         wait(1); //Genera tiempo de un segundo
08845         if (seg1==10){
08846             seg2++;//Contador décimas de segundo
08847             seg1=0;
08848             if (seg2==6){
08849                 min1++;//Contador unidades de minuto
08850                 seg2=0;
08851                 if (min1==3){
08852                     perder=1;
08853                     pc.printf("/\r\n");
08854                     wait(0.1);
08855                    // wait(20);
08856                    wave_file=fopen("/sd/perdio.wav","r");
08857                    waver.play(wave_file);
08858                    fclose(wave_file);
08859                    //
08860                     perder=0;
08861                     cambio_im=1; 
08862                     im_escogida=0;
08863                 }
08864             }
08865         }
08866       }
08867       if(im_escogida==0){
08868           seg1=0;
08869           seg2=0;
08870           min1=0;
08871           perder=0;  
08872           //
08873           wave_file=fopen("/sd/pista1.wav","r");
08874           waver.play(wave_file);
08875           fclose(wave_file);
08876           // 
08877       } 
08878       if(im_escogida==4){
08879           pc.printf("*\r\n");
08880           wait(0.1);
08881          // wait(20);
08882          wave_file=fopen("/sd/gano.wav","r");
08883          waver.play(wave_file);
08884          fclose(wave_file);
08885          //
08886           cambio_im=1; 
08887           im_escogida=0; 
08888       }       
08889     }
08890 }