C语言艺术清屏(页 1) - 网页编程 - 捌玖网络工作室 |网页制作|平面设计|建站交流|代码资料|建站教程|主机域名|asp、php、jsp代码|网站素材

zw2004 发表于 2008-1-21 17:14

C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,)B})fDB/p'J8f
b0l2M'[h;h0`,@3@ZY3B
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里
"u`r({*R*vW.K F
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:` `|3ls

　　#include<stdio.h>
　　#include<dos.h>
　　#include<conio.h>
^~+J|],H`
　　void goto_xy(int x,int y);e&M-cF'S_
　　void dcls(int x1,int x2,int y1,int y2);@(lz8RD1t'm9C}*V(h
　　void bcls(int x1,int x2,int y1,int y2);tj7f8c$p2k~,`vjn
　　void kcls(int x1,int x2,int y1,int y2);.oVR+P"MV
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);
　　void puta(void);

　　/*--------------演示程序---------------------*/Q0`oB(q0_
　　main()2Jjs1hA%Ve;[
　　{9a#vO5T ~*d4Z.?P
　　puta();
　　getch();_sZ4u"z)]]
　　dcls(0,4,0,79);t2F0w]@ D!P~+|
　　getch();.F9e)f(^y'RG!}
　　puta();
　　getch();+z5wvn$I2zJ+C!S
　　bcls(0,25,0,79);
　　getch(); ]Zq|#^{8j/k+G w.M
　　puta();)t[^'cz.q xx
　　getch();mV!Mr:pw@\3PP_S
　　zcls(0,25,0,79);
　　getch();i/cc6N2F8po:f
　　} a$NfcD`?7Pu
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)
　　{ z1?upt,y'{%s
　　int x00,y00,x0,y0,i,d;
　　if((y2-y1)>(x2-x1)){U~|-vQjp~ g
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;2s3~/x&x$T5j-[ {m
　　y0=y1+d;i|sN2xD[6s
　　y00=y2-d; vlwx9|2XZS @Wz
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10); t&O G}/H8oYcc.fm
　　}
　　else{
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;`W0FRW,zT
　　x00=x2-d;
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);
　　}
　　}
ji+O,T*V[]Yc
　　/************* clear rectangle side（矩形边清屏）***********************/
2r$kYt,^,P&lPe
　　void recls(int x1,int x2,int y1,int y2)
　　{3y%\*g&GSe%x
　　int i,j;
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);Hrot4^Y7W(}3zU G:q
　　putchar(' ');
　　goto_xy(x2,i);^kA&Q%S|3J\5y'n
　　putchar(' ');
　　delay(10);
　　}A.dL5u/li~'T
　　for(j=x1;j<x2;j++){d0le(mgU
　　goto_xy(i,y1);cw DUn`
　　putchar(' ');
　　goto_xy(j,y2);
　　putchar(' ');-z)TN*Vy @:XUg
　　delay(10);
　　}
　　}"mn.a1x{3K5x!YU
　　/******************open screen clear（开屏式清屏）*********************/
2lLRaF"][Wf
　　void kcls(int x1,int x2,int y1,int y2)Hucs"s i
　　{7BWi/^Zj u8l;B
　　int t,s,i,j;
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);&_j-Q O$h9{
　　putchar(' ');k+[)iKo|*qA+n
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);?5l~3^r4f~F
　　},VSG:UJ;]E
　　} SAOKk^"R
　　/*****************close screen clear*****闭幕式清屏*******************/

　　void bcls(int x1,int x2,int y1,int y2)J$u*lMxD,N{
　　{
　　int t,s,j;
　　t=y1;
　　s=y2;j&~:i B-VpVA
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){[r4llAR}k%i/v
　　goto_xy(j,t);:Ga_a0U }RFG
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');!t~AVTh!A;w
　　delay(10);
　　}
　　}I0B:vd(At!k
　　/******************bottom screen clear（自下清屏）********************/(Lf&jm;l8E

　　void dcls(int x1,int x2,int y1,int y2)/nb4hm7i
　　{7zmaXxF'e Y]8D
　　int t,s,j,i;
　　t=s=(y1+y2)/2;M,Sl b-{
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){HW f;aLU+u7Y:T
　　goto_xy(j,i);
　　putchar(' ');
　　delay(10);Q\R6@5e5h
　　}
　　} c%H#UQ;Hp&_xq
　　/******************设置光标子函数******************/

　　void goto_xy(int x,int y)
　　{
　　union REGS r;a'l-iK"X%\]
　　r.h.ah=2;
　　r.h.dl=y;
　　r.h.dh=x;YhE/|#H"EL
　　r.h.bh=0;
　　int86(0x10,&r,&r);
　　}

　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/
6_H6o KrpI.@|
　　void puta(void)
　　{nT}"o'R\EY
　　int i,j;
　　for(i=0;i<24;i++){
　　for(j=0;j<79;j++){sT3t6Hi@
　　goto_xy(i,j);
　　printf("a");'Oc]nqa!b9Ul
　　}-s&Sk"CJGU
　　}&B^0|!t*hNb?Um
　　}

页: [1]

捌玖网络工作室's Archiver

C语言艺术清屏