查看: 2683|回复: 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)
) P: b" r& U9 D4 H4 H# ~! h. {putc(msg[i++], stdout);
7 y; ]# c5 r: R; S7 ^0 G: greturn 0; 3 |4 p2 m. B+ d. w" h8 A* s8 H
}
0 [/ o9 m. s3 y3 R& L% C8 {% S3 ^; O1 P( R$ v( {' F) Y
9 v% \, i" Z! v b; f6 Z9 D
函数名: putch 
, g$ Z" { T v7 n+ ?! c功能: 输出字符到控制台
/ N* h! U* Z' C% Q用法: int putch(int ch);
, w4 ~1 I1 s. U/ ~$ j程序例: 
0 ^7 W. p/ l( P4 D) x( ]#include <STDIO.H>
3 ~( C" z; b ?8 \. H. y- e' ?( N; M#include <CONIO.H>
) J' v: _1 _2 \7 @- y# I( o0 |8 mint main(void)
+ }% x& [- k$ e, F. Q3 h{ ' k m! b( @* W( P9 F
char ch = 0; 
( ~5 ?- n: c: _2 ~% F7 uprintf("Input a string:"); , B9 v( a1 @; @- k" l+ m
while ((ch != '\r'))
' B2 ?4 }3 ?& O$ ?3 P{
+ _; ^1 b$ g" K/ o+ ]8 \7 F# g% rch = getch();
6 W% U" w" A: \2 D3 cputch(ch);
2 t' _# N; z# p5 ^0 k% L} * e2 P( Y/ W$ r6 }; W4 y. Q
return 0;
% s; @! b' W' p: f Z. i& h}
, W8 w' J3 L& W1 A
$ |0 ~/ g' o/ D
4 h, |* m5 h+ L3 w! m/ C函数名: putchar 
: E( Q5 ~& z( F9 H功能: 在stdout上输出字符
3 n7 q4 ?9 {# m用法: int putchar(int ch);
* _9 U2 c- g6 B- N程序例: 4 W+ P, h4 }! N2 p$ f, u& }6 [9 ^
#include <STDIO.H>
; G1 Q: c m& l, c% [* a- |8 \/* define some box-drawing characters */
4 n9 h! l! U4 D#define LEFT_TOP 0xDA
4 L# X! P x+ |& [7 h#define RIGHT_TOP 0xBF ! ?8 f/ F7 q5 q9 h! N7 G$ W
#define HORIZ 0xC4 # @1 A7 \0 C" C2 Z
#define VERT 0xB3
% N7 u; ?7 C" t$ j4 N' G#define LEFT_BOT 0xC0
) {7 \+ }* [1 W! s! g4 E' }) R#define RIGHT_BOT 0xD9 
6 ^* A' }& Q! y' s. d) o5 z3 bint main(void) 5 w0 ?& n: J& ?& J/ ]- z$ {5 A! l
{
% J3 F4 W( [" d0 W- Xchar i, j; 
0 _8 Y, i) K7 @0 h" |/* draw the top of the box */ - h6 j3 Y6 g( }
putchar(LEFT_TOP); # _$ k' E N5 J6 C3 b) y p: T
for (i=0; i<10; i++) o5 O; t' M0 w6 b, c
putchar(HORIZ); 6 K/ C$ ], Q* W: B* K/ I
putchar(RIGHT_TOP); 9 U9 R {. r! |! G1 ~& {4 I5 i" H
putchar('\n'); * ?6 _9 V) P0 U* b
/* draw the middle */ 5 y4 y) x- }' r# ~1 S& ^ R% |
for (i=0; i<4; i++)
" h$ Y) `* e& _, M{
7 i% F: _5 S, z8 R, Vputchar(VERT); * a; ]! `3 N& ?7 x3 _+ b8 @
for (j=0; j<10; j++)
 z& T6 F1 N; Z; cputchar(' '); " N4 H0 K: Q" [6 ]. l9 A
putchar(VERT); 4 j, y& Q" T4 B1 P2 H- [. Z
putchar('\n'); 8 o1 B* ]2 w; Y) R) K
} ! n2 m* d: H% h R, K
/* draw the bottom */
( W7 U4 }% i& s& d6 \1 Nputchar(LEFT_BOT); * a: ?) o. v; w. e4 j& V( ~6 X
for (i=0; i<10; i++)
; a( U3 A7 k Y1 r$ ^putchar(HORIZ);
, q# @% Z1 }. O9 O2 gputchar(RIGHT_BOT); - Q8 J- i0 x! }/ L2 L, L
putchar('\n'); 
% ?9 F ]" `! ~! Wreturn 0; - F7 C3 c3 T' W' r5 x
} * i1 `( B" a3 ?' p
/ J- O' v- R% c% f5 U

( k+ f1 B0 h5 I( a' f2 W函数名: putenv 
' [0 n2 h* H% G' R( j功能: 把字符串加到当前环境中
3 n9 |7 s$ y. p" o% z/ I用法: int putenv(char *envvar); 4 j% R* o- V# I0 q8 Y1 Q5 {1 }
程序例: 2 ]4 S& d5 J( c8 u6 E' l
#include <STDIO.H>7 |4 T6 T8 O4 t
#include <STDLIB.H>3 i5 k$ w4 S+ q
#include <ALLOC.H>
/ o, i1 {& i: \& n+ a( X0 k#include <STRING.H>' P7 n6 I- }$ Z- c
#include <DOS.H># Y& z* w" _! {
int main(void) * A1 m. G' K2 V, C, [
{
) s: _3 S* I( g7 J2 k0 Zchar *path, *ptr;
* r. \4 A; w, o- ^ m" iint i = 0; ; @$ _% z- T' F0 d. i
/* get the current path environment */ # Q0 {% e6 ~( \$ U0 ]( e, K0 G/ q
ptr = getenv("PATH"); 
3 M$ F0 t$ |9 y1 N0 O' m8 S/* set up new path */ 0 ^5 Y0 M. Y' T5 W' ^
path = malloc(strlen(ptr)+15);
" Y3 ~1 D! L- y& o! y% ]strcpy(path,"PATH=");
, K9 y' \+ x# Fstrcat(path,ptr); 3 V1 j0 E2 D/ `9 J. a
strcat(path,";c:\\temp"); & m- N# _9 ]! G; L
/* replace the current path and display current environment */ : k$ X: P* h" U0 @+ p( }+ ]9 i
putenv(path);
8 O5 I0 Q9 x7 h$ ?* J; \while (environ)
' c1 M/ c( H6 e6 ~- v4 P& Eprintf("%s\n",environ[i++]); 7 @! Z6 D/ m9 e& P* @
return 0; ; d: ?* y% Y2 W) c% Z
} 9 z- t0 [" {7 Z3 V* C) P, D0 |
3 N$ H& R! ]7 `. B* U
5 t4 `. W. a) Y
函数名: putimage
! j5 I3 k. }! A9 v, }5 I: q功能: 在屏幕上输出一个位图 6 a# f# _9 O) X$ k) z% N
用法: void far putimage(int x, int y, void far *bitmap, int op);
! w" o3 g& i& v' J% j8 v程序例: 
% Z8 m$ D: p1 A5 U! H' i2 s6 {#include <GRAPHICS.H>+ w# u# C! y& w9 W4 }0 r/ q# @
#include <STDLIB.H>
5 K e3 l' A' s#include <STDIO.H>
( m/ S) F6 o* E( A#include <CONIO.H>$ n( V9 ], @- x5 e
#define ARROW_SIZE 10 / b5 M4 X2 q( j5 t, P" f
void draw_arrow(int x, int y); ( f6 i( v1 Z i* d% K
int main(void) 6 |% H; `/ B" Y$ w: o
{
0 E; ~6 W' d( V9 n2 b/ ]/* request autodetection */ 5 u5 K* J" l3 `* B/ B* f! Y
int gdriver = DETECT, gmode, errorcode; ) d% Z9 e" B( ?5 i" o3 ? _
void *arrow; ) d- L. B1 S' H6 |
int x, y, maxx; % S" f/ S# e9 n5 K1 v
unsigned int size; 
! c f3 g [& }0 N/* initialize graphics and local variables */
+ ~& G" S- y; @% S( s2 @) Kinitgraph(&gdriver, &gmode, ""); 
6 v1 h- f8 }4 |- \/* read result of initialization */ 9 e0 D$ u! l3 _- d) U4 t
errorcode = graphresult();
" r: [! V- M% ?$ ]7 k' A) G* lif (errorcode != grOk) /* an error occurred */ % m5 N. p2 v8 @' U0 R0 W
{ 8 v: X3 `5 n% R3 ^: u2 L
printf("Graphics error: %s\n", grapherrormsg(errorcode)); 3 p% l% A n! f5 U1 h
printf("Press any key to halt:"); 8 M! G$ K8 A' b( }9 N$ k0 R6 I2 C! y
getch();
% F# T; G* g1 s$ k7 N+ fexit(1); /* terminate with an error code */
$ j1 O. c8 o5 l! I( W- |7 k} 
" m2 ?7 q" n3 q3 B/ q rmaxx = getmaxx(); * H8 Q: c$ @0 @9 d o, q4 S
x = 0; ; |- J, g Z9 Y- V% L( M' v
y = getmaxy() / 2; . l9 C1 H+ `% m# n1 s
/* draw the image to be grabbed */ 5 [% X" O- K, Y* i: Q! O! C- A
draw_arrow(x, y); 
# g7 k. e9 x9 O5 c9 u/* calculate the size of the image */
! ?& l/ o# W: B @size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
: @) l! b* A9 s0 ?$ v0 ]* h/* allocate memory to hold the image */ 6 ^* g3 |3 j* b
arrow = malloc(size); 1 l1 n. ^/ v+ t2 k
/* grab the image */ 4 ^& V) y# L6 p+ z5 C& V0 i$ a
getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
: m) M9 E/ [1 p' p/* repeat until a key is pressed */
* k0 D$ z6 n' b% s3 Y. o2 \while (!kbhit()) 7 r, x% _# T# d7 r: d0 d" \
{
, ^% S% N0 P5 v/* erase old image */ . l8 y" F B% k q$ |
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); " ], p4 E y# r* p
x += ARROW_SIZE; 0 N: c0 B" E, c: C+ _4 k
if (x >= maxx) # w3 E8 l( \2 o, b
x = 0; " s( y6 |7 e2 A+ `
/* plot new image */
6 c9 H. t8 a% p2 y/ cputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); h H2 [" O( C1 g) p
} 
: U3 \3 s% V0 t+ C/* clean up */
! ~1 f) X; r0 \6 J# ?+ [free(arrow); & ]7 n" c$ _2 w+ V# k+ I' O
closegraph();
) e- j& p6 y% \' Greturn 0;
8 _7 y1 l" T6 q# w$ M: Z+ ~} 
5 @9 h% Q6 K3 a3 u, [/ |8 ^void draw_arrow(int x, int y)
* Z# w' ~7 a% C; }" u% Y' X3 \{
' x4 y5 f- P( T' c2 W9 k/* draw an arrow on the screen */ ; `7 }. D9 L5 d5 M/ ^: ^0 n8 \9 g
moveto(x, y);
7 {8 v* n4 O7 M5 J. g. `# glinerel(4*ARROW_SIZE, 0); % P- N" S7 N9 b! b1 L9 Y$ G7 a
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
0 n5 s5 \( V3 y0 Rlinerel(0, 2*ARROW_SIZE); * c# z+ d1 Q8 j# w1 {0 ^
linerel(2*ARROW_SIZE, -1*ARROW_SIZE); ! A( k& }1 S9 `' Y+ }! ?! o
}
# Z7 G1 @5 U/ d G3 d/ j: E0 i# ?0 f9 B- m
6 k7 c. T+ N8 p' j, e: k
函数名: putpixel 
! q1 e" f( A P2 r) x4 b# U, V功能: 在指定位置画一像素
! ?# Q9 n5 I6 v' {7 h9 I用法: void far putpixel (int x, int y, int pixelcolor); 4 T$ C0 j- h7 v( z9 ]" B
程序例: * o4 j- L( Y1 O9 e9 Z0 e3 [% ?
#include <GRAPHICS.H>; v6 w: [9 U% T7 |& E7 V4 |$ i
#include <STDLIB.H>
( w* q2 x" M# Q( i" o#include <STDIO.H>6 z+ {7 K( }" f
#include <CONIO.H>
. z% x; r4 R# i5 F#include <DOS.H>
6 z( g" V8 b+ s$ E% J, J( M#define PIXEL_COUNT 1000 " k7 N! i# W3 \+ M* c( ]
#define DELAY_TIME 100 /* in milliseconds */ 
: e5 N+ g+ [$ K6 Y" G7 Qint main(void) 0 J$ d6 P: z( u" y/ r
{
. g; i0 |! \5 M; I( S9 X4 m$ X/* request autodetection */ $ T8 n# \3 G6 J$ }+ o% [- ^# n
int gdriver = DETECT, gmode, errorcode;
$ E& g* d8 E$ t9 u" x( r: uint i, x, y, color, maxx, maxy, maxcolor, seed; 
( b7 T+ m3 E" f" Z/* initialize graphics and local variables */
: M+ ^2 \% `5 Minitgraph(&gdriver, &gmode, ""); 
7 |+ q3 [6 k3 ]% r8 [/* read result of initialization */ ! _4 R; n s$ i4 d+ H/ v4 D
errorcode = graphresult();
4 g+ {' u( ?, ?& _: iif (errorcode != grOk) /* an error occurred */ # [2 G! m4 X- y$ ~
{ - e$ S. Z; \7 @: Q e7 g
printf("Graphics error: %s\n", grapherrormsg(errorcode));
6 d9 P( @: F% h! h' c- xprintf("Press any key to halt:");
8 s! T" V! n9 P" H7 W* qgetch();
6 x9 S$ H- t- p4 D0 a. fexit(1); /* terminate with an error code */ " q, J8 h( q: [4 c* F; @" i
} 3 @6 q P& ~/ }; K) X. O
maxx = getmaxx() + 1; # A7 T1 T. ?' W4 q
maxy = getmaxy() + 1; , G w% E% d. l1 s$ M6 ^" u
maxcolor = getmaxcolor() + 1; 
, B2 N4 |: a- ^: cwhile (!kbhit()) % D& k' D. K/ R# c8 H
{
$ ?. _$ u( P6 ?9 N& e/* seed the random number generator */ : F) K+ z7 v K; R" r: S# \( b
seed = random(32767); " I8 t/ f- U. _/ i8 {
srand(seed); " T8 R* \& f$ M9 d3 }2 p
for (i=0; i<PIXEL_COUNT; { 7 x( @; w# f: `
x = random(maxx); " j1 L- @4 K" V
y = random(maxy); 1 s3 i% L6 u5 d; m/ q
color = random(maxcolor); 6 v" \" o2 W) `0 ~6 L7 K
putpixel(x, y, color);
1 l1 U3 H2 t7 [+ d} 
0 t# c: x5 x# E) Cdelay(DELAY_TIME); 5 E! c) }' D% J
srand(seed); 3 m9 E6 L/ m& C
for (i=0; i<PIXEL_COUNT; {
( M2 v% y6 _; B$ nx = random(maxx); 2 N! e( Q7 y' u! {9 d
y = random(maxy);
5 V ?/ f% q8 L& t, h& P1 Gcolor = random(maxcolor);
& Y9 {4 X9 F( x& yif (color == getpixel(x, y)) ' H' }$ @! d0 ]% W* d% @- ]
putpixel(x, y, 0);
$ Q0 I R- X- R0 Q/ y7 L}
, L7 S5 r- @$ w+ b5 d E} ( ?/ w" ? _+ _) o1 {9 q ]2 h" z
/* clean up */ 4 N5 A7 L. {' B1 O4 u3 Q$ L F
getch();
! F# ^+ R* ]7 l+ eclosegraph();
3 w K) U! `' a* M& P0 b; ^3 K4 O7 Qreturn 0;
; E8 u0 y4 V$ p, K5 \" @% I9 m}
0 P/ I% A4 Q% L4 p
' \0 M' n0 d- R8 r
" {3 l3 }0 @. O+ o函数名: puts 
) `! u+ j! V, P! j, T& D功能: 送一字符串到流中
) ]% e" `4 x! { n8 j用法: int puts(char *string); - X- @( `0 @$ b8 n; y* c" X
程序例: 
% x! P1 U9 Z" @; g( D#include <STDIO.H>
' i9 S. U( K4 ^# E) k: ? _' gint main(void)
% Q4 [5 W4 ^3 S- w{ $ D9 J# v! [1 c# w, v
char string[] = "This is an example output string\n"; 
* |; l3 A) k1 M) B+ r- C1 \3 U+ g0 Wputs(string);
- V E2 V' |* v: X& y& ~. r$ ~return 0;
$ H+ \* d# a' x} % s6 c' |& z" g e' }

 A& h9 Y8 A! s3 x" q/ k7 O3 a( ~, Z, c# z
函数名: puttext 
' ^" X3 f+ z! B H4 T" D4 N; j功能: 将文本从存储区拷贝到屏幕 5 F) m( a! X P) j9 F6 c
用法: int puttext(int left, int top, int right, int bottom, void *source); 3 \5 Z& \* q6 A! p5 ^
程序例: " c5 j$ f, Z: W/ e' W/ e* L' w
#include <CONIO.H>( T3 E# o. j# w% v% X
int main(void)
4 u& o s) a- r4 V; ^9 |! s{
% r3 H; b2 L) D& M% `. fchar buffer[512]; 8 g; `) e; l. m
/* put some text to the console */ 0 o; f7 H3 D- ]9 q3 K
clrscr();
# Y- K% Z$ g( d: E; tgotoxy(20, 12);
/ ]: z" ?+ C' v. `cprintf("This is a test. Press any key to continue ...");
* D& p& ~& a- ]" Z: }9 ngetch(); 4 d X% n+ g. c+ T3 Q1 K* J
/* grab screen contents */ # @/ Z% L3 z1 D# }# O& Y$ G
gettext(20, 12, 36, 21,buffer);
% S# ^4 q2 G6 z# s& a7 P$ X Fclrscr(); 
' s9 ~" y# {- V6 S) Y1 P/* put selected characters back to the screen */
7 ]+ E+ l5 w# b& f6 agotoxy(20, 12);
% T/ ]# T) W8 C0 wputtext(20, 12, 36, 21, buffer); 0 V' X3 x1 `# H5 u X+ r8 Q! _
getch(); 
. c" r1 K, P% N2 T' J/ H6 ~5 [return 0; 1 R' \8 y* G; e3 L- p
} 2 S2 p3 I9 o8 @% x8 i

3 s* F) G4 O1 `/ O% @/ F" w% R. J
1 i. P8 X6 P! J函数名: putw : Y; \! |1 {0 Q% A9 Z0 `
功能: 把一字符或字送到流中 * w# Y$ A/ K5 R/ t! k
用法: int putw(int w, FILE *stream);
6 X' K0 @& Z$ S p6 j3 R! l程序例: 5 |8 H0 f7 b9 |9 E3 U
#include <STDIO.H>
) g& v: V6 `# x" i6 A( C2 x#include <STDLIB.H>
0 w. y$ i; w' e1 l#define FNAME "test.$$$" 
6 s$ F9 _3 T. v$ i" \$ i( Xint main(void) 4 x% z9 U" O5 ?/ G/ l+ x @( J
{ 3 g' L! X }: \4 N$ W
FILE *fp; 2 V9 [' z/ F& k
int word; , ?0 y3 g y3 B% e
/* place the word in a file */
 F2 k. }2 n8 e8 gfp = fopen(FNAME, "wb");
; E8 P8 y4 B& k7 w! Tif (fp == NULL) - p+ Q8 l g1 {3 I
{ 4 y9 m) {6 W9 k% G5 H
printf("Error opening file %s\n", FNAME); . ? I: g0 [+ j s. i- _/ `
exit(1);
3 V; P T, n' F} 8 ]) j; {; g6 I5 Y V5 g
word = 94; % V/ X0 g: @; J
putw(word,fp);
' H- X* z, O0 U9 ]4 d: ]0 iif (ferror(fp))
: e, X( b% S+ f6 t* i3 V) yprintf("Error writing to file\n");
0 C" k5 w2 B0 _: B/ |/ B4 C7 Relse
9 \+ I9 t* ^, [5 x, k' [. nprintf("Successful write\n");
2 n& v6 E3 q+ Pfclose(fp); 
( g% x, A+ t5 `4 ^$ g" y7 s( p. u/* reopen the file */
+ \4 h/ D/ |/ T- o% hfp = fopen(FNAME, "rb");
; r* M2 m4 |, |- U8 }/ k/ Tif (fp == NULL) - M$ r0 g8 G! k2 r. y) K, Z) u
{
- [1 s3 {6 R: k8 Fprintf("Error opening file %s\n", FNAME);
+ ^, A3 ^9 b& x. lexit(1); ( m5 o9 l {9 v) `9 c
} * b( A; k3 v+ ?
/* extract the word */ ' ^& O6 U5 X4 L3 c
word = getw(fp);
6 A7 I# i0 G& R7 ]# m( Z. u% t D8 |if (ferror(fp))
. g* k* u5 e. ^; _- uprintf("Error reading file\n");
7 T( _, j3 P! ~else 4 d' v; {6 ~& f" ?6 T
printf("Successful read: word = %d\n", word); $ G% |' x# \9 x _- F& c5 R
/* clean up */ : U2 R% U" O5 ]2 M: f. u' N+ w, W
fclose(fp);
3 Z7 I. @' m6 |; I; s3 Bunlink(FNAME); # l/ b2 V8 A$ h6 z( d
return 0;
1 r, C* r8 |! L* F9 y0 ]( f}