C语言艺术清屏

问题的提出:我们在编制程序时,经常要用到清屏处理,如dos下的cls,Turbo C下的clrscr()等都具有清屏功能,但这些均为一般意义的清屏,
1 a6 q9 ^; ?9 G' }4 C" z; \3 J
　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里
2 \) Y# s( H$ |: H% L$ y
　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:
* X% }$ }. u8 o8 N% f& Y& F
　　#include<stdio.h>0 i8 C% n& e% g* L
　　#include<dos.h>  S2 k. d$ E9 P* c" E9 I0 ~
　　#include<conio.h>

　　void goto_xy(int x,int y);
　　void dcls(int x1,int x2,int y1,int y2);, Y/ a+ m5 l3 V7 d
　　void bcls(int x1,int x2,int y1,int y2);& A2 d* @: J* o( {: b$ x7 n: P
　　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);

5 N+ n1 h2 p( F5 N
　　/*--------------演示程序---------------------*/
　　main()
　　{4 L+ e: k! v* Y! b& k
　　puta();
　　getch();9 @% g! f0 I0 p+ ^$ ^
　　dcls(0,4,0,79);
　　getch();
　　puta();. x/ Q  C+ Q0 O$ p/ ]( l
　　getch();
　　bcls(0,25,0,79);
　　getch();; t; z- j) U0 x4 X* p5 J3 [
　　puta();  {) U) {4 A9 ]% ~: u
　　getch();
　　zcls(0,25,0,79);0 e5 X! @% p# o9 b( L6 @
　　getch();" o& |  U0 J# [! o9 t- _
　　}
　　/*********center clear screen（中心清屏）***********/2 i, h6 R# L$ a; ?  g% e- J
　　void zcls(int x1,int x2,int y1,int y2)
　　{, p; @& N# Q2 K" k- e
　　int x00,y00,x0,y0,i,d;* w3 d; Z  E. Z( e5 `
　　if((y2-y1)>(x2-x1)){
　　d=(x2-x1)/2;, I+ s( n2 [. d1 ^
　　x0=(x1+x2)/2;
　　y0=y1+d;
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));0 ~6 d# p% Y: Q; ^, _+ u# q* }
　　delay(10);
　　}2 \7 K: T6 C4 ]! w. e
　　else{$ `, g$ z  {% ]' @: {6 t. J" S" b$ p1 l
　　d=(y2-y1)/2;
　　y0=(y1+y2)/2;
　　x0=x1+d;3 ~* T) K( }% Q1 Y, T3 @
　　x00=x2-d;
　　for(i=0;i<d+1;i++)2 K# w/ a" z6 r$ q
　　recls(x0-i,x00+i,y0-i,y00+i);4 V( l7 X; C6 f$ P+ c/ x
　　delay(10);
　　}; s5 W* w2 N; a- [# |/ ]* ]
　　}

　　/************* clear rectangle side（矩形边清屏）***********************/
4 J5 L( b4 \2 r9 l2 @6 I
　　void recls(int x1,int x2,int y1,int y2)2 Y. \' N1 \7 d: ~! o: u+ Y
　　{
　　int i,j;' P3 F% j) c7 l4 E1 ^/ r- S& d
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);$ r+ l% d! ?% ?0 p1 P7 j
　　putchar(' ');
　　goto_xy(x2,i);: }! }& a# m( P
　　putchar(' ');
　　delay(10);
　　}
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);
　　putchar(' ');' k- K7 C# m/ L3 y( {
　　goto_xy(j,y2);6 P8 P0 F2 ~- B/ i1 O* r
　　putchar(' ');
　　delay(10);$ U) v+ q3 Q$ x- J5 C  V9 Q! M
　　}- W& I) N' {1 {
　　}* P2 ]  J: o. ~" {, R
　　/******************open screen clear（开屏式清屏）*********************/; T5 |4 Y" ?9 `

　　void kcls(int x1,int x2,int y1,int y2)& v! F8 u/ w! |5 [6 n" l7 T' T
　　{+ w7 @8 L8 n" r- b* O& B
　　int t,s,i,j;" q, W! B# b* f$ M
　　t=s=(y1+y2)/2;3 y0 r$ s/ Q# Q) o/ [* b
　　for(;t<=y2;t++,s--)
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);
　　putchar(' ');' T$ K; d) ~+ h; V8 }7 h# m
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}
　　}! z- {' w+ C! [4 `
　　/*****************close screen clear*****闭幕式清屏*******************/
- n! W) a. K* d& f' @
　　void bcls(int x1,int x2,int y1,int y2), U( _$ Y" f! k" K6 A% v
　　{
　　int t,s,j;
　　t=y1;
　　s=y2;- Q$ g# O, U# ]) O5 x" ~, }) Y, P
　　for(t=y1;t<(y1+y2)/2;t++,s--)
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);- H6 U) c( X0 M$ m7 s5 S! w
　　putchar(' ');( C- w+ }' i% E( E% }
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);2 @$ z& b% M$ `" d. ?0 H% w3 P  Q
　　}% {. w: e' K2 Z' y1 H  R+ i3 \& T
　　}; s' H$ Z+ s; t& X$ K0 f4 u
　　/******************bottom screen clear（自下清屏）********************/
; M1 R. k! m  Z  l' U
　　void dcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,j,i;
　　t=s=(y1+y2)/2;
　　for(j=x2;j>x1;j--)& h  g, x  s7 D1 S# Q7 Q9 I
　　for(i=y1;i<y2;i++){" n$ R+ ?* D6 T6 |2 Z, n" k
　　goto_xy(j,i);, Q) u, }/ ]4 h, |$ I
　　putchar(' ');
　　delay(10);* p2 ?- Z3 o; X% b
　　}1 M5 b! \# A' z* o" p, ?6 U
　　}
　　/******************设置光标子函数******************/3 v: P0 ^( Z. ^9 a

　　void goto_xy(int x,int y)/ |8 p/ i: G( k3 c/ r- F9 ], l
　　{
　　union REGS r;
　　r.h.ah=2;
　　r.h.dl=y;, z" p" G4 n! Z
　　r.h.dh=x;
　　r.h.bh=0;
　　int86(0x10,&r,&r);
　　}6 h+ P0 j% I3 z# w6 D9 O

　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/

　　void puta(void)1 }  W* B3 C- N, h0 {
　　{
　　int i,j;0 x5 e1 r1 A7 ^# `! V8 Q
　　for(i=0;i<24;i++){8 I3 B' p* C: R! x7 I7 X) }
　　for(j=0;j<79;j++){
　　goto_xy(i,j);6 p9 s- e9 x- M8 U+ W! S* ?$ A6 V
　　printf("a");
　　}: q0 e- W1 Z/ t. n' q/ K& k! P' {
　　}% b% ?5 }+ X2 \9 V" X
　　}

返回列表

C语言艺术清屏

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

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