C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,
3 J- O5 ~3 c* h0 q
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里
: G1 w( t# y! `, i& E
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:

　　#include<stdio.h>
　　#include<dos.h>2 h! b3 @( q; u0 `0 M- n3 p3 u5 S. [
　　#include<conio.h>

　　void goto_xy(int x,int y);2 G# q) C% L) q
　　void dcls(int x1,int x2,int y1,int y2);& U8 |/ l" e; K1 ]: [" k
　　void bcls(int x1,int x2,int y1,int y2);
　　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);! o7 K3 ~2 E9 G$ X
　　void puta(void);! R9 N, F, d% J  c" L  ]6 S* I
, Z+ E+ u" Q3 d! \+ f5 |' u" {
# Y/ {5 ~% ~, u) K* N% R
　　/*--------------演示程序---------------------*/
　　main()
　　{
　　puta();
　　getch();
　　dcls(0,4,0,79);
　　getch();
　　puta();
　　getch();4 ?( ~7 A1 K4 N; v! v; d4 `
　　bcls(0,25,0,79);
　　getch();
　　puta();5 e; s& f  A  j; o. W
　　getch();
　　zcls(0,25,0,79);3 K! l% g3 K/ v8 ?; p* M1 x$ X7 o0 Q) l
　　getch();- z: l2 O8 I' H
　　}
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)
　　{
　　int x00,y00,x0,y0,i,d;8 f. T) C4 K* F3 g/ O1 B. d% z/ G
　　if((y2-y1)>(x2-x1)){9 ~- g  V/ ?+ o8 v8 N9 f
　　d=(x2-x1)/2;8 d  H, o! W; y6 N/ U. w
　　x0=(x1+x2)/2;
　　y0=y1+d;. w8 t( j/ @8 ~# c) w6 M2 a# h6 x
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);8 v8 ^& O& w8 V. f* d
　　}
　　else{6 {/ ]0 c1 k5 y( Z( x) {
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;2 p2 g5 p. y( u+ \
　　x0=x1+d;
　　x00=x2-d;% g  a' c5 }: F0 a8 d1 e) S2 {
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);" N2 L$ c8 u: g( S( C6 k
　　delay(10);% \& R& I. l3 }. P1 ?
　　}
　　}8 w1 e; [8 S2 k2 q$ g* m. c5 K

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

　　void recls(int x1,int x2,int y1,int y2)/ Q0 k- h! U* D. {# j
　　{
　　int i,j;
　　for(i=y1;i<y2;i++){  H9 t4 n/ M0 w2 S- }- \; |! P
　　　　goto_xy(x1,i);
　　putchar(' ');& Q" k- J& r7 w: P2 A: N7 O' |
　　goto_xy(x2,i);
　　putchar(' ');
　　delay(10);" I" P, ~7 Z+ j" i3 W6 t% o2 T
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);! q8 ]2 Z" V  N/ J$ E2 n
　　putchar(' ');
　　goto_xy(j,y2);
　　putchar(' ');$ y/ Z8 h5 d+ z% K* ~+ q$ T
　　delay(10);" z. `  I; K' j9 w: o
　　}
　　}
　　/******************open screen clear（开屏式清屏）*********************/. H8 N3 F2 a0 D1 O. S

　　void kcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,i,j;3 Q0 R: _  l2 q6 ]  ~3 |
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)2 @* I0 L# Q5 K( D, y
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);
　　putchar(' ');7 g; U" k( U% c
　　goto_xy(j,s);& B2 E6 y# _+ u* b; c
　　putchar(' ');
　　delay(10);
　　}
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/
" M8 E, I8 S7 ]/ X+ L. A, O
　　void bcls(int x1,int x2,int y1,int y2)1 r* W) |2 Q' Q9 p% Y9 ~* ?
　　{0 w. P8 S5 E! s9 w+ ~# ^
　　int t,s,j;% R% W4 {, B' m: t; l0 M& |: u: S8 [
　　t=y1;
　　s=y2;
　　for(t=y1;t<(y1+y2)/2;t++,s--)' Z# u3 N4 U; T( n  c
　　for(j=x1;j<x2;j++){) p$ W; c( O4 `/ J% v1 f# @" R# t8 l
　　goto_xy(j,t);5 m9 ^' p- E) I9 a
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');0 K: P+ a( w, \' U' b4 t
　　delay(10);
　　}
　　}# c* _, H9 {' G# R0 i6 s
　　/******************bottom screen clear（自下清屏）********************/

　　void dcls(int x1,int x2,int y1,int y2)/ e. i& f( L1 M! r7 ]  b9 R
　　{) V. a( e" O; ]4 D5 A/ ^2 w9 M3 `- p
　　int t,s,j,i;
　　t=s=(y1+y2)/2;3 T$ g  Q% k6 t2 @
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){
　　goto_xy(j,i);
　　putchar(' ');
　　delay(10);
　　}
　　}
　　/******************设置光标子函数******************/
$ z2 W" v7 w1 N% ]$ ]. X3 b8 f9 g- C( l
　　void goto_xy(int x,int y)- Q+ N4 V7 c$ j8 B' H6 t# K) H
　　{
　　union REGS r;
　　r.h.ah=2;+ Z2 P2 t( f/ _8 s
　　r.h.dl=y;. a- J! N* F2 q( l* k7 P, i( Z
　　r.h.dh=x;# ]9 r5 A' a$ ]. L5 c% j5 `+ N( K
　　r.h.bh=0;/ ?/ z0 j4 s/ ]  D
　　int86(0x10,&r,&r);' Y4 F1 X# h" N  `$ Y8 D7 y( X  l
　　}
7 U; D# X5 }% T- Q
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/3 a9 `0 b/ ^' t$ H7 N

　　void puta(void)! I9 O4 c2 ^$ {3 f) O3 r: W. a
　　{/ C- ^+ v1 D% `8 K, O
　　int i,j;
　　for(i=0;i<24;i++){* ]1 A/ a7 B9 \2 i$ p! ?3 _8 P
　　for(j=0;j<79;j++){
　　goto_xy(i,j);' Q+ d" b; n6 f  A. n+ S' V: }' L
　　printf("a");
　　}
　　}' L9 v1 \) `/ O6 t
　　}

返回列表

C语言艺术清屏

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

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