C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,
, M; O5 S3 r' z, `  P4 i
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里) a& g) P( O) L) J; G

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:

　　#include<stdio.h>
　　#include<dos.h>
　　#include<conio.h>0 Z$ `8 D3 x8 e& `. E: ^5 v! @- H
  d" ^; {2 ~& _
　　void goto_xy(int x,int y);
　　void dcls(int x1,int x2,int y1,int y2);- l' f, Q3 K# d8 }
　　void bcls(int x1,int x2,int y1,int y2);
　　void kcls(int x1,int x2,int y1,int y2);1 g( q$ ~& e+ j. E! _
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);
　　void puta(void);3 c0 W. a7 `: W5 @

( m) q! Z9 Z; g. n& ]4 d! {
　　/*--------------演示程序---------------------*/
　　main()
　　{
　　puta();. {1 @; ~) [0 I2 T
　　getch();6 Y& M, u7 ?- x/ K2 m0 X9 o5 \
　　dcls(0,4,0,79);
　　getch();) R" d4 Q/ L, Z1 e. L8 K$ {
　　puta();' L- A: s* X7 ]0 X6 P+ o* ]
　　getch();
　　bcls(0,25,0,79);
　　getch();2 d  @+ O! Y9 w! T1 ^: N3 \$ o! p
　　puta();7 L6 J) ?% t8 W$ b, k, x
　　getch();
　　zcls(0,25,0,79);
　　getch();: b# k6 \& Z, z2 {6 s
　　}
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)( l6 ]" w) x: |9 n+ ]0 L$ ]. R
　　{  X5 d  C0 e, a( p3 a" d5 o' I3 y2 S
　　int x00,y00,x0,y0,i,d;! f2 J: a$ C4 A. c9 [4 _
　　if((y2-y1)>(x2-x1)){
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;5 Z8 l9 o) K5 A9 T2 j, J7 \
　　y0=y1+d;
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));/ }9 O) e  f( U" y# U8 c7 \8 @
　　delay(10);( g7 q  F/ Z# l$ Y! k$ }
　　}
　　else{
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;
　　x00=x2-d;2 U; X, |1 h0 C' a3 N  d
　　for(i=0;i<d+1;i++): H  d! K. T& c( [8 V  M3 e7 Z
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);
　　}# w  m7 \" {1 k
　　}
# X5 U  f* ~& b, A( `1 p; \% k* |
　　/************* clear rectangle side（矩形边清屏）***********************/

　　void recls(int x1,int x2,int y1,int y2)
　　{
　　int i,j;. E, f9 R! s+ L2 w3 b( H" Z1 H3 i% }
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);
　　putchar(' ');0 H$ \& n+ t: q8 L
　　goto_xy(x2,i);& Y' c# T. A$ Y0 w
　　putchar(' ');- r! z0 s. k" ]# Q9 M) P
　　delay(10);4 `% q, {: h$ p
　　}
　　for(j=x1;j<x2;j++){* ]' M0 J- r5 N/ _
　　goto_xy(i,y1);3 e8 a5 s7 W  S$ \
　　putchar(' ');
　　goto_xy(j,y2);/ |7 u2 f2 q, z( F" t9 O. t) X
　　putchar(' ');3 h- A3 {( ?: |8 l$ g9 W
　　delay(10);
　　}' h' R3 d/ j. P4 n/ t
　　}
　　/******************open screen clear（开屏式清屏）*********************/8 C  t: H/ x7 X3 N: U9 ?  J- q

　　void kcls(int x1,int x2,int y1,int y2)  H/ V& a9 O# b) V" |
　　{. K* f; I3 g$ Z0 [/ q
　　int t,s,i,j;
　　t=s=(y1+y2)/2;1 E, @( B% h0 v: i5 m
　　for(;t<=y2;t++,s--)+ y! l2 o% C, v( B5 _5 i
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');: S5 ]" h' W/ M# w6 n( j. `
　　delay(10);) k8 l9 m. \. }
　　}. X) `. h4 Z! B, M0 \+ h
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/0 v) o4 D; c' r0 E( N2 |1 P# q

　　void bcls(int x1,int x2,int y1,int y2)* w2 @# h$ b( |( u" ?0 L( _
　　{
　　int t,s,j;
　　t=y1;
　　s=y2;; b9 t/ E3 [4 _: I  e
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){# f; b) D' V$ Q6 R% N* v
　　goto_xy(j,t);
　　putchar(' ');8 z$ w; K5 H4 N+ A) _& d( L4 r0 |
　　goto_xy(j,s);
　　putchar(' ');. f$ Z% k& ~5 m5 [, m, `# A) X
　　delay(10);
　　}
　　}
　　/******************bottom screen clear（自下清屏）********************/  V4 W7 ^5 {% F6 B# o

　　void dcls(int x1,int x2,int y1,int y2)
　　{$ ?( a" g0 w2 n  ^+ T
　　int t,s,j,i;1 j+ W3 u* E$ U  z- @/ i8 I  A
　　t=s=(y1+y2)/2;5 |$ W$ y& P# V
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){. y' A- F4 ?7 \2 u  q1 Z3 Y1 K
　　goto_xy(j,i);
　　putchar(' ');8 \: M7 ]' B2 ^2 l" f2 e- C
　　delay(10);
　　}; o1 d, y  f$ R: Y
　　}) Z1 Z. S0 F( {; ?; _7 F  _5 f: K
　　/******************设置光标子函数******************/  Z! M$ C- e  \3 _* Z) F( {# l% |
0 G! a: p8 s6 T
　　void goto_xy(int x,int y)
　　{
　　union REGS r;( Q& L# B8 h+ W1 r
　　r.h.ah=2;
　　r.h.dl=y;
　　r.h.dh=x;% e, H! E& j7 g9 g/ g
　　r.h.bh=0;
　　int86(0x10,&r,&r);  i3 v8 M) W# R4 w! R  U# X+ r
　　}4 {$ o4 k; k2 @, P  ~) s
, _1 J6 }6 y. Z9 b
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/+ _; h$ l2 l+ x7 o& e/ c' ^0 W
% K$ M) ~" ]& S0 d6 i4 H8 E( |
　　void puta(void)
　　{1 V' q- U1 p6 O* h6 e6 M. t: O9 W' s
　　int i,j;! u/ h4 c5 {, [- w1 F$ p  {! V# R
　　for(i=0;i<24;i++){9 ~, E% \& W3 M6 K- W; M
　　for(j=0;j<79;j++){1 H* O" v7 b7 F5 g. X# W$ M
　　goto_xy(i,j);
　　printf("a");
　　}
　　}) Z" C, c& K6 U7 x6 J$ d7 E& {, C
　　}

返回列表

C语言艺术清屏

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

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