3

#include
  |& L( V1 [+ z% c3 U#include
' X3 E. P& M7 y#include
0 G# T% Y$ y+ X#include
6 U5 y! o, o1 D* w6 i#include
- d+ S$ ]3 E1 @0 s0 m8 N#include
) s6 d- v$ z" K7 c#include
! y6 L% i& Z" T3 Z#include # W; P) v1 V) O; r" X8 l
# w4 {5 ?" U6 {) t  w5 G
#define COLOR WHITE
) `0 `) ^' V, F3 L3 W* r#define F1 59
: G: v) M* o7 v  g/ f4 F#define F2 60% E" T) R' V& p/ r5 C8 Y
#define UP 72
! J) d  E3 d7 n2 ]' R9 i! O#define DOWN 80
7 F$ S1 l5 d- v#define LEFT 75. S+ k5 e+ a* r5 g) y( U6 d
#define RIGHT 77* I6 N) _9 M+ L9 }; k* L3 g
#define HOME 71
! C, t  R% I: G0 p5 Z1 P, s  `) }#define END 79
; R9 Y- f4 n) M9 a$ }* {: O, ]#define PAGEUP 735 s& S( c" Z3 `
#define PAGEDOWN 81& G" V& }" s/ ]) A  o' t/ O  B( N

9 D- I4 B" ]+ ?1 [% J0 vvoid Menu(void);7 v9 K8 ]0 X+ {2 s
void Save(void);
1 }7 |/ h  P4 s9 v  L& gvoid Load(void);
1 U8 B; t3 p! ~' e3 mvoid Xhairs(int a,int b);
. v$ P, O* a, @2 M
0 N0 l( q7 I$ j# t) q) D4 aunion k- d9 C+ H& J5 l+ D# G* S
{
& D) n" m2 k3 S9 E- Fchar c[2];& O- Q1 [8 \6 q: i
int i;
0 v  j% x/ G' u: o6 h# s};
9 {; b' {7 r8 i; }8 |/ ~3 ntypedef union k KEY;
* F  J$ ]! k& \2 m( s8 B* E9 DKEY key;
  ^& ~. m" K' b1 \- vstruct dot+ Z3 D( e) B( k; M! m2 F+ v( p
{
5 F- n. R. \  t( \5 Sint x;
& Q7 [& b3 J/ V: [1 d% ~1 oint y;, y- i% y5 I. O9 t. h) V5 O( T( ?
};1 S8 A, X4 |6 G. O5 I" J
typedef struct dot DOT;! \8 X7 _# y# G* o- m: t% j
DOT dis;( i# m7 j% E* s; I# t

# m6 `; T' F* T2 ]6 zmain()
) m! b1 ~( ^6 ?: S; k' `  g{
, K* T* b8 \, n: q( Z+ c! ]int inc=1,k,j,m,r;
- t7 t. I7 L1 n- [/ Gint driver,mode;1 o# A1 Z% _" I8 }9 u
int again=1;
2 U" B" u* Z5 S1 v% n& K& P; ]3 CDOT firstdot,secdot;
) i, j% c6 {) m. T/ {6 [% ]. J- \" x" {4 |0 I/ R. x- w
dis.x=200;1 @+ W8 O6 V, T9 J' }
dis.y=200;
8 p) ?$ \* |( ydriver=DETECT;
" o1 D2 q/ ~% O) O) z6 Omode=VGAHI;$ ~, O6 R! D/ ^6 e: P; R& y
initgraph(&driver,&mode,"c:\\bc\\bgi");
3 j; s$ V6 r5 D) z8 K
; {( z( _5 j5 A3 Msetbkcolor(BLUE);
+ c- P. F  H# G! R3 y/ ^9 t1 }1 kcleardevice();5 r) P0 C, ^% R) y8 o4 B5 C
setcolor(YELLOW);  L3 o% b7 q$ C, u( k, n
Xhairs(dis.x,dis.y);
* u# c* r. d* f, C0 b
6 ]: Q  o, W- kwhile(key.c[0]!='q')7 Y: I6 X( G0 j! ^+ u
{
% V; _" u3 v, f Menu();, ~0 d( ?5 s. u, f1 I
- P5 ?( x6 P$ B! J$ a8 D4 K
key.i=bioskey(0);" I2 F! d$ z5 f& Y) O- E' |+ P" m

$ n/ Z5 E; t" H! k. m- W2 ` if(!key.c[0])6 {8 e4 f( H6 s" b
{. W* s) V# q. ?9 y7 [
  Xhairs(dis.x,dis.y);
9 w+ W4 Q0 j( D% [  E. y  switch(key.c[1])' j! x, e" Z3 V4 Y% j; E+ x8 b1 q! i
  {& ^0 _, b2 }5 w; m
   case LEFT: dis.x-=inc;
# o1 G9 _$ c7 ?5 J8 ^! U) W2 x' [; ~   break;. _" q1 G9 @4 W* |# ]
   case RIGHT: dis.x+=inc;+ O" B0 d# \" b! I- M' k
   break;
5 z" h, ]8 t! `  r   case UP: dis.y-=inc;
; r" }3 \$ F# F3 l! q   break;1 w' A. b! V6 J' L. h( ]
   case DOWN: dis.y+=inc;! O% @/ Q' Z$ ]$ h8 i, A; L8 f) c
   break;
* d; G. F. t) @* [% F   case HOME: dis.x-=inc;$ H. b! Z" S: w- a
   dis.y-=inc;
2 k1 t+ \. O4 L5 F  n! _   break;
# J4 f& v/ u# s   case PAGEUP:dis.x+=inc;
6 E8 H, }+ f+ V; V   dis.y-=inc;
$ a7 f, Q3 {" u8 p, D; y   break;8 G( d/ @  N0 s( J2 r' m9 U
   case END: dis.x-=inc;3 S  v7 P& G1 M0 u4 u$ Y. }0 F
   dis.y+=inc;0 X0 b# o' X8 ]; ?1 H1 U) F! Y
   break;+ j- `2 B/ e- M- w. g
   case PAGEDOWN:dis.x+=inc;
0 K  O" ]  ~2 J- A) @* B4 M   dis.y+=inc;/ ~0 l& o0 s* O% g$ Y0 X
   break;
) T6 b4 {7 D$ k: d% E0 ]5 V( M   case F1: inc=1;4 c) g+ t1 a/ ~9 G' ]' _- U5 r
   break;
! \' }! I2 r2 d8 p6 h0 p" j   case F2: inc=5;+ |! S: Z. x8 p5 T
   break;
' B7 t. U  t8 X- F4 \  ~3 j  }( R! ], y4 c2 o$ q. A
  Xhairs(dis.x,dis.y);4 U6 B+ [, F* [+ i* k9 e* _" Y' b
}; u8 T0 `% q2 W. d1 a% m+ _7 F
else" O; ]! ~8 V7 B- ]$ @. l
{# A  z+ R% s/ G2 M5 e- ?
  switch(tolower(key.c[0]))6 o; L$ y% M% H& p1 ?
  {
2 I1 I& i2 W) o0 |/ b( d! p  case 'a': putpixel(dis.x,dis.y,COLOR);" r: r! g" R3 {: @+ N; Z3 A
  firstdot.x=dis.x;6 l* k- Q- z* S; W
  firstdot.y=dis.y;6 g# [: _' N0 D" n
  break;
) U  @& v2 H  M1 W( o+ U" \  case 'b': putpixel(dis.x,dis.y,COLOR);
* }- U- M& J9 Z, ]1 Y! l* J  secdot.x=dis.x;& D9 J0 D0 z* d( A3 C
  secdot.y=dis.y;
! D: f2 u% a* S; c  break;2 x  I! K# w7 k& ]7 T
  case 'l': line(firstdot.x,firstdot.y,secdot.x,secdot.y);  `, h8 A1 v! I. s5 _) l
  break;. L7 A' L6 y3 Z# l# A
  case 'o': r=sqrt(fabs((secdot.x-firstdot.x)*(secdot.x-firstdot.x)+(secdot.y-firstdot.y)*(secdot.y-firstdot.y)));
8 n+ F( X6 ?: o4 A  circle(firstdot.x,firstdot.y,r); break;' p# @0 b; x6 u  j4 R
  case 'h': rectangle(firstdot.x,firstdot.y,secdot.x,secdot.y);
6 U: g4 |. H! y6 u9 u  break;
+ M* ^9 L' z7 B! V5 B9 U& ~+ Z  case 'c': cleardevice();Xhairs(dis.x,dis.y);+ i$ |: O9 V5 [+ @- P7 s* B- U( k
  break;
" X9 W$ P) }4 Q  case 'w': Save();. M/ x, s) R  K3 X
  break;
/ X0 c5 }1 R! {" r/ |1 D  case 'r': Load();  d" G" Z/ w  C  }
  break;4 W' N$ p9 H- I3 l* o3 u
  }
* ]/ D2 G9 ^. W/ C1 \  * D- j4 O% g  y8 g) J) i2 I9 _
}
+ h" u4 ^: f& g) |0 _+ G# l
7 N# B9 O9 \8 Y, Y4 k  u}
( R/ s. `: T- I' B# `% {closegraph();
: G1 J; X) v* @}
7 i3 V. `6 i, o5 x; ^* J+ X- z, S# ^
void Xhairs(int a,int b)
/ d1 R  I! m# u! l  O3 V{/ P% H1 T! v+ k
int i;7 |/ Z. `, n  [8 l* N4 q% [. E% t
for(i=a-5;i<=a+5;i++)
" q; X$ C4 `. c$ Z. Z7 Hputpixel(i,b,15^getpixel(i,b));+ i, k( ?# l9 j" a& n
! L: T' Y$ j9 u& S; o# i
for(i=b-5;i<=b+5;i++)
1 c: Z# Y  S& |+ w: P! r$ a7 Kputpixel(a,i,15^getpixel(a,i));
9 ]7 b# C; S* L+ b9 W}
- |% b. D0 r( U; \0 Y9 Ivoid Menu(void)7 s$ |! u& l( x) P
{5 Z; v2 x* G: o2 ]* L: {
#define STARTX 10
  |" |1 ~3 e# B; h; ~#define STARTY 22
2 i) v8 F) R6 P3 V# C9 |, K# E* B5 p% q#define DISTANCE 30/ |5 l7 X2 S% Z4 K" N
0 Z! T6 M8 S; ?- M, Y
int i;
8 N. G0 [; m  n9 r5 Zchar *menu_name[]={"a:start point.","b:end point.","l:draw line.","o:draw circle.","h:draw box.","c:clear screen.","F1:step=1.","F2:step=5","Home Pageup","End PageDown.","w:save graph","r:load graph","q:quit"};$ q- y2 [3 b5 F, T
9 v4 t* R6 b' y; V  S0 t
setcolor(WHITE);
) w* A" ]% {" b; m( V4 zrectangle(5,5,150,470);. `$ c2 h- |0 b- \, N) \) ~0 N
rectangle(155,5,635,470);" t' t' h5 v8 g8 h, d: K
setcolor(LIGHTBLUE);
7 ~5 S/ E* z7 ]! M0 k0 h! }9 zsettextstyle(TRIPLEX_FONT,HORIZ_DIR,2);$ O" f! E: ]: t5 [8 G
outtextxy(36,STARTY,"menu");) j/ P" p7 l3 a& V8 c6 F0 L
setcolor(YELLOW);# C& [# E0 k; p4 A( c6 q
settextstyle(DEFAULT_FONT,HORIZ_DIR,1);
$ Z1 y& r7 \- k, P9 m) d4 {+ p7 C1 T0 u: w1 ?
for(i=0;i<=14;i++)/ M7 s+ z6 K+ Q
outtextxy(STARTX,STARTY+(i+1)*DISTANCE,menu_name);* Z9 q3 P8 G# K7 L7 x
}0 P5 [$ p2 i9 b; l8 O
void Save(void)% H4 Y0 S( X- ?/ J7 G1 \
{
! b! L- I% k1 `! u5 Aint i,j;
$ H9 X1 ^0 v6 f* NFILE *fp;7 T8 J5 n8 Z8 f; G
9 h5 ~$ B: U  W  D# `% E6 K0 a
if((fp=fopen("graph.dat","w+"))==NULL)
& I6 K2 J: U0 D9 J! m{$ j$ n, @) J- t7 p6 A, q
printf("cannot open this file!");4 c7 d' ?1 D8 C) p4 F+ M# ~
exit(0);
/ T( [% a# X9 }3 S6 O3 p}( t/ o3 w0 f* g* d) x6 B* G/ ~$ v
for(i=5;i<=470;i++)" r2 |! g3 i5 G7 @6 ]
{
" I- b4 X$ Y0 v* jfor(j=155;j<=635;j++)1 P2 T; p* ^% @: w% |6 R
{
7 X, ^  a7 s% f, b0 ]fputc(getpixel(j,i),fp);% {  E7 q% y' N+ C
}+ ^9 V: L, Y6 u
}( |- M, ]4 G; D* g
fclose(fp);
4 Q0 x1 `  {. m4 w/ _outtextxy(260,471,"save over!");4 ]) ^4 m; M2 E4 V6 r/ w+ d
}# S! `$ @4 M3 k* Q5 I
9 f! y" B% @5 K
void Load(void)
( R& k4 X& i) P+ B& E0 G+ T{
3 B* O9 N/ {7 M3 n  n" T' v( Bint i,j;! n0 e1 o. K& N. {
FILE *fp;
7 f- k! x, I$ |+ O5 V" I7 ]8 `7 W, f
" l' U( m+ W8 kif((fp=fopen("graph.dat","r+"))==NULL). ~: l& ~. b7 e' c/ a3 S) Z! T
{% n& V9 h8 }$ Y2 w5 |% d( p
printf("cannot open this file!");
0 X+ Y- D3 A" c* _" o) Wexit(0);
& W1 R2 T) \" }5 A5 H! q}( W3 u$ w! ~) H$ i" F* I/ |3 `
outtextxy(280,471,"loading......");
6 N/ ^, _# X+ f6 q2 p/ n: K; ?! m1 Xfor(i=5;i<470;i++)
5 u! F+ T1 E. ~( G, }$ |/ c. q{
: K- V' ?" w5 Nfor(j=155;j<=635;j++)9 m- l  a' A6 S
putpixel(j,i,fgetc(fp));
7 x9 J- A- v7 A- F# H7 u. K}
7 v: k6 E- ?2 I8 Vfclose(fp);, v0 A- f/ ?' a: W5 f) l  o+ r
outtextxy(368,471,"over");( g+ ?2 C- L$ i
}, M( S- _/ @& M, d, A/ z' Y5 I
哥哥，看看我的这个程序，帮我改一下这个程序，实现在画图的时候可以选者颜色~！~~~~