html.c
上传用户:shbosideng
上传日期:2013-05-04
资源大小:1555k
文件大小:1k
- /*
- Iulian Radu [v2.0@07.1999]
- */
- void mkhtmlh(){ /*use fh global*/
- if(!fh) return;
- fprintf(fh,"<HTML>n");
- fprintf(fh,"<HEADER>n");
- fprintf(fh,"<TITLE>n");
- if(title[0]) fprintf(fh,title);
- else fprintf(fh,btxt[0]);
- fprintf(fh,"</TITLE>n");
- fprintf(fh,"</HEADER>n");
- if(body[0]) fprintf(fh,"<BODY %s>n",body);
- else fprintf(fh,"<BODY>n");
- }
- void closehtml(){ /*use fh global*/
- int i;
- if(!fh) return;
- for(;identl;identl--){
- for(i=1;i<identl;i++) fprintf(fh,"t");
- fprintf(fh,"</UL>n");}
- fprintf(fh,"</BODY>n");
- fprintf(fh,"</HTML>n");
- fclose(fh);
- fh=NULL;
- }