int main() { FILE * fa, * fb; char strtmp[100]; int len = 0; fa = fopen("list.txt", "r"); fb = fopen("list.js", "w"); fprintf(fb, "var ary = new Array(\n"); while(fgets(strtmp, 100, fa) != NULL) { delspace(strtmp); len = strlen(strtmp); if (len !=0){ fprintf(fb, "\"%s\",\n", strtmp); } } fprintf(fb, "\"todel\"\n"); fprintf(fb, ")\n"); fprintf(fb, "ary.splice(ary.length-1, 1)\n"); fclose(fa); fclose(fb); return 0; }
void final_crit() { cell *c; uchar let,let1; int16_t cnt; for (cnt=0,c=cell_f()->next; c->next!=NULL; c=c->next) { if (c->flg&c_f_space) continue; let=c->vers[0].let; if(final_crit_russian(c)) cnt++; if (c->font&c_fp_undrln) { if (let=='v') final_vy(c); if (let=='e' || let=='u') final_eg(c); if (let=='o' || let=='a' && c->nvers>=2 && c->vers[1].let=='o') final_ao_gpq(c); if (let=='O') final_OQ(c); if (let=='.') final_dotcom(c); } if (let=='/') cnt+=final_slash_l(c); else { if ((c->font|c->font_new)&c_fp_it && memchr("Il1",let,3)) cnt+=final_no_slash(c); if (c->flg&c_f_bad || c->vers[0].prob<PROBL) cnt+=final_back_slash(c); } if ((let=='c' || let=='C') && c->vers[1].let=='<') { c->nvers=1; c->vers[1].let=0; } if ((let=='b' || let=='h') && (c->font|c->font_new)&c_fp_it) final_bh(c); if ( (language==LANG_GERMAN || language==LANG_SPANISH || language==LANG_FRENCH || language==LANG_ESTONIAN || // 19.07.2001 E.P. language==LANG_TURKISH // 30.05.2002 E.P. ) && ((c->font|c->font_new)&c_fp_it || let=='i' || let==liga_i || language == LANG_TURKISH && // 30.05.2002 E.P. (let==i_sans_accent||let==II_dot_accent) ) && (let=='i' || let==liga_i || language == LANG_TURKISH && // 30.05.2002 E.P. (let==i_sans_accent||let==II_dot_accent) || let==liga_fi || let==liga_ffi ) && ( (let1=c->nextl->vers[0].let)=='i' || let1==liga_i || language == LANG_TURKISH && // 30.05.2002 E.P. (let1==i_sans_accent||let1==II_dot_accent) ) && (c->cg_flag&c_cg_cutr && c->nextl->cg_flag&c_cg_cutl || ((c->font|c->font_new)&c_fp_str) && c->nextl->col-(c->col+c->w)<=1 ) ) final_ii_u(c); if (language==LANG_GERMAN && memchr("0AOU",let,4) || language==LANG_SWEDISH && memchr("0AO",let,3) || language==LANG_SPANISH && let=='U' || language==LANG_ESTONIAN && memchr("0AOU",let,4) // 19.07.2001 E.P. ) { get_b_lines(c,&bl); if (bl.b1>c->row) final_AOU_2dot(c); } if (language==LANG_SWEDISH && c->vers[0].let=='A') { get_b_lines(c,&bl); if (bl.b1>c->row+MAX(4,bl.ps/4)) final_A_circle(c); } if (let=='-' && 3*c->h<c->w && (c->prev->flg&(c_f_fict|c_f_space) && c->prev->vers[0].let!=0x1e || memchr(".,:;",c->prev->vers[0].let,4)) && (c->next->flg&(c_f_fict|c_f_space) && c->next->vers[0].let!=0x1e || memchr(".,:;",c->next->vers[0].let,4))) c->vers[0].let='_'; if (let=='F' && c->cg_flag&c_cg_cutr && memchr(".,",c->next->vers[0].let,2) && c->next->cg_flag&c_cg_cutl && c->col+c->w>c->next->col) { clist[0]=c; clist[1]=c->next; compose_cell(2,clist,c); c->vers[0].let='E'; c->left=c->col; c->right=c->col+c->w; } if (memchr("Vv",let,2) && c->cg_flag&c_cg_cutr && c->next->vers[0].let==let && c->next->cg_flag&c_cg_cutl) final_vv_w(c); if (let=='d' && c->vers[0].prob>=PROBD && memchr("cistx",c->next->vers[0].let,5) && c->next->vers[0].prob<=PROBB && c->next->col-(c->col+c->w)<=1) final_d_chck(c); if (let==0x27 && c->cg_flag&c_cg_cutr && memchr("Il",c->next->vers[0].let,2) && c->next->cg_flag&c_cg_cutl) { c=c->next; // AL 940321 final_Il_1(c); cnt++; } if (let=='7' && c->cg_flag&c_cg_cutr && c->next->vers[0].let==0x27 && c->next->cg_flag&c_cg_cutl) {final_7_T(c); cnt++;} } if (cnt) { delspace(); space_size((int16_t)get_size()); space_cell(); context_proc_line(); cont_space(); } }