C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,

　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里
" j4 L+ s( |; B$ E  ^& a
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观. + `$ c. i4 ^# I* D2 c
　　子函数及演示程序:( Y: d( J1 A+ I& Y+ Y
8 w$ n8 ~$ _( z9 j; O- C- V, p
　　#include<stdio.h>
　　#include<dos.h>( Y' L7 b8 ]: r  q! G. a, C* B
　　#include<conio.h># v1 x4 J, g5 B. Z
& U! e. h7 f" q
　　void goto_xy(int x,int y);  R& B( h$ G  q
　　void dcls(int x1,int x2,int y1,int y2);
　　void bcls(int x1,int x2,int y1,int y2);6 b( S1 m* t% ]) _
　　void kcls(int x1,int x2,int y1,int y2);5 X( l: k, V- F1 B
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);
　　void puta(void);
1 u' U3 k  H# @! k; ]& j; @
6 E: g" t4 Q  [# A' N$ |  y
　　/*--------------演示程序---------------------*/
　　main()
　　{
　　puta();
　　getch();
　　dcls(0,4,0,79);( |% l3 ~5 q+ ~- q" J5 t# U
　　getch();: j3 p- o6 z& q% ~4 y: s
　　puta();
　　getch();
　　bcls(0,25,0,79);
　　getch();$ \+ ~$ H9 l! K# x* M
　　puta();7 K" y( C; r5 V3 x4 ^, y% j
　　getch();
　　zcls(0,25,0,79);7 ]  z  E/ [' [1 N
　　getch();
　　}
　　/*********center clear screen（中心清屏）***********/: p: o+ W5 \5 @) J1 c2 n
　　void zcls(int x1,int x2,int y1,int y2)
　　{
　　int x00,y00,x0,y0,i,d;" P  v# n: L+ }% p
　　if((y2-y1)>(x2-x1)){! c- p! f" a. `
　　d=(x2-x1)/2;+ N9 [6 D- e" g4 F$ f6 x
　　x0=(x1+x2)/2;1 C& ~# _! t7 W& x' m. t
　　y0=y1+d;
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));/ z. H3 w5 A1 Q. A9 Y' k
　　delay(10);' |2 D$ R0 c( E) `
　　}: d4 W( m' l: i. y9 L' w
　　else{
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;+ J. Y1 G2 R( T7 ]9 ]! W
　　x00=x2-d;$ q' v, I) k/ ^" ]
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);2 H! K. ~! f& ]5 v# V
　　}
　　}4 \, `( x) J  w" o" I) L

　　/************* clear rectangle side（矩形边清屏）***********************/

　　void recls(int x1,int x2,int y1,int y2)
　　{
　　int i,j;4 x3 y3 f6 @, _1 C& h8 d
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);
　　putchar(' ');
　　goto_xy(x2,i);0 \7 W7 e  l/ Y! M/ j5 B0 e; t
　　putchar(' ');; k" c' _5 I2 C" k, ~
　　delay(10);, V/ d7 w$ w1 S$ O5 k; \2 m
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);( Q) x* I3 i; V
　　putchar(' ');, D0 o5 ~+ w+ i: s
　　goto_xy(j,y2);
　　putchar(' ');1 J& N5 _, K* a+ S, [
　　delay(10);+ x7 z6 W# i; X2 n. K; x/ w8 U
　　}
　　}/ i4 G, R4 r# c/ O: H8 M* d
　　/******************open screen clear（开屏式清屏）*********************/
6 i2 j. z7 C$ W4 l+ t! n. _% Q
　　void kcls(int x1,int x2,int y1,int y2)% j9 V% ?8 a! ~! m6 @4 ^* W
　　{
　　int t,s,i,j;
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)4 Q) u) I# c4 j! W0 b
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);/ `% [) I; @; P
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}& H4 r/ _) D3 V
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/

　　void bcls(int x1,int x2,int y1,int y2)& B4 e) s) y, p
　　{; p$ l4 v/ {) V7 H
　　int t,s,j;
　　t=y1;
　　s=y2;+ c# F- _' O! d$ u, `
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){) u; x' s" y/ _) A
　　goto_xy(j,t);8 [8 ~( U' r) D2 E& _* G* U3 t7 ]
　　putchar(' ');
　　goto_xy(j,s);6 x' D& Q" \( L$ E
　　putchar(' ');& \& N9 y" N% l: E3 \
　　delay(10);% I0 x' f9 H  J9 N: m3 l" o
　　}
　　}
　　/******************bottom screen clear（自下清屏）********************/
1 e5 o3 f3 A8 v2 M% g' q$ s9 U8 I* {" w
　　void dcls(int x1,int x2,int y1,int y2)
　　{3 |2 P% f2 @) J/ ?1 J
　　int t,s,j,i;
　　t=s=(y1+y2)/2;, r1 U& J" X+ A7 C: e
　　for(j=x2;j>x1;j--)- N3 _# \1 }1 U! ~+ l. ?6 P3 }
　　for(i=y1;i<y2;i++){
　　goto_xy(j,i);
　　putchar(' ');
　　delay(10);
　　}; |8 r0 ?4 _$ O' V
　　}6 ?3 f* g' n* G! |7 q
　　/******************设置光标子函数******************/

　　void goto_xy(int x,int y)
　　{
　　union REGS r;
　　r.h.ah=2;
　　r.h.dl=y;
　　r.h.dh=x;
　　r.h.bh=0;
　　int86(0x10,&r,&r);
　　}
4 E2 {/ N1 @1 J- m* i
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/; m* w$ }: ~5 W

　　void puta(void)
　　{
　　int i,j;
　　for(i=0;i<24;i++){1 {, Z7 F! l# q$ X
　　for(j=0;j<79;j++){, _1 G! Z9 @2 L
　　goto_xy(i,j);+ ]; g; Y3 ?3 i4 |" G; v
　　printf("a");; o; \+ g. y# E; J# _8 V0 G
　　}) T: q- y) m. k! [
　　}# K. u* M5 _& F5 T4 o; J0 Q
　　}

返回列表

C语言艺术清屏

[收藏此主题] [关注此主题的新回复]

[通过 QQ、MSN 分享给朋友]