C语言艺术清屏

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

　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里" M, U* }1 i7 @% X( L7 v
5 Z+ V$ G, u" M" \: [( m
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:

　　#include<stdio.h>
　　#include<dos.h>
　　#include<conio.h>
. v+ T! |* S  Y' \/ R, p/ F/ j0 h
　　void goto_xy(int x,int y);
　　void dcls(int x1,int x2,int y1,int y2);
　　void bcls(int x1,int x2,int y1,int y2);- ]% |( M: }8 P2 F+ l5 [
　　void kcls(int x1,int x2,int y1,int y2);; y+ ]4 a8 C) S- q5 f
　　void recls(int x1,int x2,int y1,int y2);
　　void zcls(int x1,int x2,int y1,int y2);8 C1 u. g3 y. T& D* I3 ?
　　void puta(void);

　　/*--------------演示程序---------------------*/5 b+ P) H' ^3 S7 O' j# j
　　main(): t. G4 u) R, {) P0 C$ e, {
　　{
　　puta();
　　getch();0 g2 J9 p+ k; Y- m, e, L$ P
　　dcls(0,4,0,79);3 p& U5 V" N2 d2 ?) W! v
　　getch();  {& t: r( N- k; z8 G' w
　　puta();
　　getch();
　　bcls(0,25,0,79);1 O  ^% s5 c6 l
　　getch();5 w2 c8 |6 U' ?4 T, x5 z
　　puta();' l( }/ H3 t- K+ X7 O; K
　　getch();  M: b6 L& A& f0 e* y: d( _& y0 Y
　　zcls(0,25,0,79);
　　getch();
　　}
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2). z' K2 H5 a- x2 ^
　　{
　　int x00,y00,x0,y0,i,d;# ^) h: U% k+ K% n7 k# I
　　if((y2-y1)>(x2-x1)){+ r& d. H# c, C% q
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;/ x" X( l3 X, g' V
　　y0=y1+d;( p7 f! {4 Z0 S! l: \3 p2 t- L
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)7 P: h! a" I6 R5 w
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);
　　}
　　else{
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;) W# Y7 d$ ~0 g5 z1 z6 L% X% T4 A
　　x0=x1+d;
　　x00=x2-d;% {# _6 E* s4 }+ S
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);  K6 T$ E! w+ H3 S! j1 M1 Z
　　}
　　}, L/ H& @) j6 y
% S! Z6 A5 ]: @2 r$ }
　　/************* clear rectangle side（矩形边清屏）***********************/

　　void recls(int x1,int x2,int y1,int y2)
　　{4 L' |( o: w: {
　　int i,j;. O  N( b, i$ e  ]- Z- @6 Q7 H" ]6 F+ n
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);0 `- p9 A! t/ P2 d* z7 l4 c
　　putchar(' ');/ X* U3 R% X8 z/ O/ I) c7 l0 F
　　goto_xy(x2,i);% W- y& {0 T+ [  k) Z7 \: Q/ n% u
　　putchar(' ');
　　delay(10);/ d. U$ b- |* [: o- h! T
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);) g" Q$ n9 m  E, K- ?% C
　　putchar(' ');) v9 t8 m' K, _" d
　　goto_xy(j,y2);
　　putchar(' ');) M$ r0 x6 o+ Y( ], c$ [
　　delay(10);
　　}
　　}
　　/******************open screen clear（开屏式清屏）*********************/' q! F  v, X3 H" p  x; X
( W1 Z4 a5 v. x2 [) A1 i& v
　　void kcls(int x1,int x2,int y1,int y2)
　　{# _% F% `9 A: k
　　int t,s,i,j;
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)
　　for(j=x1;j<x2;j++){* h7 _6 t: }( D! Z! T3 M
　　goto_xy(j,t);" O$ H7 w. t: l2 q
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);) H; `2 g7 O1 o8 V8 K% l/ C3 I
　　}
　　}6 K/ g# N( u- b0 ?* z
　　/*****************close screen clear*****闭幕式清屏*******************/, _4 a7 E# g$ F

　　void bcls(int x1,int x2,int y1,int y2)/ x- k6 J: h& A9 M+ e2 }1 M; s1 _
　　{3 F# w9 a( B1 a
　　int t,s,j;1 N2 ]) S( X. B( Y; E! z
　　t=y1;
　　s=y2;
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){$ d  b, i' q) D# A% w3 ^" A; ~
　　goto_xy(j,t);
　　putchar(' ');" H( b, M0 C  u2 d
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);& D  t, g# j( S, @  v$ `# H! q
　　}
　　}
　　/******************bottom screen clear（自下清屏）********************/& i% X; _% E+ v1 L0 }

　　void dcls(int x1,int x2,int y1,int y2)( G# N+ q0 B0 [4 n; ~' D
　　{
　　int t,s,j,i;
　　t=s=(y1+y2)/2;
　　for(j=x2;j>x1;j--)( f8 j0 N" Z/ ?  g, V* s: v& t
　　for(i=y1;i<y2;i++){
　　goto_xy(j,i);
　　putchar(' ');0 u/ J, @8 O1 g+ X1 G( E' Q8 x% O* y
　　delay(10);" |- z* r3 ?- m) L% }, _# i: o( l
　　}. F/ M: ?! e' p
　　}
　　/******************设置光标子函数******************/: c: {1 j  ~1 B* {; p
/ |) N+ o% ^* b. f. O
　　void goto_xy(int x,int y)
　　{
　　union REGS r;
　　r.h.ah=2;
　　r.h.dl=y;
　　r.h.dh=x;
　　r.h.bh=0;. v' [! ^3 W, U" r, l: y
　　int86(0x10,&r,&r);
　　}$ ~7 O  F* q. b6 }" a! A6 H
3 R  ]0 O$ k" {& W! X
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/% |( T7 c% K  x$ K( ?6 N
' e- _. W- H; q" ?0 \* x# f
　　void puta(void)/ C2 A2 W! V6 Z3 h# V2 U/ d
　　{
　　int i,j;8 J' B& _* {  T5 d: `
　　for(i=0;i<24;i++){
　　for(j=0;j<79;j++){! f; T2 u' }3 Q; i: N2 \! H" |
　　goto_xy(i,j);; H5 c8 f$ {2 E* K' {& T) j
　　printf("a");( _! K6 q* S6 [" D2 `
　　}, i! q; z2 h8 \8 O/ ?! l
　　}
　　}

返回列表

C语言艺术清屏

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

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