C语言艺术清屏(页 1) - 网页编程 - 捌玖网络工作室 |网页制作|平面设计|建站交流|代码资料|建站教程|主机域名|asp、php、jsp代码|网站素材

zw2004 发表于 2008-1-21 17:14

C语言艺术清屏

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

　　并未显示其清屏规律.而有时为了达到清屏的艺术美观,往往对清屏有一些具体要求,如:开幕清屏;闭幕清屏;上清屏;下清屏;中清屏.为此,这里 J}dR:p:b

　　用C语言编制了几个子函数,用于程序中时,既可达到清屏的目的,有能增加屏幕的艺术美观.
　　子函数及演示程序:vL%`Y7pA_+R&\

　　#include<stdio.h>*N4nsM}9? @
　　#include<dos.h>
　　#include<conio.h>7vu!q"NGt

　　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);
　　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);B&@gb/|'`%NWgW
yk'M(@rb1yZ

　　/*--------------演示程序---------------------*/l#^nti
　　main()
　　{
　　puta();
　　getch();
　　dcls(0,4,0,79);
　　getch(); MUS3Qma/T%w
　　puta();+\@#d{~Q2Z0c7qy
　　getch();
　　bcls(0,25,0,79);
　　getch();
　　puta();"@]]|&Yx th
　　getch();Q&Sy#U9Gs
　　zcls(0,25,0,79);-I%aO}7[
　　getch();.V zx'L1|9N
　　}
　　/*********center clear screen（中心清屏）***********/)}-uZ.U$~C `#^
　　void zcls(int x1,int x2,int y1,int y2)I-P~Fs
　　{(QC(x({ cNl?u
　　int x00,y00,x0,y0,i,d;
　　if((y2-y1)>(x2-x1)){D!j.HrqJTX
　　d=(x2-x1)/2;
　　x0=(x1+x2)/2;P#LD\&FR+D:~/B
　　y0=y1+d;%u6l.vqswI'T v
　　y00=y2-d;kR)@qRv/o O
　　for(i=0;i<(d+1);i++)
　　recls((x0-i),(x00+i),(y0-i),(y00+i));
　　delay(10);D&W2cDRrU%Q
　　}
　　else{A-Wx RE5J Ti
　　d=(y2-y1)/2; } zI`@&V.iG
　　y0=(y1+y2)/2;JbKj%Mi!U-R&q
　　x0=x1+d;
　　x00=x2-d;rOvd.AC
　　for(i=0;i<d+1;i++)*}d[Fk-B1_e;j
　　recls(x0-i,x00+i,y0-i,y00+i);P3\3Ro {4|'z
　　delay(10);J8n![^pj&F o
　　}wU!x!VAqv
　　}~Yw6}E;i

　　/************* clear rectangle side（矩形边清屏）***********************/
Y{J)A{/E*h
　　void recls(int x1,int x2,int y1,int y2)D8g~D_
　　{n;G1}J7m
　　int i,j;(]Sql4^'Jfy:ovhf7r
　　for(i=y1;i<y2;i++){
　　　　goto_xy(x1,i);
　　putchar(' ');
　　goto_xy(x2,i);
　　putchar(' ');ZC a"U Q!e8n"_
　　delay(10);k^S*u:b_$~{y
　　}n!`f-a(M)|7GA
　　for(j=x1;j<x2;j++){
　　goto_xy(i,y1);
　　putchar(' ');p'O)W E ?i0b
　　goto_xy(j,y2);
　　putchar(' ');
　　delay(10);
　　}
　　}
　　/******************open screen clear（开屏式清屏）*********************/D4@zqDc
I/c$U:u:x5MZ`
　　void kcls(int x1,int x2,int y1,int y2)3K-O2rUT7d
　　{
　　int t,s,i,j;;hM3b}'{*h5T_,Ok
　　t=s=(y1+y2)/2;
　　for(;t<=y2;t++,s--)
　　for(j=x1;j<x2;j++){QY#cY2o3C|y,i
　　goto_xy(j,t);o|/ejiI
　　putchar(' ');
　　goto_xy(j,s);
　　putchar(' ');
　　delay(10);
　　}
　　}F&ucr8v"s ]
　　/*****************close screen clear*****闭幕式清屏*******************/V0YiF5R,A9W{
#U EY@a
　　void bcls(int x1,int x2,int y1,int y2)Qhk+{,wR
　　{
　　int t,s,j;
　　t=y1;
　　s=y2;PDH|zpk+K;CH}
　　for(t=y1;t<(y1+y2)/2;t++,s--)p7zYXp&Um"C
　　for(j=x1;j<x2;j++){
　　goto_xy(j,t);
　　putchar(' ');
　　goto_xy(j,s);&a^ B#{*RFm
　　putchar(' ');
　　delay(10);y3TPT(| Bq.lM3q
　　}
　　}
　　/******************bottom screen clear（自下清屏）********************/t7U*u Z\,ug.F

　　void dcls(int x1,int x2,int y1,int y2)6Ip2I\,k8d/[
　　{ q$O$azT7w
　　int t,s,j,i;
　　t=s=(y1+y2)/2;!S7G \"[E3zF
　　for(j=x2;j>x1;j--)
　　for(i=y1;i<y2;i++){.Z9@$~Bs)|
　　goto_xy(j,i);
　　putchar(' ');
　　delay(10);rDAw+lD:?B
　　} ^cUA:T-D"I
　　}
　　/******************设置光标子函数******************/
CD V8IZ5Z7Byb)T
　　void goto_xy(int x,int y)5wJ~(D W{
　　{
　　union REGS r;t'fH8SR;uJ;X-d
　　r.h.ah=2;Q4j V5L"YBK/b
　　r.h.dl=y;
　　r.h.dh=x;
　　r.h.bh=0;
　　int86(0x10,&r,&r);/?GW)v PR:F)h
　　}

　　/**********************在屏幕上打出一连串的a字母用于演示程序******************/
o'hR!Y)^
　　void puta(void)E6I/B.h1W
　　{|ypQ.{^
　　int i,j;.I3nNjb$E
　　for(i=0;i<24;i++){\P7s#{ZEu~ U
　　for(j=0;j<79;j++){
　　goto_xy(i,j);
　　printf("a"); d*C`:x6B lE%o
　　})S k1no1W9Y
　　}
　　}

页: [1]

捌玖网络工作室's Archiver

C语言艺术清屏