捌玖网络工作室 - Powered by Discuz! Board

标题: C语言艺术清屏 [打印本页]

作者: zw2004 时间: 2008-1-21 17:14 标题: C语言艺术清屏

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

　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里9 c2 t% R- E* _4 I; u8 Q# Z7 H3 p4 G

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:& q& \) M# B! ?; X2 ]& N! P. @
( K3 k7 q4 P( i/ s2 x! ^" x
　　#include<stdio.h>
　　#include<dos.h>1 J1 ~$ _: I/ ]
　　#include<conio.h>/ c6 b! f7 A6 n/ d" Y: d  C+ H
) I& ]& |" E. _0 A  e
　　void goto_xy(int x,int y);8 C8 j3 Q* h7 q' P. l/ K
　　void dcls(int x1,int x2,int y1,int y2);
　　void bcls(int x1,int x2,int y1,int y2);
　　void kcls(int x1,int x2,int y1,int y2);. M; z/ M& }. W) F
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);
　　void puta(void);

　　/*--------------演示程序---------------------*/$ [  G: U. _1 j1 s
　　main()
　　{
　　puta();  X0 a: r2 @2 Z/ m0 ?+ z; x6 b% Y
　　getch();3 q" D7 Q: l6 u$ Z
　　dcls(0,4,0,79);
　　getch();
　　puta();0 U1 q" W* u. {/ |9 M) a
　　getch();: t* w, v" X5 D3 z  y
　　bcls(0,25,0,79);
　　getch();
　　puta();3 F, s' l' z* e4 g& E
　　getch();
　　zcls(0,25,0,79);  q9 ~6 H5 O4 ]$ y4 R: \0 x& X
　　getch();( m. f4 }1 Q: S* X
　　}- J  l5 |7 P& N
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)
　　{' j: ]2 f1 L! M; u' l
　　int x00,y00,x0,y0,i,d;* F0 U9 e" [( a5 l
　　if((y2-y1)>(x2-x1)){
　　d=(x2-x1)/2;* N7 P! C+ Z- v* D/ t: X
　　x0=(x1+x2)/2;
　　y0=y1+d;+ ^9 e2 U+ u) D: M: {
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)8 S3 i1 y) l4 o/ X: `
　　recls((x0-i),(x00+i),(y0-i),(y00+i));" e6 i$ K, r+ G0 y1 m
　　delay(10);
　　}
　　else{3 k7 P% M& ?& w7 \4 R0 s2 T8 }. A
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;4 s7 l$ M/ P9 e) ?8 k* I2 z
　　x00=x2-d;
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);$ y5 y  m3 ?# S* i
　　}' h) X& O. p' x
　　}
( \, T/ G! W, M' O0 F: x
　　/************* clear rectangle side（矩形边清屏）***********************/( c9 Y' i# [, Y/ i. b
9 t. ~$ g/ _9 S, y: y+ ]/ p
　　void recls(int x1,int x2,int y1,int y2); d  I2 c* S( s6 E' H3 M
　　{" B9 }$ [* y! M/ V+ p% v2 N
　　int i,j;' e: J- {  F7 @  G6 h' ~5 I8 ^& R
　　for(i=y1;i<y2;i++){( D$ y. m* I+ S" R2 M- }3 \1 [! w  a
　　　　goto_xy(x1,i);
　　putchar(' ');; f, k7 \1 O4 S% z! @
　　goto_xy(x2,i);9 @6 [" S# s& f3 b1 T
　　putchar(' ');
　　delay(10);
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);
　　putchar(' ');0 J$ v5 F( ]7 Q8 K7 \0 G1 ]! _0 j
　　goto_xy(j,y2);
　　putchar(' ');
　　delay(10);
　　}* \. A; B$ ]% I8 M' }  b: k( `
　　}
　　/******************open screen clear（开屏式清屏）*********************/

　　void kcls(int x1,int x2,int y1,int y2)- Y/ T0 y; s- @+ I' G. `, E6 m  I
　　{
　　int t,s,i,j;
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)3 ^# I3 O! D" {& K8 X
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);, H$ i9 e" \+ G! D
　　putchar(' ');
　　goto_xy(j,s);! S, Q$ ]$ t& D. z" n* p) I
　　putchar(' ');1 M4 p/ h/ \. t% a
　　delay(10);
　　}9 W7 x" G. M9 |
　　}. t& r* E1 J/ y: H5 X$ c( g; W
　　/*****************close screen clear*****闭幕式清屏*******************/

　　void bcls(int x1,int x2,int y1,int y2)/ r/ L( o9 b- Q6 C/ K! f
　　{/ T5 k0 h; O% }# _( r  t
　　int t,s,j;& v  ?9 e* _6 y  H" _
　　t=y1;( A' p( i# w4 p  ?) I4 d/ T' n
　　s=y2;
　　for(t=y1;t<(y1+y2)/2;t++,s--)  \7 O# n& @/ \1 ^
　　for(j=x1;j<x2;j++){9 v/ ~5 W0 R) t1 e
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);4 k6 h+ F! f* v2 J' c. J
　　}) F, A, E' ^& K
　　}
　　/******************bottom screen clear（自下清屏）********************/! o# M. [" R* U& }! r$ a7 i7 `8 g
7 U+ t$ |% ?. n1 b" a' n1 x
　　void dcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,j,i;  {) E: d# x; s6 l
　　t=s=(y1+y2)/2;/ F$ F2 C  h8 _, C. e1 C& E
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){
　　goto_xy(j,i);
　　putchar(' ');( t5 \: H4 z+ O, U4 r/ j* `. z1 D
　　delay(10);. O  _' H" O# u/ K" A+ k
　　}9 r; i3 D  n( O
　　}
　　/******************设置光标子函数******************/; J7 d$ y9 x. @

　　void goto_xy(int x,int y)3 y6 R. G$ j0 L, e/ K  H- b) ^& F- d
　　{
　　union REGS r;( i" X% Z9 }- h, G6 s( O
　　r.h.ah=2;
　　r.h.dl=y;( [& x# |' }+ j) g8 ]
　　r.h.dh=x;
　　r.h.bh=0;# c1 \" n0 u0 @, w& d# `
　　int86(0x10,&r,&r);8 ^, E8 T  R) T
　　}
' v3 o* p! n0 A! C1 U0 U
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/
$ D& i# b4 K# A9 Q
　　void puta(void); u- u; Q9 B0 U$ I) n' M
　　{2 P: E3 @( g2 [7 q6 e# }) E
　　int i,j;
　　for(i=0;i<24;i++){6 r( ?. Z- y4 ?! P5 j* L) E/ ]
　　for(j=0;j<79;j++){- v1 Q$ f" e3 z6 d$ S
　　goto_xy(i,j);: g+ i; S, V/ w- l) l
　　printf("a");( Y5 `7 b5 S  v
　　}) @9 L3 Z+ m, W  C0 S+ v, Q
　　}
　　}

欢迎光临捌玖网络工作室 (http://www.89w.org/)