C语言艺术清屏

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

　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里% h8 X: ~" z2 g% Q

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:
7 U" M* e/ m- V4 v: `" c+ [
　　#include<stdio.h>% Q8 I! \* _! m* H1 m- `% _2 j: c
　　#include<dos.h>
　　#include<conio.h>
- L  ^3 O$ g5 ~# J7 p% _
　　void goto_xy(int x,int y);
　　void dcls(int x1,int x2,int y1,int y2);0 j/ f* Z9 j8 M0 H2 H3 W! p. W
　　void bcls(int x1,int x2,int y1,int y2);
　　void kcls(int x1,int x2,int y1,int y2);7 ^! i& c" Y, o5 t3 c1 l+ G& d6 G
　　void recls(int x1,int x2,int y1,int y2);  @. P5 G1 `7 T; U! }; z- L" {
　　void zcls(int x1,int x2,int y1,int y2);  x. Q/ N: k% v9 l+ ^- x- W: Z
　　void puta(void);
1 N6 h" d' B4 _9 s

　　/*--------------演示程序---------------------*/6 f1 ~" h7 D3 i& q: E
　　main()% y8 ?$ T& j# @) E& u1 ^
　　{0 v  I# _$ d0 z$ V4 `7 W* E. |$ D
　　puta();
　　getch();0 _' d% R5 f, ~. k
　　dcls(0,4,0,79);
　　getch();
　　puta();
　　getch();* F' i: c; p" ]1 R/ z0 ~0 o* J
　　bcls(0,25,0,79);
　　getch();! p/ s: O+ Y5 l/ I* h0 j. U2 q& q
　　puta();
　　getch();% V2 B) J* Z' }1 X- F/ w9 `
　　zcls(0,25,0,79);
　　getch();9 s% B, h7 f+ m5 v: X
　　}' O0 v( `$ p4 s1 m
　　/*********center clear screen（中心清屏）***********/
　　void zcls(int x1,int x2,int y1,int y2), D) L& I5 x" R) x7 u: c5 j( |
　　{
　　int x00,y00,x0,y0,i,d;
　　if((y2-y1)>(x2-x1)){
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;
　　y0=y1+d;. U8 b  w5 V- V) h4 I) n, p; U. ~
　　y00=y2-d;
　　for(i=0;i<(d+1);i++)% u* q5 `& m! \$ e' q
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);/ o: V% B! I& B3 I; r
　　}
　　else{$ T2 v, M4 S; j7 w9 l6 L( ]
　　d=(y2-y1)/2;9 R$ v- L9 r# Z
　　y0=(y1+y2)/2;
　　x0=x1+d;/ s! a$ J4 b3 E6 r& E
　　x00=x2-d;& X" T) o( f8 B$ m+ O' P( u
　　for(i=0;i<d+1;i++)
　　recls(x0-i,x00+i,y0-i,y00+i);
　　delay(10);. L( j6 |: h/ G' u3 Y
　　}
　　}
3 X# q% p4 e6 L; C% m- F
　　/************* clear rectangle side（矩形边清屏）***********************/  x, h* ~7 f% e& p7 E( C4 i

　　void recls(int x1,int x2,int y1,int y2)0 ^/ n- i+ i7 x  B3 b8 o+ X
　　{
　　int i,j;4 u. n4 c) j& ?( u+ `: \( J) u
　　for(i=y1;i<y2;i++){$ `* }$ y; ^' [0 }7 R# w
　　　　goto_xy(x1,i);
　　putchar(' ');
　　goto_xy(x2,i);2 H( C/ T3 R' ?+ o7 k" X
　　putchar(' ');2 K# _4 U5 E* R# U
　　delay(10);
　　}/ c0 `. N& D, [+ x7 i
　　for(j=x1;j<x2;j++){% M7 J  ^' v6 g$ R$ t
　　goto_xy(i,y1);! D! p" e& q% \# I! \/ F: h
　　putchar(' ');- ^4 ~- G% ~+ ?8 F* I$ U' ^
　　goto_xy(j,y2);
　　putchar(' ');
　　delay(10);, |& H$ m2 ?5 A  u$ u. v
　　}
　　}
　　/******************open screen clear（开屏式清屏）*********************/

　　void kcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,i,j;
　　t=s=(y1+y2)/2;% G7 I# D0 N+ x' y
　　for(;t<=y2;t++,s--)0 m$ b3 w: B8 z$ H) R7 c% `2 S
　　for(j=x1;j<x2;j++){: C+ l- H8 K; s: [$ X* r5 q
　　goto_xy(j,t);* B' j  n1 J1 t  [) p1 e
　　putchar(' ');3 v& \# X1 `( w; R4 ?( k7 A& ]
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);* y- ^7 Q, Z2 e  Q  K9 {
　　}
　　}5 C1 e# l+ k0 R8 M; c+ z
　　/*****************close screen clear*****闭幕式清屏*******************/- v1 l/ h" A5 q2 `/ J  E2 h! v
' [& {3 M2 X3 U* ^- [# T
　　void bcls(int x1,int x2,int y1,int y2)
　　{
　　int t,s,j;
　　t=y1;$ @- X  M. m2 q& r- o8 X
　　s=y2;& [! F0 |- d% J3 E/ H) G. T  p" |9 t
　　for(t=y1;t<(y1+y2)/2;t++,s--)& F2 R5 _# l( _+ I0 R; z0 x/ u
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);# f. @, s5 }* O, O9 k& ?, J0 j
　　putchar(' ');; j8 i) x: O0 X7 {
　　goto_xy(j,s);& b; S% D# q2 f/ s
　　putchar(' ');. m: o7 h  F& G/ K3 D; N' d2 I
　　delay(10);$ A! }' K. P4 f
　　}( q: E/ I9 W2 b6 k; W2 p4 C
　　}
　　/******************bottom screen clear（自下清屏）********************// o/ S1 [3 t& I, d( w
( T3 c. N% Q* j8 J$ w$ G% f7 H
　　void dcls(int x1,int x2,int y1,int y2)5 J& ~1 K( J1 ~/ @
　　{4 W# N8 }8 X* \- Q, S, R
　　int t,s,j,i;
　　t=s=(y1+y2)/2;* J  u$ k9 x$ t5 ]4 ^
　　for(j=x2;j>x1;j--)* ?* ]* ^0 J; j& [8 i. j
　　for(i=y1;i<y2;i++){- b! L& J) `" r; E; f3 Y
　　goto_xy(j,i);
　　putchar(' ');% _# O/ D' k& L
　　delay(10);9 b5 ~% K% b# d! p8 ^* R" W
　　}. r# Z0 t9 U+ E" H- b5 |) y
　　}+ R0 Q& p6 K- `! r) d& I
　　/******************设置光标子函数******************/

　　void goto_xy(int x,int y)( B: Z5 w4 z0 y! I- v- G, _$ m. q
　　{
　　union REGS r;
　　r.h.ah=2;
　　r.h.dl=y;7 w( y; P9 S/ }) ]1 r, T1 C- u
　　r.h.dh=x;3 s0 P" `' a2 Y
　　r.h.bh=0;, S5 f  T; M% I  v! t6 x1 B/ `
　　int86(0x10,&r,&r);
　　}1 I7 _, B9 y1 ~; B
2 A( n0 \  Z8 K
　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/* |% B( j& O5 e# c" O: x
! @* S3 g' }$ {8 Q; X
　　void puta(void)% M. r( x  A8 l
　　{' a2 X6 N1 v. b- c5 A+ m3 n
　　int i,j;5 H- m$ u7 J1 `! a* a2 G$ }
　　for(i=0;i<24;i++){
　　for(j=0;j<79;j++){1 l  ^8 i  l/ U
　　goto_xy(i,j);- Q5 S5 N. e& |1 t2 ]
　　printf("a");
　　}+ G% l8 a+ c$ c9 [* y
　　}3 O% b% w4 f4 K1 P9 F
　　}

返回列表

C语言艺术清屏

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

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