Application pour lire vos fichiers stéréo en abadie.jo 5 octets une application sur le temps
joris Abadie
joris Abadie
Pour soutenir l'équipe des développeurs de la carte audio linux
et faire avancer le proget du couplage à un casque neuronal,
don possible à partir de 1 euro
/****pour compiler gcc -Wall lecteur-stereo.c -lm -o lecteur-stereo****/ #include#include #include #include #define efface "joris.wav" #define cecci "joris1.wav" #define temps "entete.txt" #define a21joris "21abadie.jo" #define a22joris "22abadie.jo" #define a23joris "entetestereo.wav" #define b21joris "sansentetewav1.wav" #define b22joris "sansentetewav2.wav" #define provi1 "sansentete5a1.wav" #define provi2 "sansentete5a2.wav" #define filtreamplitude1 256 #define filtreamplitude2 1024 #define filtreamplitude3 1256 #define total 256 #define total1 256 #define baserepos 32768 #define totaljo1 256 #define totaljo 256 #define totalste 256 #define total1ste 256 int abadie; int abadie21; int abadie22; int assemble = 0; int nbdepoints; int ouaitu; double force2; double force3; int force1; int groupe1; int groupe2; int groupe3; int groupe4; int force; int forcepisteur; int forcea; int enavant; int amplitude; int amplitudepisteur; int melangeCetCpp; /***le boulet du c au cpp****/ int choix; int choixb; int groupe5; int joencour; int bascule; int fonctionPasserellestereo(); int fonctionPasserellestereo1(); int fonctionPasserellestereofin (); /******* lecteur format jo stereo********/ /**attention*en*cas*de*problème*rencontré*sur*la*durée*du*fichier*audio*créé en présence de processeur 64 il*faut*ajouter* #include et ensuite remplacer long int longueurentete, nbdepointsentete, amplitudeentete; par int32_t durerentete, longueurentete, nbdepointsentete, amplitudeentete; et remplacer ensuite les termes %ld par %d */ int FonctionEntete(int argc, char *argv[]) { long int longueurentete, poidsfaible, durerentete, poidsfort; durerentete = 0; longueurentete = 0; poidsfort = 0; FILE* debutwav = NULL; debutwav = fopen(a23joris, "wb+"); if (debutwav != NULL) { /****declaration**type**audio*4octets**/ unsigned char riff[4] = {0x52,0x49,0x46,0x46}; fwrite(riff,1,sizeof(riff),debutwav); /****longueurentete*du*fichier*audio*ici*21200**/ /* unsigned char durerentetea[4] = {0x32,0x65,0x0B,0x01}; fwrite(durerentetea,1,sizeof(durerentetea),debutwav); */ fwrite( &longueurentete , sizeof(longueurentete) , 1 , debutwav); /****declaration**type**wave*4octets**/ unsigned char wave[4] = {0x57,0x41,0x56,0x45}; fwrite(wave,1,sizeof(wave),debutwav); /****declaration**type**fmt suivit d'un espace qui s'écrit 0x20 soit 4octets**/ unsigned char fmt[4] = {0x66,0x6D,0x74,0x20}; fwrite(fmt,1,sizeof(fmt),debutwav); /****declaration**de*la*maniere d'écrire*sous forme*d'un*entier long (long int) soit 4octets**/ /**comme c'est du 16 octets en exadécimal cela donne 0x10****/ unsigned char poids[4] = {0x10,0x00,0x00,0x00}; fwrite(poids,1,sizeof(poids),debutwav); /****codage pour indiquer le PCM c'est : 1 soit 2octets**/ unsigned char pourpcm[2] = {0x01,0x00}; fwrite(pourpcm,1,sizeof(pourpcm),debutwav); /****nombre de piste sur 2octets*ici c'est du stereo, donc 2*/ unsigned char piste[2] = {0x02,0x00}; fwrite(piste,1,sizeof(piste),debutwav); /**nombre d'échantillons par seconde**sur 4 octets**/ unsigned char tempsunitaire[4] = {0x44,0xAC,0x00,0x00}; fwrite(tempsunitaire,1,sizeof(tempsunitaire),debutwav); /**nombre d'octets par secondes**sur 4 octets***le*double*du*précédent*dans*ce*cas*/ unsigned char octetpars[4] = {0x10,0xB1,0x02,0x00}; fwrite(octetpars,1,sizeof(octetpars),debutwav); /*taille en octet d'1 échantillon***sur*2octets**/ unsigned char tailleechant[2] = {0x04,0x00}; fwrite(tailleechant,1,sizeof(tailleechant),debutwav); /*contient le nombre de bits par échantillon*2x8=16*soit*10*en*exa**sur*2octets**/ unsigned char bitparechan[2] = {0x10,0x00}; fwrite(bitparechan,1,sizeof(bitparechan),debutwav); /**On ecrit ici data pour dire que le fichier commence**sur 4cotets**/ unsigned char mono[4] = {0x64,0x61,0x74,0x61}; fwrite(mono,1,sizeof(mono),debutwav); /****longueurentete*du*fichier*audio**/ /* unsigned char durerenteteb[4] = {0x0E,0x65,0x0B,0x01}; fwrite(durerenteteb,1,sizeof(durerenteteb),debutwav); */ fwrite( &durerentete , sizeof(durerentete) , 1 , debutwav); fclose(debutwav), debutwav = NULL;; } return 0; } /************fin*du createur**entete********************************************************************************/ int fonctionPasserellestereofin (int argc, char *argv[]) { int un; FILE* debutwav = NULL; FILE* vachercherentete = NULL; debutwav = fopen(cecci, "wb+"); vachercherentete = fopen(a23joris, "rb"); if (debutwav != NULL) { if (vachercherentete != NULL) { un = fgetc(vachercherentete); /* abadie vient chercher tout ce qui bouge*/ while (un != EOF) { fwrite( &un, sizeof(char), 1, debutwav); un = fgetc(vachercherentete); } fclose(vachercherentete), vachercherentete = NULL;; } fclose(debutwav), debutwav = NULL;; } int deux =1; int trois =1; /*j ouvre mon fichier de donner*/ FILE* jojo23 = NULL; FILE* jojo24 = NULL; jojo23 = fopen(b21joris, "rb"); /* pour ajouter a. possible w ou r+ w+ tester */ if (jojo23 != NULL) { jojo24 = fopen(b22joris, "rb"); /* pour ajouter a. possible w ou r+ w+ tester */ if (jojo24 != NULL) { FILE* ecrire = NULL; ecrire = fopen(cecci, "ab+"); if (ecrire != NULL) { un = fgetc(jojo23); /* abadie vient chercher tout ce qui bouge*/ trois = fgetc(jojo24); /* abadie vient chercher tout ce qui bouge*/ while ((un != EOF)&&(trois != EOF)) { switch (deux) { case 1: fwrite( &un, sizeof(char), 1, ecrire); deux = 2; un = fgetc(jojo23); break; case 2: fwrite( &un, sizeof(char), 1, ecrire); deux =3; un = fgetc(jojo23); break; case 3: fwrite( &trois, sizeof(char), 1, ecrire); deux =4; trois = fgetc(jojo24); break; case 4: fwrite( &trois, sizeof(char), 1, ecrire); deux =1; trois = fgetc(jojo24); break; } } fclose(ecrire), ecrire = NULL;; } fclose(jojo24), jojo24 = NULL;; } fclose(jojo23), jojo23 = NULL;; } return 0; } /*************************/ /*************************/ int fonctionPasserellestereo1 (int argc, char *argv[]) { FILE* jojo = NULL; jojo = fopen(a22joris, "rb"); if (jojo != NULL) { double codebash; char tab[total] = {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF,0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A, 0x4B,0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F}; char *ptr; char *petr; double jo; int sens; FILE* temps = NULL; temps = fopen(b22joris, "wb"); /* pour ajouter a. possible w ou r+ w+ tester */ if (temps != NULL) { double jo2[19][196] = {{0}, {0.63212,0.63212,0.864665,0.95021,0.981684,0.993262,0.99752,0.999088,0.999664,0.9998765,0.9999546,1}, {0.39347,0.39347,0.63212,0.77687,0.86466,0.91791,0.95021,0.96980,0.98168,0.98889,0.99326,0.99591,0.99752,0.99849,0.99909,0.99945,0.99966,0.9998,0.9999,0.9999,1,1,1}, {0.28347,0.28347,0.48658,0.63212,0.73640,0.81112,0.86466,0.90303,0.93052,0.95021,0.96433,0.97444,0.98168,0.98688,0.99060,0.99326,0.99517,0.99654,0.99752,0.99822,0.99873,0.99909,0.99935,0.99953,0.99966,0.99976,0.99983,1,1}, {0.22120,0.22120,0.39347,0.52763,0.63212,0.71350,0.77687,0.82623,0.86466,0.89460,0.91792,0.93607,0.95021,0.96123,0.96980,0.97648,0.98168,0.98574,0.98889,0.99135,0.99326,0.99475,0.99591,0.99682,0.99752,0.99807,0.99850,0.99883,0.99909,0.99929,0.99945,0.99957,0.99966,0.99974,0.99980,0.99984,0.99988,0.99990,0.99993,0.99994,0.99995,0.99996,0.99997,0.99998,0.99998,1,1}, {0.18127,0.18127,0.32968,0.45119,0.55067,0.63212,0.69881,0.75340,0.79810,0.83470,0.86466,0.88920,0.90928,0.92573,0.93919,0.95021,0.95924,0.96663,0.97268,0.97763,0.98168,0.98500,0.98772,0.98995,0.99177,0.99326,0.99448,0.99548,0.99630,0.99697,0.99752,0.99797,0.99834,0.99864,0.99889,0.99909,0.99925,0.99939,0.99950,0.99959,0.99966,0.99973,0.99978,0.99982,0.99985,0.99988,0.99990,0.99992,0.99993,0.99994,1}, {0.15352,0.15352,0.28347,0.39347,0.48658,0.56540,0.63212,0.68860,0.73640,0.77687,0.81112,0.84012,0.86466,0.88544,0.90303,0.91792,0.93052,0.94118,0.95021,0.95786,0.96433,0.96980,0.97444,0.97836,0.98168,0.98450,0.98688,0.98889,0.99060,0.99204,0.99326,0.99430,0.99517,0.99591,0.99654,0.99707,0.99752,0.99790,0.99822,0.99850,0.99873,0.99892,0.99909,0.99923,0.99935,0.99945,0.99953,0.99960,0.99966,0.99972,1}, {0.13312,0.13312,0.24852,0.34856,0.43528,0.51046,0.57563,0.63212,0.68109,0.72355,0.76035,0.79225,0.81991,0.84388,0.86466,0.88268,0.89830,0.91184,0.92357,0.93375,0.94257,0.95021,0.95684,0.96259,0.96757,0.97188,0.97563,0.97887,0.98168,0.98412,0.98624,0.98807,0.98966,0.99103,0.99223,0.99326,0.99416,0.99494,0.99561,0.99619,0.99670,0.99714,0.99752,0.99785,0.99814,0.99839,0.99860,0.99879,0.99895,0.99909,0.99921,0.99931,0.99941,0.99949,0.99955,0.99961,1}, {0.11750,0.11750,0.22120,0.31271,0.39347,0.46474,0.52763,0.58314,0.63212,0.67535,0.71350,0.74716,0.77687,0.80309,0.82623,0.84665,0.86466,0.88057,0.89460,0.90699,0.91792,0.92756,0.93607,0.94358,0.95021,0.95606,0.96123,0.96578,0.96980,0.97335,0.97648,0.97925,0.98168,0.98384,0.98574,0.98741,0.98889,0.99020,0.99135,0.99236,0.99326,0.99405,0.99475,0.99537,0.99591,0.99639,0.99682,0.99719,0.99752,0.99781,0.99807,0.99830,0.99850,0.99867,0.99883,0.99897,0.99909,0.99920,0.99929,0.99937,0.99945,0.99951,0.99957,1}, {0.10516,0.10516,0.19926,0.28347,0.35882,0.42625,0.48658,0.54057,0.58889,0.63212,0.67081,0.70543,0.73640,0.76412,0.78893,0.81112,0.83099,0.84876,0.86466,0.87890,0.89163,0.90303,0.91323,0.92235,0.93052,0.93782,0.94436,0.95021,0.95545,0.96013,0.96433,0.96808,0.97143,0.97444,0.97713,0.97953,0.98168,0.98361,0.98533,0.98688,0.98826,0.98949,0.99060,0.99159,0.99247,0.99326,0.99397,0.99460,0.99517,0.99568,0.99613,0.99654,0.99690,0.99723,0.99752,0.99778,0.99802,0.99822,0.99841,0.99858,0.99873,0.99886,0.99898,0.99909,0.99918,0.99927,0.99935,0.99942,0.99948,1}, {0.09516,0.09516,0.18127,0.25918,0.32968,0.39347,0.45119,0.50341,0.55067,0.59343,0.63212,0.66713,0.69881,0.72747,0.75340,0.77687,0.79810,0.81732,0.83470,0.85043,0.86466,0.87754,0.88920,0.89974,0.90928,0.91792,0.92573,0.93279,0.93919,0.94498,0.95021,0.95495,0.95924,0.96312,0.96663,0.96980,0.97268,0.97528,0.97763,0.97976,0.98168,0.98343,0.98500,0.98643,0.98772,0.98889,0.98995,0.99090,0.99177,0.99255,0.99326,0.99390,0.99448,0.99501,0.99548,0.99591,0.99630,0.99665,0.99697,0.99726,0.99752,0.99776,0.99797,0.99816,0.99834,0.99850,0.99864,0.99877,0.99889,0.99899,0.99909,0.99917,0.99925,0.99932,0.99939,0.99945,1}, {0.08690,0.08690,0.16625,0.23870,0.30486,0.36526,0.42042,0.47079,0.51677,0.55877,0.59711,0.63212,0.66409,0.69328,0.71993,0.74427,0.76649,0.78679,0.80531,0.82223,0.83768,0.85178,0.86466,0.87643,0.88716,0.89697,0.90592,0.91410,0.92156,0.92838,0.93460,0.94029,0.94547,0.95021,0.95454,0.95849,0.96210,0.96539,0.96840,0.97114,0.97365,0.97594,0.97803,0.97994,0.98168,0.98328,0.98473,0.98606,0.98727,0.98837,0.98938,0.99031,0.99115,0.99192,0.99262,0.99326,0.99385,0.99438,0.99487,0.99532,0.99572,0.99609,0.99643,0.99674,0.99703,0.99729,0.99752,0.99774,0.99793,0.99811,0.99828,0.99843,0.99856,0.99869,0.99880,0.99891,0.99900,0.99909,0.99917,0.99924,0.99931,0.99937,0.99942,0.99947,0.99952,0.99956,0.99960,1}, {0.07996,0.07996,0.15352,0.22120,0.28347,0.34076,0.39347,0.44196,0.48658,0.52763,0.56540,0.60015,0.63212,0.66153,0.68860,0.71350,0.73640,0.75748,0.77687,0.79471,0.81112,0.82623,0.84012,0.85290,0.86466,0.87549,0.88544,0.89460,0.90303,0.91078,0.91792,0.92448,0.93052,0.93607,0.94118,0.94589,0.95021,0.95419,0.95786,0.96123,0.96433,0.96718,0.96980,0.97222,0.97444,0.97648,0.97836,0.98009,0.98168,0.98315,0.98450,0.98574,0.98688,0.98793,0.98889,0.98978,0.99060,0.99135,0.99204,0.99268,0.99326,0.99380,0.99430,0.99475,0.99517,0.99556,0.99591,0.99624,0.99654,0.99682,0.99707,0.99731,0.99752,0.99772,0.99790,0.99807,0.99822,0.99837,0.99850,0.99862,0.99873,0.99883,0.99892,0.99901,0.99909,0.99916,0.99923,0.99929,0.99935,0.99940,0.99945,0.99949,0.99953,0.99957,0.99960,0.99964,0.99966,0.99969,0.99972,0.99974,0.99976,1}, {0.07404,0.07404,0.14260,0.20608,0.26486,0.31929,0.36969,0.41635,0.45957,0.49958,0.53663,0.57094,0.60271,0.63212,0.65936,0.68458,0.70793,0.72956,0.74958,0.76812,0.78529,0.80119,0.81591,0.82954,0.84216,0.85384,0.86466,0.87468,0.88396,0.89255,0.90051,0.90788,0.91470,0.92101,0.92686,0.93228,0.93729,0.94193,0.94623,0.95021,0.95390,0.95731,0.96047,0.96340,0.96611,0.96862,0.97094,0.97309,0.97509,0.97693,0.97864,0.98022,0.98168,0.98304,0.98430,0.98546,0.98654,0.98753,0.98846,0.98931,0.99010,0.99083,0.99151,0.99214,0.99272,0.99326,0.99376,0.99422,0.99465,0.99505,0.99541,0.99575,0.99607,0.99636,0.99663,0.99688,0.99711,0.99732,0.99752,0.99770,0.99787,0.99803,0.99818,0.99831,0.99844,0.99855,0.99866,0.99876,0.99885,0.99894,0.99902,0.99909,0.99916,0.99922,0.99928,0.99933,0.99938,0.99943,0.99947,0.99951,0.99954,0.99958,0.99961,0.99964,0.99966,0.99969,0.99971,0.99973,0.99975,0.99977,0.99979,0.99980,0.99982,0.99983,0.99984,0.99986,0.99987,0.99988,0.99989,1}, {0.06894,0.06894,0.13312,0.19288,0.24852,0.30033,0.34856,0.39347,0.43528,0.47421,0.51046,0.54421,0.57563,0.60488,0.63212,0.65748,0.68109,0.70308,0.72355,0.74260,0.76035,0.77687,0.79225,0.80657,0.81991,0.83232,0.84388,0.85464,0.86466,0.87399,0.88268,0.89077,0.89830,0.90531,0.91184,0.91792,0.92357,0.92884,0.93375,0.93831,0.94257,0.94653,0.95021,0.95365,0.95684,0.95982,0.96259,0.96517,0.96757,0.96980,0.97188,0.97382,0.97563,0.97731,0.97887,0.98033,0.98168,0.98295,0.98412,0.98522,0.98624,0.98719,0.98807,0.98889,0.98966,0.99037,0.99103,0.99165,0.99223,0.99276,0.99326,0.99373,0.99416,0.99456,0.99494,0.99529,0.99561,0.99591,0.99619,0.99646,0.99670,0.99693,0.99714,0.99734,0.99752,0.99769,0.99785,0.99800,0.99814,0.99827,0.99839,0.99850,0.99860,0.99870,0.99879,0.99887,0.99895,0.99902,0.99909,0.99915,0.99921,0.99926,0.99931,0.99936,0.99941,0.99945,0.99949,0.99952,0.99955,0.99958,0.99961,0.99964,0.99966,0.99969,0.99971,0.99973,0.99975,0.99977,0.99978,0.99980,0.99981,0.99982,0.99984,0.99985,0.99986,0.99987,0.99988, 0.99989,0.99989,0.99990,0.99991,0.99991,1}, {0.06449,0.06449,0.12483,0.18127,0.23407,0.28347,0.32968,0.37291,0.41335,0.45119,0.48658,0.51969,0.55067,0.57965,0.60676,0.63212,0.65585,0.67804,0.69881,0.71823,0.73640,0.75340,0.76931,0.78418,0.79810,0.81112,0.82331,0.83470,0.84536,0.85533,0.86466,0.87339,0.88156,0.88920,0.89634,0.90303,0.90928,0.91513,0.92061,0.92573,0.93052,0.93500,0.93919,0.94311,0.94678,0.95021,0.95342,0.95643,0.95924,0.96187,0.96433,0.96663,0.96878,0.97079,0.97268,0.97444,0.97609,0.97763,0.97907,0.98042,0.98168,0.98287,0.98397,0.98500,0.98597,0.98688,0.98772,0.98851,0.98926,0.98995,0.99060,0.99120,0.99177,0.99230,0.99280,0.99326,0.99370,0.99410,0.99448,0.99484,0.99517,0.99548,0.99577,0.99605,0.99630,0.99654,0.99676,0.99697,0.99717,0.99735,0.99752,0.99768,0.99783,0.99797,0.99810,0.99822,0.99834,0.99845,0.99855,0.99864,0.99873,0.99881,0.99889,0.99896,0.99903,0.99909,0.99915,0.99920,0.99925,0.99930,0.99935,0.99939,0.99943,0.99947,0.99950,0.99953,0.99956,0.99959,0.99962,0.99964,0.99966,0.99969,0.99971,0.99973,0.99974,0.99976,0.99978, 0.99979,0.99980,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,1}, {0.06059,0.06059,0.11750,0.17097,0.22120,0.26838,0.31271,0.35435,0.39347,0.43022,0.46474,0.49717,0.52763,0.55625,0.58314,0.60839,0.63212,0.65441,0.67535,0.69502,0.71350,0.73085,0.74716,0.76248,0.77687,0.79039,0.80309,0.81502,0.82623,0.83675,0.84665,0.85594,0.86466,0.87286,0.88057,0.88780,0.89460,0.90099,0.90699,0.91262,0.91792,0.92289,0.92756,0.93195,0.93607,0.93995,0.94358,0.94700,0.95021,0.95323,0.95606,0.95873,0.96123,0.96358,0.96578,0.96786,0.96980,0.97163,0.97335,0.97497,0.97648,0.97791,0.97925,0.98050,0.98168,0.98279,0.98384,0.98482,0.98574,0.98660,0.98741,0.98817,0.98889,0.98956,0.99020,0.99079,0.99135,0.99187,0.99236,0.99283,0.99326,0.99367,0.99405,0.99441,0.99475,0.99507,0.99537,0.99565,0.99591,0.99616,0.99639,0.99661,0.99682,0.99701,0.99719,0.99736,0.99752,0.99767,0.99781,0.99795,0.99807,0.99819,0.99830,0.99840,0.99850,0.99859,0.99867,0.99875,0.99883,0.99890,0.99897,0.99903,0.99909,0.99914,0.99920,0.99924,0.99929,0.99933,0.99937,0.99941,0.99945,0.99948,0.99951,0.99954,0.99957,0.99960,0.99962, 0.99964,0.99966,0.99968,0.99970,0.99972,0.99974,0.99975,0.99977,0.99978,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99992,0.99992,0.99993,0.99993,0.99993,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,1}, {0.05713,0.05713,0.11099,0.16178,0.20966,0.25481,0.29738,0.33752,0.37537,0.41105,0.44469,0.47642,0.50633,0.53453,0.56112,0.58619,0.60983,0.63212,0.65314,0.67295,0.69163,0.70925,0.72586,0.74152,0.75629,0.77021,0.78334,0.79571,0.80738,0.81839,0.82876,0.83855,0.84777,0.85647,0.86466,0.87240,0.87969,0.88656,0.89304,0.89915,0.90491,0.91034,0.91546,0.92029,0.92485,0.92914,0.93319,0.93701,0.94060,0.94400,0.94720,0.95021,0.95306,0.95574,0.95827,0.96065,0.96290,0.96502,0.96702,0.96890,0.97068,0.97235,0.97393,0.97542,0.97683,0.97815,0.97940,0.98057,0.98168,0.98273,0.98372,0.98465,0.98552,0.98635,0.98713,0.98787,0.98856,0.98921,0.98983,0.99041,0.99096,0.99147,0.99196,0.99242,0.99285,0.99326,0.99365,0.99401,0.99435,0.99467,0.99498,0.99527,0.99554,0.99579,0.99603,0.99626,0.99647,0.99667,0.99686,0.99704,0.99721,0.99737,0.99752,0.99766,0.99780,0.99792,0.99804,0.99815,0.99826,0.99836,0.99845,0.99854,0.99862,0.99870,0.99878,0.99885,0.99891,0.99897,0.99903,0.99909,0.99914,0.99919,0.99924,0.99928,0.99932,0.99936,0.99940, 0.99943,0.99946,0.99949,0.99952,0.99955,0.99958,0.99960,0.99962,0.99964,0.99966,0.99968,0.99970,0.99972,0.99973,0.99975,0.99976,0.99978,0.99979,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,0.99997,0.99997,1}, {0.05404,0.05404,0.10516,0.15352,0.19926,0.24253,0.28347,0.32219,0.35882,0.39347,0.42625,0.45725,0.48658,0.51433,0.54057,0.56540,0.58889,0.61110,0.63212,0.65200,0.67081,0.68860,0.70543,0.72134,0.73640,0.75065,0.76412,0.77687,0.78893,0.80033,0.81112,0.82133,0.83099,0.84012,0.84876,0.85693,0.86466,0.87198,0.87890,0.88544,0.89163,0.89749,0.90303,0.90827,0.91323,0.91792,0.92235,0.92655,0.93052,0.93427,0.93782,0.94118,0.94436,0.94737,0.95021,0.95290,0.95545,0.95786,0.96013,0.96229,0.96433,0.96625,0.96808,0.96980,0.97143,0.97298,0.97444,0.97582,0.97713,0.97836,0.97953,0.98064,0.98168,0.98267,0.98361,0.98450,0.98533,0.98613,0.98688,0.98759,0.98826,0.98889,0.98949,0.99006,0.99060,0.99110,0.99159,0.99204,0.99247,0.99288,0.99326,0.99363,0.99397,0.99430,0.99460,0.99490,0.99517,0.99543,0.99568,0.99591,0.99613,0.99634,0.99654,0.99673,0.99690,0.99707,0.99723,0.99738,0.99752,0.99766,0.99778,0.99790,0.99802,0.99812,0.99822,0.99832,0.99841,0.99850,0.99858,0.99865,0.99873,0.99880,0.99886,0.99892,0.99898,0.99904,0.99909, 0.99914,0.99918,0.99923,0.99927,0.99931,0.99935,0.99938,0.99942,0.99945,0.99948,0.99951,0.99953,0.99956,0.99958,0.99960,0.99963,0.99965,0.99966,0.99968,0.99970,0.99972,0.99973,0.99975,0.99976,0.99977,0.99978,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,0.99997,0.99997,0.99997,0.99997,0.99997,0.99998,1}}; /*******/ /***valeur possible jo****/ /* unsigned char tab1[total1] = {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF,0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B, 0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F}; */ unsigned char tab1[total1] = {0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB, 0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}; int assemble = 0; int ludion = 0; int enclanche = 0; int nbdepoints; int ouaitu; double force2; int amplitude; int force1; int groupe1; int groupe2; force1 =1; amplitude = 1; groupe1=1; /***valeur possible jo****/ abadie = fgetc(jojo); /* abadie vient chercher tout ce qui bouge*/ while (abadie != EOF) { for (ouaitu=0; ouaitu<255; ouaitu++) { if ( abadie == tab1[ouaitu]) { force1 = ouaitu; assemble++; } } /***debut assemble***/ switch (assemble) { case 1 : groupe1 = force1; /*assemble = 2;*/ break; case 2 : groupe2 = force1; /*assemble = 3;*/ force2 = (double)(groupe1 + 256 * groupe2); amplitude = (int)(force2); break; case 3 : groupe3 = force1; /*assemble = 2;*/ break; case 4 : groupe4 = force1; force3 = (double)(groupe3 + 256 * groupe4); nbdepoints = (int)(force3); break; default: groupe5 = force1; joencour = (force1); /****fin traitement bin******/ float okioki ; float okioki1 ; okioki = (float)(nbdepoints); okioki1 = (float)(joencour); jo = (double)(okioki * okioki1 * (0.01) ); /********************** if (jo < 2) jo = 1; ***************/ if (ludion > amplitude) sens = 2; else sens = 1; /***fin conversion***/ if(sens == 2) { if ( nbdepoints < 2) { codebash = (int)(amplitude); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); } else if (( nbdepoints & 1)&&( nbdepoints >= 2)) { double ote, ote1; int boucle; int arrondi_haut; boucle = nbdepoints * 0.5; ote = ( ludion - amplitude) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int)( amplitude + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); boucle--; bascule = codebash; } enclanche = 2;/*****************premier enclanche du sens 2************/ if ( enclanche == 2) { double ote, ote1; ote = (ludion - amplitude ) * 0.5; int arrondi_haut; int boucle1 = 1; while (boucle1 < nbdepoints * 0.5 + 2) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle1] != 0) { ote1 = ote * jo2[arrondi_haut][boucle1]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle1/jo)); } codebash = (int) ( ludion - ote -ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle1++; } enclanche = 0; } } /**************************/ else { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; int arrondi_haut; ote = (ludion - amplitude) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int)( amplitude + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle--; bascule = codebash; } enclanche = 2; /*** deuxieme enclanche du sens 2**********/ if ( enclanche == 2) { double ote, ote1; ote = (ludion - amplitude) * 0.5; int boucle1 = 1; int arrondi_haut; while (boucle1 < nbdepoints * 0.5 + 1) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle1] != 0) { ote1 = ote * jo2[arrondi_haut][boucle1]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle1/jo)); } codebash = (int) ( ludion - ote -ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle1++; } enclanche = 0; /* fin descente 2*/ } } } /*en attente*/ /**********/ if(sens == 1) { if ( nbdepoints < 2) { codebash = (int)(amplitude); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); } /************************correction impair*************************************************************************/ else if (( nbdepoints & 1)&&( nbdepoints >= 2)) { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; if ( boucle == 0) { boucle = 1; } int arrondi_haut; ote = ( amplitude - ludion ) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = amplitude - ote - ote1; codebash = (int)(amplitude - ote - ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); bascule = codebash; /*fin modif*/ boucle--; } enclanche = 1; /* debut descente inverse du sens 1 */ if (enclanche == 1) { double ote, ote1; int boucle, boncompte; boucle = 1; ote = ( amplitude - ludion ) * 0.5; boncompte = nbdepoints * 0.5; if (boncompte == 0) { boncompte = 1; } int arrondi_haut; while (boucle < (boncompte+2)) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int) (ludion + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle++; } enclanche = 0; } } /***********************************fin correction impair**************************************************************/ else { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; if ( boucle == 0) { boucle = 1; } ote = ( amplitude - ludion ) * 0.5; int arrondi_haut; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = amplitude - ote - ote1; /* * fprintf(temps,"%d ", (int)codebash ); */ codebash = (int)(amplitude - ote - ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); bascule = codebash; /*fin modif*/ boucle--; } enclanche = 1; /* debut descente inverse du sens 1 */ if (enclanche == 1) { double ote, ote1; int boucle, boncompte; boucle = 1; ote = ( amplitude - ludion ) * 0.5; boncompte = nbdepoints * 0.5; if (boncompte == 0) { boncompte = 1; } int arrondi_haut; while (boucle < (boncompte+1)) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int) (ludion + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle++; } enclanche = 0; } } } /* fin*/ /********/ /*****/ ludion = amplitude; assemble = 0; break; } /*pas*toucher*/ abadie = fgetc(jojo); } /***fin assemble***/ fclose(temps), temps = NULL;; } fclose(jojo), jojo = NULL;; } fonctionPasserellestereofin(argc, argv); melangeCetCpp = system("xdg-open joris1.wav"); if (melangeCetCpp == EOF); return 0; } /***************************/ int fonctionPasserellestereo (int argc, char *argv[]) { FILE* jojo = NULL; jojo = fopen(a21joris, "rb"); if (jojo != NULL) { double codebash; char tab[total] = {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF,0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A, 0x4B,0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F}; char *ptr; char *petr; double jo; int sens; FILE* temps = NULL; temps = fopen(b21joris, "wb"); /* pour ajouter a. possible w ou r+ w+ tester */ if (temps != NULL) { double jo2[19][196] = {{0}, {0.63212,0.63212,0.864665,0.95021,0.981684,0.993262,0.99752,0.999088,0.999664,0.9998765,0.9999546,1}, {0.39347,0.39347,0.63212,0.77687,0.86466,0.91791,0.95021,0.96980,0.98168,0.98889,0.99326,0.99591,0.99752,0.99849,0.99909,0.99945,0.99966,0.9998,0.9999,0.9999,1,1,1}, {0.28347,0.28347,0.48658,0.63212,0.73640,0.81112,0.86466,0.90303,0.93052,0.95021,0.96433,0.97444,0.98168,0.98688,0.99060,0.99326,0.99517,0.99654,0.99752,0.99822,0.99873,0.99909,0.99935,0.99953,0.99966,0.99976,0.99983,1,1}, {0.22120,0.22120,0.39347,0.52763,0.63212,0.71350,0.77687,0.82623,0.86466,0.89460,0.91792,0.93607,0.95021,0.96123,0.96980,0.97648,0.98168,0.98574,0.98889,0.99135,0.99326,0.99475,0.99591,0.99682,0.99752,0.99807,0.99850,0.99883,0.99909,0.99929,0.99945,0.99957,0.99966,0.99974,0.99980,0.99984,0.99988,0.99990,0.99993,0.99994,0.99995,0.99996,0.99997,0.99998,0.99998,1,1}, {0.18127,0.18127,0.32968,0.45119,0.55067,0.63212,0.69881,0.75340,0.79810,0.83470,0.86466,0.88920,0.90928,0.92573,0.93919,0.95021,0.95924,0.96663,0.97268,0.97763,0.98168,0.98500,0.98772,0.98995,0.99177,0.99326,0.99448,0.99548,0.99630,0.99697,0.99752,0.99797,0.99834,0.99864,0.99889,0.99909,0.99925,0.99939,0.99950,0.99959,0.99966,0.99973,0.99978,0.99982,0.99985,0.99988,0.99990,0.99992,0.99993,0.99994,1}, {0.15352,0.15352,0.28347,0.39347,0.48658,0.56540,0.63212,0.68860,0.73640,0.77687,0.81112,0.84012,0.86466,0.88544,0.90303,0.91792,0.93052,0.94118,0.95021,0.95786,0.96433,0.96980,0.97444,0.97836,0.98168,0.98450,0.98688,0.98889,0.99060,0.99204,0.99326,0.99430,0.99517,0.99591,0.99654,0.99707,0.99752,0.99790,0.99822,0.99850,0.99873,0.99892,0.99909,0.99923,0.99935,0.99945,0.99953,0.99960,0.99966,0.99972,1}, {0.13312,0.13312,0.24852,0.34856,0.43528,0.51046,0.57563,0.63212,0.68109,0.72355,0.76035,0.79225,0.81991,0.84388,0.86466,0.88268,0.89830,0.91184,0.92357,0.93375,0.94257,0.95021,0.95684,0.96259,0.96757,0.97188,0.97563,0.97887,0.98168,0.98412,0.98624,0.98807,0.98966,0.99103,0.99223,0.99326,0.99416,0.99494,0.99561,0.99619,0.99670,0.99714,0.99752,0.99785,0.99814,0.99839,0.99860,0.99879,0.99895,0.99909,0.99921,0.99931,0.99941,0.99949,0.99955,0.99961,1}, {0.11750,0.11750,0.22120,0.31271,0.39347,0.46474,0.52763,0.58314,0.63212,0.67535,0.71350,0.74716,0.77687,0.80309,0.82623,0.84665,0.86466,0.88057,0.89460,0.90699,0.91792,0.92756,0.93607,0.94358,0.95021,0.95606,0.96123,0.96578,0.96980,0.97335,0.97648,0.97925,0.98168,0.98384,0.98574,0.98741,0.98889,0.99020,0.99135,0.99236,0.99326,0.99405,0.99475,0.99537,0.99591,0.99639,0.99682,0.99719,0.99752,0.99781,0.99807,0.99830,0.99850,0.99867,0.99883,0.99897,0.99909,0.99920,0.99929,0.99937,0.99945,0.99951,0.99957,1}, {0.10516,0.10516,0.19926,0.28347,0.35882,0.42625,0.48658,0.54057,0.58889,0.63212,0.67081,0.70543,0.73640,0.76412,0.78893,0.81112,0.83099,0.84876,0.86466,0.87890,0.89163,0.90303,0.91323,0.92235,0.93052,0.93782,0.94436,0.95021,0.95545,0.96013,0.96433,0.96808,0.97143,0.97444,0.97713,0.97953,0.98168,0.98361,0.98533,0.98688,0.98826,0.98949,0.99060,0.99159,0.99247,0.99326,0.99397,0.99460,0.99517,0.99568,0.99613,0.99654,0.99690,0.99723,0.99752,0.99778,0.99802,0.99822,0.99841,0.99858,0.99873,0.99886,0.99898,0.99909,0.99918,0.99927,0.99935,0.99942,0.99948,1}, {0.09516,0.09516,0.18127,0.25918,0.32968,0.39347,0.45119,0.50341,0.55067,0.59343,0.63212,0.66713,0.69881,0.72747,0.75340,0.77687,0.79810,0.81732,0.83470,0.85043,0.86466,0.87754,0.88920,0.89974,0.90928,0.91792,0.92573,0.93279,0.93919,0.94498,0.95021,0.95495,0.95924,0.96312,0.96663,0.96980,0.97268,0.97528,0.97763,0.97976,0.98168,0.98343,0.98500,0.98643,0.98772,0.98889,0.98995,0.99090,0.99177,0.99255,0.99326,0.99390,0.99448,0.99501,0.99548,0.99591,0.99630,0.99665,0.99697,0.99726,0.99752,0.99776,0.99797,0.99816,0.99834,0.99850,0.99864,0.99877,0.99889,0.99899,0.99909,0.99917,0.99925,0.99932,0.99939,0.99945,1}, {0.08690,0.08690,0.16625,0.23870,0.30486,0.36526,0.42042,0.47079,0.51677,0.55877,0.59711,0.63212,0.66409,0.69328,0.71993,0.74427,0.76649,0.78679,0.80531,0.82223,0.83768,0.85178,0.86466,0.87643,0.88716,0.89697,0.90592,0.91410,0.92156,0.92838,0.93460,0.94029,0.94547,0.95021,0.95454,0.95849,0.96210,0.96539,0.96840,0.97114,0.97365,0.97594,0.97803,0.97994,0.98168,0.98328,0.98473,0.98606,0.98727,0.98837,0.98938,0.99031,0.99115,0.99192,0.99262,0.99326,0.99385,0.99438,0.99487,0.99532,0.99572,0.99609,0.99643,0.99674,0.99703,0.99729,0.99752,0.99774,0.99793,0.99811,0.99828,0.99843,0.99856,0.99869,0.99880,0.99891,0.99900,0.99909,0.99917,0.99924,0.99931,0.99937,0.99942,0.99947,0.99952,0.99956,0.99960,1}, {0.07996,0.07996,0.15352,0.22120,0.28347,0.34076,0.39347,0.44196,0.48658,0.52763,0.56540,0.60015,0.63212,0.66153,0.68860,0.71350,0.73640,0.75748,0.77687,0.79471,0.81112,0.82623,0.84012,0.85290,0.86466,0.87549,0.88544,0.89460,0.90303,0.91078,0.91792,0.92448,0.93052,0.93607,0.94118,0.94589,0.95021,0.95419,0.95786,0.96123,0.96433,0.96718,0.96980,0.97222,0.97444,0.97648,0.97836,0.98009,0.98168,0.98315,0.98450,0.98574,0.98688,0.98793,0.98889,0.98978,0.99060,0.99135,0.99204,0.99268,0.99326,0.99380,0.99430,0.99475,0.99517,0.99556,0.99591,0.99624,0.99654,0.99682,0.99707,0.99731,0.99752,0.99772,0.99790,0.99807,0.99822,0.99837,0.99850,0.99862,0.99873,0.99883,0.99892,0.99901,0.99909,0.99916,0.99923,0.99929,0.99935,0.99940,0.99945,0.99949,0.99953,0.99957,0.99960,0.99964,0.99966,0.99969,0.99972,0.99974,0.99976,1}, {0.07404,0.07404,0.14260,0.20608,0.26486,0.31929,0.36969,0.41635,0.45957,0.49958,0.53663,0.57094,0.60271,0.63212,0.65936,0.68458,0.70793,0.72956,0.74958,0.76812,0.78529,0.80119,0.81591,0.82954,0.84216,0.85384,0.86466,0.87468,0.88396,0.89255,0.90051,0.90788,0.91470,0.92101,0.92686,0.93228,0.93729,0.94193,0.94623,0.95021,0.95390,0.95731,0.96047,0.96340,0.96611,0.96862,0.97094,0.97309,0.97509,0.97693,0.97864,0.98022,0.98168,0.98304,0.98430,0.98546,0.98654,0.98753,0.98846,0.98931,0.99010,0.99083,0.99151,0.99214,0.99272,0.99326,0.99376,0.99422,0.99465,0.99505,0.99541,0.99575,0.99607,0.99636,0.99663,0.99688,0.99711,0.99732,0.99752,0.99770,0.99787,0.99803,0.99818,0.99831,0.99844,0.99855,0.99866,0.99876,0.99885,0.99894,0.99902,0.99909,0.99916,0.99922,0.99928,0.99933,0.99938,0.99943,0.99947,0.99951,0.99954,0.99958,0.99961,0.99964,0.99966,0.99969,0.99971,0.99973,0.99975,0.99977,0.99979,0.99980,0.99982,0.99983,0.99984,0.99986,0.99987,0.99988,0.99989,1}, {0.06894,0.06894,0.13312,0.19288,0.24852,0.30033,0.34856,0.39347,0.43528,0.47421,0.51046,0.54421,0.57563,0.60488,0.63212,0.65748,0.68109,0.70308,0.72355,0.74260,0.76035,0.77687,0.79225,0.80657,0.81991,0.83232,0.84388,0.85464,0.86466,0.87399,0.88268,0.89077,0.89830,0.90531,0.91184,0.91792,0.92357,0.92884,0.93375,0.93831,0.94257,0.94653,0.95021,0.95365,0.95684,0.95982,0.96259,0.96517,0.96757,0.96980,0.97188,0.97382,0.97563,0.97731,0.97887,0.98033,0.98168,0.98295,0.98412,0.98522,0.98624,0.98719,0.98807,0.98889,0.98966,0.99037,0.99103,0.99165,0.99223,0.99276,0.99326,0.99373,0.99416,0.99456,0.99494,0.99529,0.99561,0.99591,0.99619,0.99646,0.99670,0.99693,0.99714,0.99734,0.99752,0.99769,0.99785,0.99800,0.99814,0.99827,0.99839,0.99850,0.99860,0.99870,0.99879,0.99887,0.99895,0.99902,0.99909,0.99915,0.99921,0.99926,0.99931,0.99936,0.99941,0.99945,0.99949,0.99952,0.99955,0.99958,0.99961,0.99964,0.99966,0.99969,0.99971,0.99973,0.99975,0.99977,0.99978,0.99980,0.99981,0.99982,0.99984,0.99985,0.99986,0.99987,0.99988, 0.99989,0.99989,0.99990,0.99991,0.99991,1}, {0.06449,0.06449,0.12483,0.18127,0.23407,0.28347,0.32968,0.37291,0.41335,0.45119,0.48658,0.51969,0.55067,0.57965,0.60676,0.63212,0.65585,0.67804,0.69881,0.71823,0.73640,0.75340,0.76931,0.78418,0.79810,0.81112,0.82331,0.83470,0.84536,0.85533,0.86466,0.87339,0.88156,0.88920,0.89634,0.90303,0.90928,0.91513,0.92061,0.92573,0.93052,0.93500,0.93919,0.94311,0.94678,0.95021,0.95342,0.95643,0.95924,0.96187,0.96433,0.96663,0.96878,0.97079,0.97268,0.97444,0.97609,0.97763,0.97907,0.98042,0.98168,0.98287,0.98397,0.98500,0.98597,0.98688,0.98772,0.98851,0.98926,0.98995,0.99060,0.99120,0.99177,0.99230,0.99280,0.99326,0.99370,0.99410,0.99448,0.99484,0.99517,0.99548,0.99577,0.99605,0.99630,0.99654,0.99676,0.99697,0.99717,0.99735,0.99752,0.99768,0.99783,0.99797,0.99810,0.99822,0.99834,0.99845,0.99855,0.99864,0.99873,0.99881,0.99889,0.99896,0.99903,0.99909,0.99915,0.99920,0.99925,0.99930,0.99935,0.99939,0.99943,0.99947,0.99950,0.99953,0.99956,0.99959,0.99962,0.99964,0.99966,0.99969,0.99971,0.99973,0.99974,0.99976,0.99978, 0.99979,0.99980,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,1}, {0.06059,0.06059,0.11750,0.17097,0.22120,0.26838,0.31271,0.35435,0.39347,0.43022,0.46474,0.49717,0.52763,0.55625,0.58314,0.60839,0.63212,0.65441,0.67535,0.69502,0.71350,0.73085,0.74716,0.76248,0.77687,0.79039,0.80309,0.81502,0.82623,0.83675,0.84665,0.85594,0.86466,0.87286,0.88057,0.88780,0.89460,0.90099,0.90699,0.91262,0.91792,0.92289,0.92756,0.93195,0.93607,0.93995,0.94358,0.94700,0.95021,0.95323,0.95606,0.95873,0.96123,0.96358,0.96578,0.96786,0.96980,0.97163,0.97335,0.97497,0.97648,0.97791,0.97925,0.98050,0.98168,0.98279,0.98384,0.98482,0.98574,0.98660,0.98741,0.98817,0.98889,0.98956,0.99020,0.99079,0.99135,0.99187,0.99236,0.99283,0.99326,0.99367,0.99405,0.99441,0.99475,0.99507,0.99537,0.99565,0.99591,0.99616,0.99639,0.99661,0.99682,0.99701,0.99719,0.99736,0.99752,0.99767,0.99781,0.99795,0.99807,0.99819,0.99830,0.99840,0.99850,0.99859,0.99867,0.99875,0.99883,0.99890,0.99897,0.99903,0.99909,0.99914,0.99920,0.99924,0.99929,0.99933,0.99937,0.99941,0.99945,0.99948,0.99951,0.99954,0.99957,0.99960,0.99962, 0.99964,0.99966,0.99968,0.99970,0.99972,0.99974,0.99975,0.99977,0.99978,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99992,0.99992,0.99993,0.99993,0.99993,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,1}, {0.05713,0.05713,0.11099,0.16178,0.20966,0.25481,0.29738,0.33752,0.37537,0.41105,0.44469,0.47642,0.50633,0.53453,0.56112,0.58619,0.60983,0.63212,0.65314,0.67295,0.69163,0.70925,0.72586,0.74152,0.75629,0.77021,0.78334,0.79571,0.80738,0.81839,0.82876,0.83855,0.84777,0.85647,0.86466,0.87240,0.87969,0.88656,0.89304,0.89915,0.90491,0.91034,0.91546,0.92029,0.92485,0.92914,0.93319,0.93701,0.94060,0.94400,0.94720,0.95021,0.95306,0.95574,0.95827,0.96065,0.96290,0.96502,0.96702,0.96890,0.97068,0.97235,0.97393,0.97542,0.97683,0.97815,0.97940,0.98057,0.98168,0.98273,0.98372,0.98465,0.98552,0.98635,0.98713,0.98787,0.98856,0.98921,0.98983,0.99041,0.99096,0.99147,0.99196,0.99242,0.99285,0.99326,0.99365,0.99401,0.99435,0.99467,0.99498,0.99527,0.99554,0.99579,0.99603,0.99626,0.99647,0.99667,0.99686,0.99704,0.99721,0.99737,0.99752,0.99766,0.99780,0.99792,0.99804,0.99815,0.99826,0.99836,0.99845,0.99854,0.99862,0.99870,0.99878,0.99885,0.99891,0.99897,0.99903,0.99909,0.99914,0.99919,0.99924,0.99928,0.99932,0.99936,0.99940, 0.99943,0.99946,0.99949,0.99952,0.99955,0.99958,0.99960,0.99962,0.99964,0.99966,0.99968,0.99970,0.99972,0.99973,0.99975,0.99976,0.99978,0.99979,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,0.99997,0.99997,1}, {0.05404,0.05404,0.10516,0.15352,0.19926,0.24253,0.28347,0.32219,0.35882,0.39347,0.42625,0.45725,0.48658,0.51433,0.54057,0.56540,0.58889,0.61110,0.63212,0.65200,0.67081,0.68860,0.70543,0.72134,0.73640,0.75065,0.76412,0.77687,0.78893,0.80033,0.81112,0.82133,0.83099,0.84012,0.84876,0.85693,0.86466,0.87198,0.87890,0.88544,0.89163,0.89749,0.90303,0.90827,0.91323,0.91792,0.92235,0.92655,0.93052,0.93427,0.93782,0.94118,0.94436,0.94737,0.95021,0.95290,0.95545,0.95786,0.96013,0.96229,0.96433,0.96625,0.96808,0.96980,0.97143,0.97298,0.97444,0.97582,0.97713,0.97836,0.97953,0.98064,0.98168,0.98267,0.98361,0.98450,0.98533,0.98613,0.98688,0.98759,0.98826,0.98889,0.98949,0.99006,0.99060,0.99110,0.99159,0.99204,0.99247,0.99288,0.99326,0.99363,0.99397,0.99430,0.99460,0.99490,0.99517,0.99543,0.99568,0.99591,0.99613,0.99634,0.99654,0.99673,0.99690,0.99707,0.99723,0.99738,0.99752,0.99766,0.99778,0.99790,0.99802,0.99812,0.99822,0.99832,0.99841,0.99850,0.99858,0.99865,0.99873,0.99880,0.99886,0.99892,0.99898,0.99904,0.99909, 0.99914,0.99918,0.99923,0.99927,0.99931,0.99935,0.99938,0.99942,0.99945,0.99948,0.99951,0.99953,0.99956,0.99958,0.99960,0.99963,0.99965,0.99966,0.99968,0.99970,0.99972,0.99973,0.99975,0.99976,0.99977,0.99978,0.99980,0.99981,0.99982,0.99983,0.99984,0.99985,0.99985,0.99986,0.99987,0.99988,0.99988,0.99989,0.99990,0.99990,0.99991,0.99991,0.99992,0.99992,0.99993,0.99993,0.99993,0.99994,0.99994,0.99994,0.99995,0.99995,0.99995,0.99995,0.99996,0.99996,0.99996,0.99996,0.99997,0.99997,0.99997,0.99997,0.99997,0.99997,0.99998,1}}; /*******/ /***valeur possible jo****/ /* unsigned char tab1[total1] = {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF,0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B, 0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F}; */ unsigned char tab1[total1] = {0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F,0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F,0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F,0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F,0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0x5B,0x5C,0x5D,0x5E,0x5F,0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F,0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0x7C,0x7D,0x7E,0x7F,0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF,0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB, 0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF,0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}; int assemble = 0; int ludion = 0; int enclanche = 0; int nbdepoints; int ouaitu; double force2; int amplitude; int force1; int groupe1; int groupe2; force1 =1; amplitude = 1; groupe1=1; /***valeur possible jo****/ abadie = fgetc(jojo); /* abadie vient chercher tout ce qui bouge*/ while (abadie != EOF) { for (ouaitu=0; ouaitu<255; ouaitu++) { if ( abadie == tab1[ouaitu]) { force1 = ouaitu; assemble++; } } /***debut assemble***/ switch (assemble) { case 1 : groupe1 = force1; /*assemble = 2;*/ break; case 2 : groupe2 = force1; /*assemble = 3;*/ force2 = (double)(groupe1 + 256 * groupe2); amplitude = (int)(force2); break; case 3 : groupe3 = force1; /*assemble = 2;*/ break; case 4 : groupe4 = force1; force3 = (double)(groupe3 + 256 * groupe4); nbdepoints = (int)(force3); break; default: groupe5 = force1; joencour = (force1); /****fin traitement bin******/ float okioki ; float okioki1 ; okioki = (float)(nbdepoints); okioki1 = (float)(joencour); jo = (double)(okioki * okioki1 * (0.01)); /****fin traitement bin******/ /****fin traitement bin******/ /********************** jo = (double)(nbdepoints * 0.17); ********* if (jo < 2) jo = 1; ******/ if (ludion > amplitude) sens = 2; else sens = 1; /***fin conversion***/ if(sens == 2) { if ( nbdepoints < 2) { codebash = (int)(amplitude); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); } else if (( nbdepoints & 1)&&( nbdepoints >= 2)) { double ote, ote1; int boucle; int arrondi_haut; boucle = nbdepoints * 0.5; ote = ( ludion - amplitude) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int)( amplitude + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); boucle--; bascule = codebash; } enclanche = 2;/*****************premier enclanche du sens 2************/ if ( enclanche == 2) { double ote, ote1; ote = (ludion - amplitude ) * 0.5; int arrondi_haut; int boucle1 = 1; while (boucle1 < nbdepoints * 0.5 + 2) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle1] != 0) { ote1 = ote * jo2[arrondi_haut][boucle1]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle1/jo)); } codebash = (int) ( ludion - ote -ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle1++; } enclanche = 0; } } /**************************/ else { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; int arrondi_haut; ote = (ludion - amplitude) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int)( amplitude + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle--; bascule = codebash; } enclanche = 2; /*** deuxieme enclanche du sens 2**********/ if ( enclanche == 2) { double ote, ote1; ote = (ludion - amplitude) * 0.5; int boucle1 = 1; int arrondi_haut; while (boucle1 < nbdepoints * 0.5 + 1) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle1] != 0) { ote1 = ote * jo2[arrondi_haut][boucle1]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle1/jo)); } codebash = (int) ( ludion - ote -ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle1++; } enclanche = 0; /* fin descente 2*/ } } } /*en attente*/ /**********/ if(sens == 1) { if ( nbdepoints < 2) { codebash = (int)(amplitude); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); } /************************correction impair*************************************************************************/ else if (( nbdepoints & 1)&&( nbdepoints >= 2)) { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; if ( boucle == 0) { boucle = 1; } int arrondi_haut; ote = ( amplitude - ludion ) * 0.5; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = amplitude - ote - ote1; codebash = (int)(amplitude - ote - ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); bascule = codebash; /*fin modif*/ boucle--; } enclanche = 1; /* debut descente inverse du sens 1 */ if (enclanche == 1) { double ote, ote1; int boucle, boncompte; boucle = 1; ote = ( amplitude - ludion ) * 0.5; boncompte = nbdepoints * 0.5; if (boncompte == 0) { boncompte = 1; } int arrondi_haut; while (boucle < (boncompte+2)) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int) (ludion + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle++; } enclanche = 0; } } /***********************************fin correction impair**************************************************************/ else { double ote, ote1; int boucle; boucle = nbdepoints * 0.5; if ( boucle == 0) { boucle = 1; } ote = ( amplitude - ludion ) * 0.5; int arrondi_haut; while ( boucle > 0) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = amplitude - ote - ote1; /* * fprintf(temps,"%d ", (int)codebash ); */ codebash = (int)(amplitude - ote - ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); bascule = codebash; /*fin modif*/ boucle--; } enclanche = 1; /* debut descente inverse du sens 1 */ if (enclanche == 1) { double ote, ote1; int boucle, boncompte; boucle = 1; ote = ( amplitude - ludion ) * 0.5; boncompte = nbdepoints * 0.5; if (boncompte == 0) { boncompte = 1; } int arrondi_haut; while (boucle < (boncompte+1)) { arrondi_haut = ceil(jo); if (arrondi_haut <= 18) { if (jo2[arrondi_haut][boucle] != 0) { ote1 = ote * jo2[arrondi_haut][boucle]; } else { ote1 = ote; } } else { ote1 = ote * ( 1 - exp (-boucle/jo)); } codebash = (int) (ludion + ote + ote1); int ji; int ij; int ola; ola = (int)codebash; /*ji = ola%256;*/ ij = (int)(ola*0.00390625); ji = ola - (256*ij); ptr = &tab[ji]; petr = &tab[ij]; fwrite( ptr, sizeof(char), 1, temps); fwrite( petr, sizeof(char), 1, temps); /*fin modif*/ boucle++; } enclanche = 0; } } } /* fin*/ /********/ /*****/ ludion = amplitude; assemble = 0; break; } /*pas*toucher*/ abadie = fgetc(jojo); } /***fin assemble***/ fclose(temps), temps = NULL;; } fclose(jojo), jojo = NULL;; } return 0; } /*****fin lecteur stereo****/ /****************main**********/ int main(int argc, char *argv[]) { /***** fonctionPasserellestereofin(argc, argv); melangeCetCpp = system("xdg-open joris1.wav"); if (melangeCetCpp == EOF);*********/ FonctionEntete(argc, argv); fonctionPasserellestereo(argc, argv); fonctionPasserellestereo1(argc, argv); return 0; }