C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏," M  F$ M. [* m* B1 E
4 [$ V) E" u3 g9 ^% L* k
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里' U. s1 t/ G* d/ t2 j

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观. / S' x8 M4 W8 V: H3 D1 Z$ K- P' X
　　子函数及演示程序:# u$ {. ^& u/ F- z) L/ i$ g& c* H

　　#include<stdio.h>
　　#include<dos.h>
　　#include<conio.h>6 c4 }; N9 }2 H9 u2 q2 L
) z% a; M" n$ w; c" D
　　void goto_xy(int x,int y);4 @+ a! H/ j7 h' B5 m" Z2 ?1 Q0 k. p. h
　　void dcls(int x1,int x2,int y1,int y2);. |" g& N  x, F* y3 H
　　void bcls(int x1,int x2,int y1,int y2);9 B" C$ z. T  I( {0 B' U( ]' ^$ f
　　void kcls(int x1,int x2,int y1,int y2);
　　void recls(int x1,int x2,int y1,int y2);: K3 T# e. T. E0 N& n! @; M
　　void zcls(int x1,int x2,int y1,int y2);- T9 }9 J$ y9 I/ r) R# |
　　void puta(void);
1 s" i* U/ u- f- z/ ^$ _2 F

　　/*--------------演示程序---------------------*/
　　main()
　　{
　　puta();+ A6 m, P6 o/ i9 g) G1 d
　　getch();
　　dcls(0,4,0,79);: s( M! }" ^' J. u* u
　　getch();! n0 W3 K  y* {. y3 g3 ~  T7 Z
　　puta();$ d+ e- ?' K( T* I9 W2 I
　　getch();% L0 ^" L6 _2 Q& B
　　bcls(0,25,0,79);
　　getch();
　　puta();5 O+ T6 |  l* S$ z8 C/ |9 R
　　getch();
　　zcls(0,25,0,79);5 B: q' m2 \! L' ^) q3 u/ Z/ R2 z
　　getch();* S0 X. G" u' `- K+ F
　　}
　　/*********center clear screen（中心清屏）***********/* r; y) B; D6 D' j9 ]* V
　　void zcls(int x1,int x2,int y1,int y2)
　　{, e' v& I8 C; |  ?
　　int x00,y00,x0,y0,i,d;
　　if((y2-y1)>(x2-x1)){0 B1 y: j8 Z) }; h
　　d=(x2-x1)/2;  N/ Q1 H! {$ e' R
　　x0=(x1+x2)/2;5 |/ i2 C/ {: C1 {. N8 p/ p# ?
　　y0=y1+d;% Y9 B5 o. i; c& b  }
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)" u( h) L- H% e- A8 n
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);/ S7 n& W/ P) `/ A: P6 s% c" _
　　}' O5 |! E9 y8 P
　　else{
　　d=(y2-y1)/2;. Q1 {$ Y! w) O8 ^
　　y0=(y1+y2)/2;
　　x0=x1+d;+ R# p3 q: U, Y3 V
　　x00=x2-d;
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);7 w& w1 ?1 i5 J4 _
　　}# {6 a3 [: Z, r! I
　　}

　　/************* clear rectangle side（矩形边清屏）***********************/
) m8 d2 D6 R% n5 I% Z% ~
　　void recls(int x1,int x2,int y1,int y2)
　　{6 n: E) J3 e8 J# T
　　int i,j;1 H& g8 i- w+ Z& C1 b; g
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);; o' B! I4 E5 ?( ^
　　putchar(' ');
　　goto_xy(x2,i);
　　putchar(' ');
　　delay(10);
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);
　　putchar(' ');
　　goto_xy(j,y2);( b2 N1 `$ K1 u' B+ c, F% a
　　putchar(' ');
　　delay(10);7 [: E; K. f0 h0 V
　　}9 u6 k( W& i8 S- P% V% @
　　}
　　/******************open screen clear（开屏式清屏）*********************/! I1 n# Z& @8 ^" T8 o+ f+ h& ]" Z$ q
! v2 d0 ?" v, k) _# a1 c, V
　　void kcls(int x1,int x2,int y1,int y2)
　　{
　　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);: ]3 n% K/ c( p( I* U# t, w+ n
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}! N0 n) ]* [5 d  L& N* W" A
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/1 D2 w* c; @% N8 ~

　　void bcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,j;' U9 o  W7 C" b" u& F
　　t=y1;
　　s=y2;
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){" W9 L% A9 _! u& x
　　goto_xy(j,t);( s  V' c+ A7 S( S6 f1 x) ~7 P, D
　　putchar(' ');' h2 H% k' o5 n) a- c" ]
　　goto_xy(j,s);; o7 _9 D0 S, v" Y
　　putchar(' ');5 ~6 M, {. u; E. [, l
　　delay(10);
　　}3 J( u& J0 s9 l5 A7 R4 T
　　}
　　/******************bottom screen clear（自下清屏）********************/
7 `5 r% e5 ]6 _1 ]5 l: w6 A$ U
　　void dcls(int x1,int x2,int y1,int y2)
　　{; l' l. Y1 d& P- o( H: C
　　int t,s,j,i;$ k& {$ e( {3 T2 ~6 H+ r
　　t=s=(y1+y2)/2;
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){; i3 W5 }8 j! b4 Q6 h; X
　　goto_xy(j,i);7 n6 A, p+ C8 b" r6 J
　　putchar(' ');
　　delay(10);
　　}
　　}
　　/******************设置光标子函数******************/
0 V: z4 c+ [& M* w$ m( h7 w
　　void goto_xy(int x,int y), N; t! s" z" j3 @( \
　　{) o% b7 l& i6 t$ m
　　union REGS r;, A* L7 C; u/ W; [' R
　　r.h.ah=2;
　　r.h.dl=y;
　　r.h.dh=x;
　　r.h.bh=0;! ~! V9 P* P# ?) ~- M8 g( C" y2 K
　　int86(0x10,&r,&r);
　　}/ T1 u; Z- X7 l

　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/
* P0 W8 {' d4 N% [+ Q3 t* N! ?
　　void puta(void)6 r( r/ k/ z$ h
　　{% t8 t- N$ N2 n& r" d0 z' y3 A& a
　　int i,j;
　　for(i=0;i<24;i++){& n: L/ _+ L% @. p$ D* E% G
　　for(j=0;j<79;j++){7 f' ?- P6 T1 v& f' K3 h
　　goto_xy(i,j);$ n3 [$ `5 N- ], P4 `, h
　　printf("a");
　　}
　　}% ~. t, i% d( b3 b
　　}

返回列表

C语言艺术清屏

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

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