C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,: U2 m3 J0 h+ z$ w
7 s4 l9 g6 A& [5 k
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观. : W& y6 }" x4 L/ Y3 U  M# e7 t
　　子函数及演示程序:
) _2 l8 c7 S, v) h
　　#include<stdio.h>
　　#include<dos.h>1 Q/ @+ ~# w/ U8 D% P
　　#include<conio.h>

　　void goto_xy(int x,int y);. U9 X$ ^, m8 `# S
　　void dcls(int x1,int x2,int y1,int y2);, T/ H$ i! x% S- U" c
　　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);
　　void puta(void);

　　/*--------------演示程序---------------------*/
　　main(); D. J) J( W/ c. K
　　{/ n1 O# T& B2 |5 }8 e
　　puta();1 A* i8 k7 K, [9 e0 T7 n
　　getch();
　　dcls(0,4,0,79);6 G  `, u8 Q- q& S' w
　　getch();/ ^8 q6 s  w# I. T( }* u* l% \
　　puta();0 @4 g$ W3 a2 G/ y3 o
　　getch();
　　bcls(0,25,0,79);. I' r8 j1 s, T" V
　　getch();
　　puta();
　　getch();
　　zcls(0,25,0,79);
　　getch();
　　}1 u) D! Z/ Z) w  K
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2)
　　{
　　int x00,y00,x0,y0,i,d;
　　if((y2-y1)>(x2-x1)){# @& w8 W& P( z5 _- k
　　d=(x2-x1)/2;1 w# u7 c9 {) ]$ [8 y2 F& n
　　x0=(x1+x2)/2;0 h; |1 U' S1 ^: t  P
　　y0=y1+d;
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)1 }$ z+ f8 P% U  P1 V" h8 g
　　recls((x0-i),(x00+i),(y0-i),(y00+i));* y. a! N8 h: Y& N
　　delay(10);
　　}
　　else{$ S3 C, K$ b9 E/ }1 d/ D
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;
　　x00=x2-d;9 _# _+ Z5 b: Q/ M5 F; P
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);
　　}
　　}* e$ F  h" f4 I' E  a

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

　　void recls(int x1,int x2,int y1,int y2)  f3 [% K& n! x: S, [- ^
　　{' K6 P8 O" l! H, z
　　int i,j;
　　for(i=y1;i<y2;i++){8 o5 p: C' Q! Y- }( A& S! B
　　　　goto_xy(x1,i);
　　putchar(' ');. L+ _6 K8 x7 N4 B1 M
　　goto_xy(x2,i);
　　putchar(' ');
　　delay(10);5 L; |" u' {7 V3 j- f* ]- r
　　}
　　for(j=x1;j<x2;j++){3 j+ a$ h$ X9 `" {
　　goto_xy(i,y1);
　　putchar(' ');* r, I, l  b7 ]' c. W6 H
　　goto_xy(j,y2);
　　putchar(' ');# n' ]$ G, W: ]6 Y
　　delay(10);
　　}
　　}
　　/******************open screen clear（开屏式清屏）*********************/% d8 J  D; |0 ?
) V% c# }; C4 G$ y8 p- E5 o! d
　　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++){; L# z) Y, p, Z) |2 E
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');1 o+ b0 W0 x$ ^$ q: V- {& g
　　delay(10);
　　}; h4 Q* k- l9 @+ `# z* E$ p
　　}5 E; F1 r# z8 V2 }9 {
　　/*****************close screen clear*****闭幕式清屏*******************/* [) J5 G# F9 P; ]4 [
, _/ O2 A5 p- G% Z" p
　　void bcls(int x1,int x2,int y1,int y2); v$ d* b& Q* I& k5 X) a" u
　　{
　　int t,s,j;
　　t=y1;
　　s=y2;2 r' A) I  m9 X
　　for(t=y1;t<(y1+y2)/2;t++,s--)$ W% F* j( K9 g2 j
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');$ z* o, s9 H5 h6 g! V
　　delay(10);
　　}4 ~8 c0 O& [3 n8 C3 O! V
　　}8 d8 C2 n* g7 @  R/ g
　　/******************bottom screen clear（自下清屏）********************/
2 J: W) g$ m, [, c7 ?# y  P1 @
　　void dcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,j,i;
　　t=s=(y1+y2)/2;$ R6 y* z+ M& R8 t8 S( j
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){$ p0 q: g# i# L8 A5 m
　　goto_xy(j,i);3 Z& a- Z( K; }
　　putchar(' ');# c8 J# w8 e6 }( i  P
　　delay(10);6 G% a* x1 Q) l6 z3 w
　　}
　　}
　　/******************设置光标子函数******************/* n9 M" \. g6 b: w0 U

　　void goto_xy(int x,int y)3 S. @! Z% t( X3 o2 M9 O
　　{. m, x! f2 C8 ~! F
　　union REGS r;/ l7 L" T; @# C0 Z+ w; l
　　r.h.ah=2;8 f9 b, E# Q/ k$ s4 y  g
　　r.h.dl=y;
　　r.h.dh=x;9 [1 V! P: a0 ~; c
　　r.h.bh=0;
　　int86(0x10,&r,&r);& U2 H  r" y% n+ |1 |" _( V3 [& G9 `
　　}. E2 K4 d0 H" g6 C! X9 W3 P
/ {( y- s/ M. c5 e: x& f. ~3 Q. G
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/
0 Q; Y( V# z% L1 s
　　void puta(void)- w+ T' n$ o1 ?  ~# c2 Y$ Y
　　{' I$ D2 c( j, U
　　int i,j;
　　for(i=0;i<24;i++){
　　for(j=0;j<79;j++){
　　goto_xy(i,j);) M# [- C/ h+ a( M( L, M4 U" h- s/ ~- [
　　printf("a");
　　}9 |! o8 B- N% N& L
　　}) X) K, b4 v7 J
　　}

返回列表

C语言艺术清屏

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

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