C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,1 D. w, u# ?5 y4 F
% c' j% L" D0 ]4 M  Z6 I
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里
# m* A- u; h9 X: G2 J
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观. 3 K! c; f; t5 L# N3 Q. v
　　子函数及演示程序:
8 |; F, r, c7 [' G( z. m; v
　　#include<stdio.h>6 a( Q8 D- P( Y" M# ]
　　#include<dos.h>
　　#include<conio.h>3 Y3 g2 s' Q7 p) [0 E/ K

　　void goto_xy(int x,int y);9 n$ T" m# O4 p0 D
　　void dcls(int x1,int x2,int y1,int y2);9 E3 l& j5 E$ u% h: ^! h9 p2 F5 W
　　void bcls(int x1,int x2,int y1,int y2);; E7 l# b9 l/ [8 z0 O# q! s+ L
　　void kcls(int x1,int x2,int y1,int y2);
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);, h- u6 C' |; b' K
　　void puta(void);9 x1 P. e8 S, A, f" z

　　/*--------------演示程序---------------------*/: ^$ R8 A* d  _* O" _- ~
　　main()
　　{
　　puta();2 j2 K+ |# R+ ]2 Q
　　getch();
　　dcls(0,4,0,79);
　　getch();! E& ]+ n' b: j- \5 l1 B$ L
　　puta();
　　getch();
　　bcls(0,25,0,79);
　　getch();
　　puta();
　　getch();1 S# y6 t9 k$ B9 X
　　zcls(0,25,0,79);/ d% e- d4 j6 d5 J/ w
　　getch();
　　}! F6 q9 E3 u) u5 n  v2 B
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)
　　{
　　int x00,y00,x0,y0,i,d;# H' _2 @. z5 y* l* w7 H
　　if((y2-y1)>(x2-x1)){
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;
　　y0=y1+d;
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)% a4 U0 g4 {. V( U
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);
　　}; \& r- a& w8 T" N
　　else{
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;1 R7 Q: h, J" f& l% G2 W5 n
　　x00=x2-d;$ I9 v/ N3 p: m5 H7 M6 `* `
　　for(i=0;i<d+1;i++): V0 |; ^8 H7 Y6 Y
　　recls(x0-i,x00+i,y0-i,y00+i);1 ^! x4 {1 ?+ ?% \, W* o9 U& l
　　delay(10);# c, x- j4 `: h( K
　　}  d7 n% D/ y9 b# s4 x8 F" X& K* H
　　}
8 m1 `# ]' D2 W4 t5 D& P& S
　　/************* clear rectangle side（矩形边清屏）***********************/5 L" Y- @: L" |1 F3 p4 G/ S
9 D* `+ x& Y$ K+ p
　　void recls(int x1,int x2,int y1,int y2)1 f* R0 `. {' g1 i
　　{
　　int i,j;
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);- N8 C3 F) L3 o$ p. _
　　putchar(' ');# `6 o) O/ {- q+ t" F) w
　　goto_xy(x2,i);
　　putchar(' ');
　　delay(10);
　　}" t" E0 A, b' N3 _
　　for(j=x1;j<x2;j++){: T$ }1 U! f2 x7 s. F* ?
　　goto_xy(i,y1);
　　putchar(' ');4 i2 C$ n5 t( }
　　goto_xy(j,y2);
　　putchar(' ');
　　delay(10);; x1 b3 f* C! t! H  q! p% H; k7 Z3 F' K
　　}5 L* {  P) k) Q
　　}
　　/******************open screen clear（开屏式清屏）*********************/- y6 S+ g& l7 L( S" ^
7 ]( J) O* y/ T
　　void kcls(int x1,int x2,int y1,int y2)
　　{  I. r; @' |$ K+ n3 q
　　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);' s: I4 [2 j% a" o$ Q
　　putchar(' ');3 p, Q4 e: P3 R" l0 `! x
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}. L2 ]0 }8 b5 Q, X! z
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/# V6 G! Z: `& F& i. [

　　void bcls(int x1,int x2,int y1,int y2)
　　{* H/ x* }4 R$ s7 s7 s
　　int t,s,j;  b  ~4 m) L& T' ]: d
　　t=y1;( ~" r' x% k' l: t0 i6 G
　　s=y2;
　　for(t=y1;t<(y1+y2)/2;t++,s--)  Q. [# S, d6 G
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);! m, o7 z4 U: V) h/ T5 d. U
　　putchar(' ');6 @* g. b) L0 C. M% w: @
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}# O+ u8 \9 d: [' g- U4 s
　　}
　　/******************bottom screen clear（自下清屏）********************/

　　void dcls(int x1,int x2,int y1,int y2)
　　{7 x2 `6 y" j. B( d* }, @/ }7 F
　　int t,s,j,i;
　　t=s=(y1+y2)/2;
　　for(j=x2;j>x1;j--)4 H& H/ Y- R# o' g& I
　　for(i=y1;i<y2;i++){# \; L- w1 q5 L; j
　　goto_xy(j,i);
　　putchar(' ');) V3 S# g; b- [# K$ F9 n" n
　　delay(10);2 f* Q& ^3 u5 r5 a% X
　　}
　　}
　　/******************设置光标子函数******************/

　　void goto_xy(int x,int y)  T! P* y9 N1 [% s$ a
　　{
　　union REGS r;
　　r.h.ah=2;* k% ]( E. ?2 ]$ ^( X, t
　　r.h.dl=y;$ `* m" ~" S4 I- B) c% P, R- L
　　r.h.dh=x;  [  e) V' w& G" e9 F) {
　　r.h.bh=0;
　　int86(0x10,&r,&r);
　　}
" |2 M$ p+ `0 U* F' P* N/ a/ t
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/

　　void puta(void)
　　{
　　int i,j;
　　for(i=0;i<24;i++){( A0 ]7 F! e, s: x& K' P
　　for(j=0;j<79;j++){
　　goto_xy(i,j);  A/ g7 [5 I+ B0 ~& ?  q
　　printf("a");4 p6 C' R3 a) \. J- b: I1 t
　　}0 V- \* n1 Y5 Q; T! ]3 Z
　　}2 t( m; W; W# ^+ ?' h: _& q
　　}

返回列表

C语言艺术清屏

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

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