查看: 2723|回复: 0

函数大全(p开头)

字体大小: 正常放大

韩冰

823 主题	3 听众	4048 积分

我的地盘我做主

该用户从未签到

电梯直达

1^#

发表于 2004-10-4 02:56 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

<

align=center>函数大全(p开头)

<

>函数名: parsfnm 
功能: 分析文件名
用法: char *parsfnm (char *cmdline, struct fcb *fcbptr, int option);
程序例: 
<

>#include <

ROCESS.H>
#include <STRING.H>
#include <STDIO.H>
#include <DOS.H>
<

>int main(void)
{
char line[80];
struct fcb blk; 
<

>/* get file name */
printf("Enter drive and file name (no path - ie. a:file.dat)\n");
gets(line); 
<

>/* put file name in fcb */
if (parsfnm(line, &blk, 1) == NULL)
printf("Error in parsfm call\n");
else
printf("Drive #%d Name: %11s\n", blk.fcb_drive, blk.fcb_name); 
<

>return 0;
}


<

>函数名: peek 
功能: 检查存储单元
用法: int peek(int segment, unsigned offset);
程序例: 
<

>#include <STDIO.H>
#include <CONIO.H>
#include <DOS.H>
<

>int main(void)
{
int value = 0; 
<

>printf("The current status of your keyboard is:\n");
value = peek(0x0040, 0x0017);
if (value & 1)
printf("Right shift on\n");
else
printf("Right shift off\n"); 
<

>if (value & 2)
printf("Left shift on\n");
else
printf("Left shift off\n"); 
<

>if (value & 4)
printf("Control key on\n");
else
printf("Control key off\n"); 
<

>if (value & 8)
printf("Alt key on\n");
else
printf("Alt key off\n"); 
<

>if (value & 16)
printf("Scroll lock on\n");
else
printf("Scroll lock off\n"); 
<

>if (value & 32)
printf("Num lock on\n");
else
printf("Num lock off\n"); 
<

>if (value & 64)
printf("Caps lock on\n");
else
printf("Caps lock off\n"); 
<

>return 0;
}


<

>函数名: peekb 
功能: 检查存储单元
用法: char peekb (int segment, unsigned offset);
程序例: 
<

>#include <STDIO.H>
#include <CONIO.H>
#include <DOS.H>
<

>int main(void)
{
int value = 0; 
<

>printf("The current status of your keyboard is:\n");
value = peekb(0x0040, 0x0017);
if (value & 1)
printf("Right shift on\n");
else
printf("Right shift off\n"); 
<

>if (value & 2)
printf("Left shift on\n");
else
printf("Left shift off\n"); 
<

>if (value & 4)
printf("Control key on\n");
else
printf("Control key off\n"); 
<

>if (value & 8)
printf("Alt key on\n");
else
printf("Alt key off\n"); 
<

>if (value & 16)
printf("Scroll lock on\n");
else
printf("Scroll lock off\n"); 
<

>if (value & 32)
printf("Num lock on\n");
else
printf("Num lock off\n"); 
<

>if (value & 64)
printf("Caps lock on\n");
else
printf("Caps lock off\n"); 
<

>return 0;
}


函数名: perror 
功能: 系统错误信息
用法: void perror(char *string);
程序例: 
#include <STDIO.H>
int main(void)
{
FILE *fp; 
fp = fopen("perror.dat", "r");
if (!fp)
perror("Unable to open file for reading");
return 0;
}


函数名: pieslice 
功能: 绘制并填充一个扇形
用法: void far pieslice(int x, int stanle, int endangle, int radius);
程序例: 
#include <GRAPHICS.H>
#include <STDLIB.H>
#include <STDIO.H>
#include <CONIO.H>
int main(void)
{
/* request auto detection */
int gdriver = DETECT, gmode, errorcode;
int midx, midy;
int stangle = 45, endangle = 135, radius = 100; 
/* initialize graphics and local variables */
initgraph(&gdriver, &gmode, ""); 
/* read result of initialization */
errorcode = graphresult();
if (errorcode != grOk) /* an error occurred */
{
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Press any key to halt:");
getch();
exit(1); /* terminate with an error code */
} 
midx = getmaxx() / 2;
midy = getmaxy() / 2; 
/* set fill style and draw a pie slice */
setfillstyle(EMPTY_FILL, getmaxcolor());
pieslice(midx, midy, stangle, endangle, radius); 
/* clean up */
getch();
closegraph();
return 0;
} 


函数名: poke 
功能: 存值到一个给定存储单元
用法: void poke(int segment, int offset, int value);
程序例: 
#include <DOS.H>
#include <CONIO.H>
int main(void)
{
clrscr();
cprintf("Make sure the scroll lock key is off and press any key\r\n");
getch();
poke(0x0000,0x0417,16);
cprintf("The scroll lock is now on\r\n");
return 0;
}


函数名: pokeb 
功能: 存值到一个给定存储单元
用法: void pokeb(int segment, int offset, char value);
程序例: 
#include <DOS.H>
#include <CONIO.H>
int main(void)
{
clrscr();
cprintf("Make sure the scroll lock key is off and press any key\r\n");
getch();
pokeb(0x0000,0x0417,16);
cprintf("The scroll lock is now on\r\n");
return 0;
} 


函数名: poly 
功能: 根据参数产生一个多项式
用法: double poly(double x, int n, double c[]);
程序例: 
#include <STDIO.H>
#include <MATH.H>
/* polynomial: x**3 - 2x**2 + 5x - 1 */ 
int main(void)
{
double array[] = { -1.0, 5.0, -2.0, 1.0 };
double result; 
result = poly(2.0, 3, array);
printf("The polynomial: x**3 - 2.0x**2 + 5x - 1 at 2.0 is %lf\n",
result);
return 0;
} 


函数名: pow 
功能: 指数函数(x的y次方)
用法: double pow(double x, double y);
程序例: 
#include <MATH.H>
#include <STDIO.H>
int main(void)
{
double x = 2.0, y = 3.0; 
printf("%lf raised to %lf is %lf\n", x, y, pow(x, y));
return 0;
}

函数名: pow10 
功能: 指数函数(10的p次方)
用法: double pow10(int p);
程序例: 
#include <MATH.H>
#include <STDIO.H>
int main(void)
{
double p = 3.0; 
printf("Ten raised to %lf is %lf\n", p, pow10(p));
return 0;
} 


函数名: printf 
功能: 产生格式化输出的函数
用法: int printf(char *format...);
程序例: 
#include <STDIO.H>
#include <STRING.H>
#define I 555
#define R 5.5 
int main(void)
{
int i,j,k,l;
char buf[7];
char *prefix = buf;
char tp[20];
printf("prefix 6d 6o 8x 10.2e "
"10.2f\n");
strcpy(prefix,"%");
for (i = 0; i < 2; i++)
{
for (j = 0; j < 2; j++)
for (k = 0; k < 2; k++)
for (l = 0; l < 2; l++)
{
if (i==0) strcat(prefix,"-");
if (j==0) strcat(prefix,"+");
if (k==0) strcat(prefix,"#");
if (l==0) strcat(prefix,"0");
printf("%5s |",prefix);
strcpy(tp,prefix);
strcat(tp,"6d |");
printf(tp,I);
strcpy(tp,"");
strcpy(tp,prefix);
strcat(tp,"6o |");
printf(tp,I);
strcpy(tp,"");
strcpy(tp,prefix);
strcat(tp,"8x |");
printf(tp,I);
strcpy(tp,"");
strcpy(tp,prefix);
strcat(tp,"10.2e |");
printf(tp,R);
strcpy(tp,prefix);
strcat(tp,"10.2f |");
printf(tp,R);
printf(" \n");
strcpy(prefix,"%");
}
}
return 0;
} 


函数名: putc 
功能: 输出一字符到指定流中
用法: int putc(int ch, FILE *stream);
程序例: 
#include <STDIO.H>
int main(void)
{
char msg[] = "Hello world\n";
int i = 0; 
while (msg)
putc(msg[i++], stdout); # w9 h# B* W. I( z* D, d5 b) B
return 0;
 W% P2 ]6 g9 P T}
+ V5 P; h5 c0 |+ w& g
: T' K S7 Q6 X# A, u
' E$ \) I9 q1 H. k7 O2 P9 U* g函数名: putch $ C l8 b7 q1 f5 z0 x8 a8 P$ a+ b
功能: 输出字符到控制台
- F9 o8 o$ Z, s. w. j0 A3 f1 r用法: int putch(int ch); * y0 S( H; s4 v
程序例: 
2 q/ n- b4 w5 f! s P6 z#include <STDIO.H>& ]+ N4 r( ?- U6 y8 ^2 G+ f5 b- I
#include <CONIO.H>6 B% h, t" l3 i0 h9 {
int main(void)
- l( t# t) g3 [, w/ x{
4 D( p a/ r4 G% K p- ^4 Kchar ch = 0; ' l2 P8 ]) v5 _: V% l3 M
printf("Input a string:"); $ d, T0 |0 b! L& N" k f2 L
while ((ch != '\r'))
$ q; b8 ]! m h{ ; Y8 R; l. u7 @3 o$ d, n
ch = getch();
' G0 y! w8 D r: }0 m: k) F# e8 ]putch(ch); * b. {; f( W' h" S& k
} 4 V) K# w3 `+ a$ j
return 0; 7 B( s4 b7 P' s [& @6 q, g3 ?: c
}
# h! @: u# V. w8 d$ @' t% U+ X
: | E. a, \3 L' q
! g2 v4 ]; v( y3 I8 W* W函数名: putchar * y+ _% c6 ?2 J9 }4 ]4 f
功能: 在stdout上输出字符
: a( {* E9 W$ L5 ~* C# M+ F- [4 @用法: int putchar(int ch);
) N0 s! I! F/ [2 N; [, b程序例: 0 x* _+ L" S4 p
#include <STDIO.H>
, s) A9 B, x; }2 r( N7 @# a. C. ?/* define some box-drawing characters */ 0 }- |: z: ~/ P" k
#define LEFT_TOP 0xDA
5 M; Y+ k4 T) Y0 ~. \2 P7 P#define RIGHT_TOP 0xBF
# w: k& b" [$ V; E a#define HORIZ 0xC4
2 x' k: E2 y, B! C#define VERT 0xB3
# x5 x2 L2 W V0 B2 `#define LEFT_BOT 0xC0 " J" \8 L/ K! P
#define RIGHT_BOT 0xD9 : W8 ?5 x; ^8 f
int main(void)
# M+ a( b3 e b3 R{
8 ^. E! e+ Q7 o$ `+ T. L3 N& q- jchar i, j; 
( w* |* B: O( p4 N, H; t/ F/* draw the top of the box */ 9 n# T( d" w, w
putchar(LEFT_TOP);
1 W e9 J4 V. Nfor (i=0; i<10; i++)
6 ]/ j) A8 t. a6 @% O3 cputchar(HORIZ); " q& V( M3 n* \
putchar(RIGHT_TOP);
; [, U6 j7 i% Jputchar('\n'); 
& M( y1 ?3 v* o! O* A$ P/* draw the middle */
% O% m. G; x# Mfor (i=0; i<4; i++) 2 S f# ]0 Y+ j1 y
{
9 l2 n: N( r* Y) \; c) l# `putchar(VERT); 0 o% u) Y5 y5 V% O
for (j=0; j<10; j++) ) t) ^! y- i' y0 N2 ]
putchar(' '); ; R8 C1 ~7 b+ O" N6 L& w
putchar(VERT); 3 u/ y6 ?- h' P
putchar('\n');
4 w& {2 Q1 J- p: \+ I8 o9 P5 F} 
1 G8 y) {0 G% K1 j/* draw the bottom */ 5 U2 F& n+ p, I, h8 v2 X+ @4 [+ |1 @
putchar(LEFT_BOT); / N. Q0 M# ], c* X0 `
for (i=0; i<10; i++)
. W1 n7 v- ]! t+ P( s+ vputchar(HORIZ); ( ~9 G6 O+ ^( Y+ }- K7 {; e3 l: g: i
putchar(RIGHT_BOT); " Q# u2 v" A8 {4 o( T3 ]
putchar('\n'); 
& ]/ m8 z. K7 B6 d2 ` }' |& S' ]1 Nreturn 0; ; `+ n! N2 p% ?7 c: [" m
} 4 H# C7 |5 w; N8 J* I
) K4 k+ [; u* t* p8 X

3 X5 h0 [7 {8 N$ t9 t函数名: putenv % U! \8 _' m2 S% m1 w
功能: 把字符串加到当前环境中 * z5 x7 Z0 j+ X1 c5 _
用法: int putenv(char *envvar);
' Y, F: k5 ~4 ~) E' z程序例: ; l2 q2 |2 L" f1 q+ W9 D, y5 D) @& Q2 ?
#include <STDIO.H># Q2 l) e+ ~1 V2 @
#include <STDLIB.H>
* m$ G. G( V8 ?2 D# G#include <ALLOC.H>) M* }% z/ M# X$ q" z* p) Z
#include <STRING.H>6 O- c# ?1 E! c" m+ e7 H- U! U
#include <DOS.H>
4 C$ ?' W/ N5 l, Mint main(void) 4 Y2 m4 ?$ Y" o. s! S& `+ Q
{
: J x8 P1 C5 [* kchar *path, *ptr; 8 ] Z; ]2 ~. O3 O
int i = 0; 
& S* @0 v% K \/ }1 ~4 H+ j/* get the current path environment */ * g# A' F, ^- w$ r. j+ S% U. o2 a
ptr = getenv("PATH"); 1 t: g% |2 H* w
/* set up new path */ 5 D( m: r2 Q* l) Q9 E5 W9 R5 _$ g
path = malloc(strlen(ptr)+15); 3 j% S0 C& ~5 |
strcpy(path,"PATH=");
: T/ u+ R4 G3 B1 n( \( w$ K7 J- xstrcat(path,ptr); " P% u- |: U8 ]: o5 b5 Q0 x
strcat(path,";c:\\temp"); P" j" G: |. K1 L+ { j
/* replace the current path and display current environment */ + V. A3 G% L0 \
putenv(path);
* J2 s& I( v9 z& E: z& n7 `while (environ)
/ e7 R" X X( k3 I" |# oprintf("%s\n",environ[i++]); 
2 i" |7 }( n4 X+ ]5 ?return 0; * _* s# l9 n- _, l
}
6 Z7 J2 o" C5 p. p% t t; E7 M
/ Y, g2 d J( i2 n" Q
2 w2 g- M+ [; e函数名: putimage
4 M5 D+ v8 l7 P/ N! C功能: 在屏幕上输出一个位图
" @& Z' P6 s- P5 h2 E7 V# Z; e用法: void far putimage(int x, int y, void far *bitmap, int op); # Y! Z. w4 g. \& c, P
程序例: + P* k, Q+ j( J; T4 Y
#include <GRAPHICS.H>: D X5 ~ F8 u/ l: @. Q8 J* Z% b
#include <STDLIB.H>
# L* {1 U$ u' r. F#include <STDIO.H>
& w! \% B4 x1 i3 p, H% ?, I#include <CONIO.H>3 r4 [- A$ ^# x0 |3 ^% c
#define ARROW_SIZE 10 
% w' s, S4 b( P5 A- c8 h2 kvoid draw_arrow(int x, int y); / h- e* h, ]. r& {8 J) U
int main(void)
: F s- W- [+ Q& E W{
! g6 Z, @; f* l+ Q( |$ h1 F/* request autodetection */
. @% ]7 _. a% N! l+ V& vint gdriver = DETECT, gmode, errorcode;
9 _9 y3 ~( w# w$ O: [$ L+ v, D) \void *arrow; . b4 u/ Q7 |! B+ J! D! ^
int x, y, maxx; # a4 f* g+ R( N* a) a6 P+ I
unsigned int size; 
5 F+ A% g, [+ V# L6 D/* initialize graphics and local variables */ % T. p' U! D7 Z, Y/ g: r4 E
initgraph(&gdriver, &gmode, ""); 
; y' K6 T, p) T2 p6 s; N, ~( @/* read result of initialization */ $ P* Q" `4 h9 ]0 l# N2 F8 B
errorcode = graphresult();
8 U0 b: |1 |7 n1 V9 Bif (errorcode != grOk) /* an error occurred */
: G! H2 Y6 s6 J. S; Y: Y% m{
# V4 K) `, ?& m! k/ }! s2 H! `printf("Graphics error: %s\n", grapherrormsg(errorcode));
$ |, s* H: M2 K8 p5 Bprintf("Press any key to halt:"); ' f5 ^" |1 h. O
getch(); # M1 J9 o# n* ^3 W) f. H/ y- n+ I
exit(1); /* terminate with an error code */ " A' [+ u8 A, Q2 W* O9 J
} 
 V1 ^0 M& ?5 S0 D$ ymaxx = getmaxx();
6 ~& e; w+ A' O0 ]! H/ n' n rx = 0;
" G+ q1 `8 g( N0 E" Q4 iy = getmaxy() / 2; 6 T) f8 H1 U. M/ d8 n
/* draw the image to be grabbed */
" N& o5 f0 r: n! R' j4 qdraw_arrow(x, y); 
" G+ b$ t& P% g8 S0 |6 y4 n$ q/* calculate the size of the image */ " i7 c- Y j: }' X% ~( A( ]9 o
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
; U" l$ g! N4 j7 z+ p: A0 a/* allocate memory to hold the image */ : Y$ z# z( |$ P% C( y+ }0 H
arrow = malloc(size); % N+ Q; w6 n [/ Z: A6 C
/* grab the image */ 3 T( ~$ u3 s" `. S( ^6 i' \4 S4 r
getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
- X! y* ?+ v3 G/ K- m/* repeat until a key is pressed */
+ j$ [& n3 V+ d: \8 xwhile (!kbhit())
7 t7 K) Q: P. R/ I{ & q! B! V. i- E3 S. k/ P
/* erase old image */
& Q* I2 p7 l( K0 d& m+ aputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
/ ~( `5 T1 |. [4 [, hx += ARROW_SIZE;
# j) g; t2 X. q& r# tif (x >= maxx)
8 K: D3 ~5 Z3 A" u$ a+ H) sx = 0; 1 O. I8 ~& v7 x4 x% b
/* plot new image */ - y- |& x/ }! F+ l3 D* s; K
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); & A$ Y& W& C. r0 r
} 
! Z& O! N) m3 ?7 O/* clean up */ " \ ~" s3 T2 K7 B& }9 V1 `# V
free(arrow); 2 r7 x% Q8 H) B- J
closegraph(); 3 E2 h1 P% O; k* ~! x
return 0; ! I1 v, C9 h( z* {
} 
; m# p7 f7 R3 W4 k& c$ |void draw_arrow(int x, int y)
' V9 ?; d# x& C{
+ J3 ~6 D: O0 D# M* Q/* draw an arrow on the screen */
% ]* J# M1 Q1 hmoveto(x, y); ( y! F& T7 w* r, |1 _
linerel(4*ARROW_SIZE, 0); 5 s% _' b+ b9 P g
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
( O; _, W' g# \3 k- qlinerel(0, 2*ARROW_SIZE);
8 ~( C Z- D }' D5 @& jlinerel(2*ARROW_SIZE, -1*ARROW_SIZE);
% ~5 }- _! c, p9 p2 V2 U. I9 \} 1 q3 b9 p7 E) `

4 V! }% J- l, y3 Z5 [# r% z1 D5 v8 n4 O, n. o! a5 z& y
函数名: putpixel 
7 K- Z! ]+ R( d; x2 [5 {功能: 在指定位置画一像素 4 A$ Z4 F6 H3 J+ e# L9 V- n" }
用法: void far putpixel (int x, int y, int pixelcolor);
* I: d: K( C! ^* [; F r程序例: 
. n4 h9 X2 H* N1 Y7 ?, [& [#include <GRAPHICS.H>: r1 p2 }/ n( r: D" e6 a/ w
#include <STDLIB.H># U: b: ~$ A. w( l+ M6 d( g
#include <STDIO.H> p2 |) a3 \* G: F7 q6 H# p9 }
#include <CONIO.H>6 P: k! ?, Y6 ~
#include <DOS.H>! r/ A0 r+ m+ b3 ^& q0 W' T" [
#define PIXEL_COUNT 1000
: g" _8 W( u }$ f; F6 G+ ~#define DELAY_TIME 100 /* in milliseconds */ # o3 z; v8 Q5 C
int main(void) * S9 _' u" R9 @! E
{ 3 k* `( N. _7 H
/* request autodetection */
0 ]* |0 f5 A; m$ P: g, s: xint gdriver = DETECT, gmode, errorcode; . H# \6 Y6 q2 r4 V+ D! r
int i, x, y, color, maxx, maxy, maxcolor, seed; 
( y1 X$ m: i* v8 v0 u& X* [/* initialize graphics and local variables */
' ] N- c# p9 F/ E2 @initgraph(&gdriver, &gmode, ""); 
2 |, p* v) z& }4 L6 n/* read result of initialization */
! o S! o+ E% F1 |* i$ Ierrorcode = graphresult(); , l O- R. D) U& d
if (errorcode != grOk) /* an error occurred */ 9 j( P. I- f$ u
{ + F. F# C1 ?, r) C7 b: Q6 M& [
printf("Graphics error: %s\n", grapherrormsg(errorcode));
8 h( b- z: U4 @2 a1 w& ?" oprintf("Press any key to halt:");
7 i, D5 A: \. z6 q9 a; {5 Hgetch();
/ [" @/ n9 J- u$ F+ a& O( ?exit(1); /* terminate with an error code */ 6 W; F5 M/ `# i6 U5 A" X. k
} # A: R" t' d, C2 ~ l
maxx = getmaxx() + 1;
, S: s) ]9 i8 xmaxy = getmaxy() + 1; ( \1 m2 U9 c, c! g) I) I
maxcolor = getmaxcolor() + 1; 
9 L* r$ _2 t- }2 b7 h: wwhile (!kbhit())
4 t$ o# N1 D# r' H{
3 `1 z- h* s* Q; k/* seed the random number generator */
1 X' Z: f8 Q D: K0 B2 Fseed = random(32767); 4 L) z7 x6 @, t3 n
srand(seed);
5 K. H1 x4 p7 x2 Z5 z. s# w2 C6 @for (i=0; i<PIXEL_COUNT; { ) G7 L8 ]8 |+ G7 }* W1 K
x = random(maxx); ; b' h* r8 J% S B, _$ A
y = random(maxy); 6 w: d' v4 @: C
color = random(maxcolor); , h8 h4 M( X7 b/ D5 M
putpixel(x, y, color);
4 G# U ~1 y3 K} X4 O( L3 p( Z0 C! f
delay(DELAY_TIME); n" ~6 f3 o; [
srand(seed);
0 u' R8 q& ~2 s; X3 Bfor (i=0; i<PIXEL_COUNT; { F+ Y6 z' u3 g, R
x = random(maxx);
. F2 N' T& w; S7 gy = random(maxy); & {$ i) F$ i# V0 l
color = random(maxcolor);
0 z: c# ]) s) [4 I' Gif (color == getpixel(x, y)) 2 X7 Q' G% g, I! c' e5 J" D& |
putpixel(x, y, 0); 9 U% Q9 }# p G! H9 ^ d
} - T! u* e( s" R8 S' r9 _$ j" ^1 U
} 
+ C! S. g' K8 A+ k+ g% c/* clean up */
getch();
5 i" S8 ?3 w+ Qclosegraph();
/ [) a( a4 A3 G, jreturn 0;
1 q( `* h7 D* c9 m6 N# o}
" l, d* c X K. ?1 b' t
2 Q2 V- A; ^7 I7 }& Z8 _( u1 b8 U* |% g: J) t6 }7 o: K
函数名: puts / D) u- ]% M, H
功能: 送一字符串到流中 + _! s! ?. q, R8 E0 d( @
用法: int puts(char *string); Q6 X4 g, _* d
程序例: 
; v `: C9 { Y$ f/ {6 `: E3 A#include <STDIO.H>
 f* z/ g4 T1 v+ A8 sint main(void)
/ T' Y' n" O% \9 U, g{
- c% v2 w' p* R5 J% Ichar string[] = "This is an example output string\n"; 
+ W3 z2 g s7 g6 k4 v& nputs(string);
/ F: g% ]6 @4 i0 `' ]return 0; 1 } ^' T4 A% q7 k* Y; d' U
} 5 x/ U0 Y! h+ c+ P1 @

4 z$ k+ ~7 p6 s4 G
0 T; R( |" U; [' L0 i函数名: puttext 4 u. x% d- B+ ~& c; `3 W
功能: 将文本从存储区拷贝到屏幕
5 x6 x9 y$ M+ _: u6 z& I: o用法: int puttext(int left, int top, int right, int bottom, void *source);
5 f# R* G4 e% S- Q程序例: 
; a" D c. g1 h4 I! N#include <CONIO.H>8 q* }8 ~% `& ?! r* y |# `
int main(void)
* e J4 F8 o$ u+ k{ / e' u9 G+ \" j3 F5 \
char buffer[512]; 
* q' i# [( v4 w: a4 X& S4 W* u/* put some text to the console */
) ~& U3 J/ v1 E4 p+ ?: H! |7 gclrscr(); ( V0 ^! S$ V: Z* Y Z0 R
gotoxy(20, 12); + G+ L& V1 D3 N8 o( c- X) O* w
cprintf("This is a test. Press any key to continue ...");
; O" ^- D" f2 Q2 `6 O( u5 [getch(); 
0 {4 ?: [- m E/ R- z4 ^0 w/* grab screen contents */ . X9 x% M. v. ]1 _7 l+ l3 i7 i6 r
gettext(20, 12, 36, 21,buffer);
% |& c$ M: r2 B1 G: oclrscr(); 
0 J$ I2 z( i! R/* put selected characters back to the screen */
; Z7 k8 ?7 A, m3 g1 p1 ^) Fgotoxy(20, 12); * k+ ]- v& [: r, G; v
puttext(20, 12, 36, 21, buffer); ; V( U# n1 r& p% l/ z5 r* K5 n D$ `
getch(); 
) n S6 R3 k( O1 S: T7 xreturn 0;
8 F2 i& O- c% G8 u}
& V3 S( a( }- w! ^ w V! Y8 i) |, x# ` w" z, e9 |3 B

 f0 B9 r% n: H9 \函数名: putw 
. Y, H' p# T* j+ H G# g4 Q功能: 把一字符或字送到流中 2 E( x1 T4 T6 P4 b) R& l2 r) Z
用法: int putw(int w, FILE *stream);
3 ?' o5 n F' |( }9 m! A! l% j程序例: 6 T6 u" R$ a# p+ k
#include <STDIO.H>* r8 s9 [+ F- x0 p U1 h
#include <STDLIB.H>
' U: D8 t. |+ v% n! w" S2 ? U#define FNAME "test.$$$" 
8 y, t( h: g# z& u3 C# l, l/ Cint main(void)
( C4 _% N$ y7 e! i{ 8 N5 W* H( j; {; {5 N
FILE *fp; 2 X2 J0 A0 q# z: b0 L
int word; 7 E5 U, R, G L, D4 _9 s) R/ ^5 U, C% A
/* place the word in a file */ 1 m0 _2 u1 ]( v: l Z
fp = fopen(FNAME, "wb");
1 P( A+ M s9 p! ?: }if (fp == NULL) 4 U, ]1 t1 p L9 q
{ ; E" O) N$ t2 Y7 t7 M+ k
printf("Error opening file %s\n", FNAME); * V U4 X1 [% B. v
exit(1); 2 Y: e! [+ O" u L p
} ( ]* p: W# Q b: c
word = 94;
9 V! M6 R4 ?- f2 \; {putw(word,fp);
. g* U( h4 R! m4 G' Wif (ferror(fp)) " j, l @# K' g$ b- r1 \
printf("Error writing to file\n"); + o5 t' j* g! f
else ; [2 T+ T+ ~ _3 U7 d+ ~& J0 @
printf("Successful write\n");
0 h! k, d9 o7 ~4 C# U& ~+ nfclose(fp); 9 o0 n* W" j, ]6 Z% R7 e0 X
/* reopen the file */
' Z0 u& O+ I4 ^4 l! qfp = fopen(FNAME, "rb"); ; }" \ e, b% ~! B. M
if (fp == NULL) . y0 Y* u) P0 ~ F
{ " t3 a6 d3 A* `9 W. ^* \6 H2 l
printf("Error opening file %s\n", FNAME); 0 y5 z9 P: |! k. Y8 j. T ^
exit(1); . p' R @0 X' D/ O- A
} 
6 x( s- J0 ^8 _2 d! h% w- w/* extract the word */ 4 M6 u8 H I5 c3 v
word = getw(fp);
# u/ f& q0 l; L8 z$ o, @3 B _7 tif (ferror(fp)) 3 f. h! s+ Z# R* z, ?% ], c
printf("Error reading file\n"); ' T& K! h! F2 Y1 z( r1 a
else
6 Y! j8 I) Q& [0 \0 @4 Y7 f! }& X- qprintf("Successful read: word = %d\n", word); 
' N. [( M: f% t' g% k/* clean up */ " t, n; U) U: W
fclose(fp);
' u2 N# a2 r% P- qunlink(FNAME); ( |' I3 X' ~0 N
return 0; : ~- m; R( m# Q. k6 f
}