C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,
$ S4 d. x' _7 `- g- k4 K6 A5 ~
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里' ~( [( v5 N) }0 T$ D/ I
0 s. q5 T! ?" c1 ~
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:
& z& l8 [( `! X; d! _
　　#include<stdio.h>8 o: ?% O, D# ?* C
　　#include<dos.h>
　　#include<conio.h>

　　void goto_xy(int x,int y);5 W" h9 j/ Y9 l, c8 L5 x, z$ n
　　void dcls(int x1,int x2,int y1,int y2);( ~7 l/ @0 w9 J% a+ r) i
　　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);- }" H) h! g4 Y$ p6 Z* z
　　void zcls(int x1,int x2,int y1,int y2);* y* W5 |7 [; H  H" ?
　　void puta(void);4 f) \! T: W; ^2 u1 I; _- r4 p
1 f5 I$ [% F  _4 g6 s

　　/*--------------演示程序---------------------*/9 l' N# J5 O# v8 L/ `
　　main()
　　{
　　puta();
　　getch();
　　dcls(0,4,0,79);. Y/ R! q: }; ]% Q) [" T2 c
　　getch();9 ^' J' B' G+ y, @2 y6 `; ~6 Y
　　puta();% O* ?; w" N# N, ?( y+ f: V
　　getch();
　　bcls(0,25,0,79);
　　getch();% v. c: i, [+ E, K
　　puta();6 p; d, p$ ~- }$ S/ G
　　getch();
　　zcls(0,25,0,79);
　　getch();) `: F4 S* E) E: ^- b' Y# d
　　}7 p3 z) ^4 ]7 o  [8 ?4 ]
　　/*********center clear screen（中心清屏）***********/' o: N; @- k: P6 T9 U$ N+ N
　　void zcls(int x1,int x2,int y1,int y2). y; p  M0 U, L7 S4 v
　　{$ V( C$ G* [# H6 E0 s
　　int x00,y00,x0,y0,i,d;( X& e2 R1 i7 \( S
　　if((y2-y1)>(x2-x1)){$ f! A2 @3 q" i$ y! n
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;
　　y0=y1+d;' {) ~8 ^2 @8 ?( \' s5 _/ j& c
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));. t4 `: m' n7 @
　　delay(10);- W7 S4 a( ^* O
　　}
　　else{
　　d=(y2-y1)/2;8 G$ O; R* [* C! ~' N9 }- Y  S
　　y0=(y1+y2)/2;- M( H( K* H2 w8 Y1 U, @, E
　　x0=x1+d;
　　x00=x2-d;
　　for(i=0;i<d+1;i++)# L; N( v6 w. ~% x5 N! P
　　recls(x0-i,x00+i,y0-i,y00+i);" ]8 x" |4 N& N+ |9 h
　　delay(10);
　　}  Q0 R9 d  F7 r! {% g" O  J
　　}

　　/************* clear rectangle side（矩形边清屏）***********************/) O" G& e9 e5 H2 o

　　void recls(int x1,int x2,int y1,int y2), ~2 B7 O+ E; Z) ~
　　{  G) ]0 N% b3 z) O
　　int i,j;
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);
　　putchar(' ');
　　goto_xy(x2,i);
　　putchar(' ');5 e2 P2 h$ ?1 X+ p! ~9 @0 @
　　delay(10);
　　}
　　for(j=x1;j<x2;j++){# M/ d+ Q- ~' o' h3 o" s
　　goto_xy(i,y1);6 d% Y- u( B5 i" ?; w$ {
　　putchar(' ');
　　goto_xy(j,y2);2 J5 r4 b) Y4 O0 u! P' H7 j/ ~* v
　　putchar(' ');
　　delay(10);
　　}7 h# h: j" X1 v4 B: Q( ]
　　}" g4 W' n/ M6 ~) T  `5 y3 K
　　/******************open screen clear（开屏式清屏）*********************/8 C7 s# T9 K2 ?3 ~

　　void kcls(int x1,int x2,int y1,int y2)2 J- k! Z; `. k8 i) l0 p( ~
　　{6 n0 O6 N+ x; _% l1 g! j  q; l: P
　　int t,s,i,j;% M. I+ m, }- V
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)
　　for(j=x1;j<x2;j++){& U$ l3 S; w3 O6 i
　　goto_xy(j,t);
　　putchar(' ');0 `; K* w7 Z, g9 l- Y- {
　　goto_xy(j,s);3 {: ~0 O) B3 W' Y* |
　　putchar(' ');
　　delay(10);. q; _6 [! P( a( Z8 A% b
　　}1 F& S0 ]8 I* _& C
　　}
　　/*****************close screen clear*****闭幕式清屏*******************/4 b6 f1 J5 S8 D' ^" [0 K$ u' O8 d6 x
( n) |: I7 `& h9 t
　　void bcls(int x1,int x2,int y1,int y2)& g' Z5 [8 m; R' j# Q. ?. x5 n
　　{
　　int t,s,j;( X3 T4 i1 f% R; Y, H) q8 d
　　t=y1;+ w/ l7 n% L% g- h. x2 J1 t
　　s=y2;$ [6 P# J# W' X2 ^- `2 Y
　　for(t=y1;t<(y1+y2)/2;t++,s--)2 Q! c; F6 S8 l' g4 g4 u
　　for(j=x1;j<x2;j++){0 z( p' R: ?& u. r, K' W8 ]( h, ~7 g
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');, H: Q& |! Q! S! y- l
　　delay(10);* W9 w, S9 g3 B
　　}
　　}+ s" S! P5 D7 J# R4 n7 v. l
　　/******************bottom screen clear（自下清屏）********************/5 b+ d% c+ w4 a6 d  m2 c% j

　　void dcls(int x1,int x2,int y1,int y2)
　　{: m5 x7 t' _* V3 \5 ?. ?4 b! H8 L
　　int t,s,j,i;
　　t=s=(y1+y2)/2;
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){; ~% w( [" _3 a
　　goto_xy(j,i);: u  H  a& f4 F( i# n5 G+ F
　　putchar(' ');  a  {: \( m! A# f5 Q+ }" p" F
　　delay(10);
　　}
　　}
　　/******************设置光标子函数******************/7 E) s$ p  @: m
- c- d2 e. K4 V5 m
　　void goto_xy(int x,int y)
　　{
　　union REGS r;( v; A% _& f+ {$ f; Y1 ?, X7 J
　　r.h.ah=2;/ l/ D+ I/ p6 ]+ c" F6 D8 C% L0 T
　　r.h.dl=y;
　　r.h.dh=x;
　　r.h.bh=0;% U8 R7 F$ g+ |- ]
　　int86(0x10,&r,&r);
　　}9 N0 K: x3 N; i7 d0 Q3 O" O1 t: j

　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/; T0 K! p1 g9 r( a0 T
: \7 b# z9 H7 x9 ?- E; \7 Z% e/ }+ i
　　void puta(void)+ l: j) Z; x0 e, O; Z- Q3 X
　　{" ^9 p; w& }, U' h+ Y+ [7 Q
　　int i,j;# T1 G% S. Q) x% @1 E
　　for(i=0;i<24;i++){) ]5 q0 l8 o* T, E) D% v6 o" s# Z  k
　　for(j=0;j<79;j++){$ f: e' V8 S8 g8 @0 F
　　goto_xy(i,j);. L( x3 {* h; z
　　printf("a");8 U0 Y4 Y* Y6 e  A) o
　　}# C. n0 ?' F* V& t8 t# w2 _1 ?/ f
　　}
　　}

返回列表

C语言艺术清屏

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

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