查看: 2687|回复: 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)
0 k- f4 y# H% c: }: ?6 Y$ bputc(msg[i++], stdout); 3 S2 D2 {2 [# y
return 0; 4 i/ P* ^7 N, r+ W3 f
}
4 _* z% ^- q2 B/ c/ p! S8 o) X k* Y7 f- Z1 K) [

4 q) j* Q, U' {0 t y: @5 E函数名: putch 
, E) _+ t, k3 @+ x( o: s7 [+ \( [功能: 输出字符到控制台 / W- ^/ c( z' t5 Q" o- M" s- r" M
用法: int putch(int ch); * M" j5 a: \5 x1 @
程序例: 2 G) F0 i* t; ?- o
#include <STDIO.H>+ U% }5 D5 K3 {! @ L8 O0 G
#include <CONIO.H>5 {4 \" l* r" {/ D# {
int main(void) 7 Y- O' W: s. p( ~# f/ F; ^3 I
{
$ J4 t4 ]& I, q0 Ochar ch = 0; 4 H! I2 z) y; k( w) Z
printf("Input a string:"); ) @3 R! U& ~8 Z) s
while ((ch != '\r'))
 q. H6 o+ f) F) M# v! {{
$ S" p9 N/ }) K) t& x4 g/ ^3 Jch = getch(); 0 w. S: i7 ?* r: W" y
putch(ch); # D9 E/ ?( m. @) t: H- B
} 3 \" b$ M7 u/ e' I; e' F7 h* X9 |+ a
return 0;
" I! r& X3 x1 |} + I% N% D4 k# L! A2 a

, c1 {$ h5 E. y# a# ?4 x3 k
1 W- y% E D p" l/ V+ S函数名: putchar % {+ g3 ]! ?( D1 {3 q! A
功能: 在stdout上输出字符 + Z: f. P. x- k7 i5 Y
用法: int putchar(int ch);
3 z4 H$ x, a* F3 f+ D程序例: 
/ y. F8 G M& R) A; e% d#include <STDIO.H>
/ `; b0 h, {8 \, b5 ]) V/ K/* define some box-drawing characters */
7 e7 R. Q9 t$ X! z- m# t#define LEFT_TOP 0xDA 2 P. d7 I% F5 Y
#define RIGHT_TOP 0xBF
* l% d2 K5 M' G. z) w#define HORIZ 0xC4 , A6 r6 U$ {2 P4 c7 t
#define VERT 0xB3
- }$ Q) F* N3 L#define LEFT_BOT 0xC0
 o/ ]9 X/ A0 | x! w# G#define RIGHT_BOT 0xD9 
( [& W7 B0 a" z: k+ Uint main(void) 8 U9 u, P" V. ?1 K* `3 A8 j
{ ' ?# o" h& L8 |2 l$ a% t( n/ e" B
char i, j; . s( O' x; f) D/ t
/* draw the top of the box */ , W, ^6 Z0 }6 }* ?
putchar(LEFT_TOP); # r1 d: z' e4 K
for (i=0; i<10; i++)
: z: M6 b7 ^' V( E b. [2 ?putchar(HORIZ); C# \/ l' N1 s3 B5 Y
putchar(RIGHT_TOP); , P0 ~2 j y! L
putchar('\n'); 7 H: g6 d8 j* }2 b* G" _0 Q" _0 x* v* J
/* draw the middle */ $ t& H" z( r& x9 J$ H
for (i=0; i<4; i++)
 P U8 e/ z- ?, ~0 p3 ?. p/ }{
( ]. c& E% h5 F3 |putchar(VERT);
' R: H) f# K+ g8 dfor (j=0; j<10; j++)
( s6 l0 d' a5 [" P& j$ P! cputchar(' '); 8 n8 w6 e- ~& E& o/ g
putchar(VERT); ( b' T$ S* h- }# \& O: r2 B
putchar('\n');
8 |8 `' p+ |1 T4 s* h} ! g6 W5 i% n' `" }
/* draw the bottom */ k* G& A! i5 y _2 D- s
putchar(LEFT_BOT); / y. y6 ^6 @( k' O: S
for (i=0; i<10; i++) . P7 k& L8 Z) D" _0 X, o; D1 d
putchar(HORIZ);
/ a9 K# G$ f; \, Y$ hputchar(RIGHT_BOT); 2 b v ^4 V" i, H3 r a, i @5 ]% z
putchar('\n'); 
) V" J: ?" C2 t; U. C- C4 E5 Preturn 0;
- o/ z: i/ W. I5 o+ n}
6 J7 k0 R3 X' g1 q8 s0 K h7 K# `( d

 u' o3 O3 d& q8 w# h函数名: putenv 
5 o7 D V8 p2 H3 D8 a" N4 i6 r( R功能: 把字符串加到当前环境中 * Q4 I" }8 f" J$ L
用法: int putenv(char *envvar); ! F X7 v3 L$ X( V
程序例: 5 n' T9 X, v( n, Q5 X% Z
#include <STDIO.H># i2 r: ]( S9 H/ g1 e
#include <STDLIB.H>- s& h& v4 e" _; ]% ^
#include <ALLOC.H>. W$ z( m9 s9 Q. \6 `9 t
#include <STRING.H>6 K! ^+ u9 ~4 l1 E! U6 K
#include <DOS.H>- @7 q+ W& D" W8 A* q4 z+ T
int main(void) 9 z+ z2 `* J n0 L4 _0 H) W
{ 5 e$ n0 i. l" a3 C0 J0 w# O
char *path, *ptr;
. e4 q9 ^/ L9 D/ \int i = 0; 
. ?4 Y) V' B5 S9 p# \/* get the current path environment */
% D6 ~" t! ^$ l$ m& V. o6 fptr = getenv("PATH"); 
6 i3 G% u1 C: x, _0 ^* |2 V* r( c/* set up new path */
/ a- Q* o( p# c) J( T" z apath = malloc(strlen(ptr)+15); % S" _7 A# @ M) R
strcpy(path,"PATH=");
5 D1 H* _& v' J; Ostrcat(path,ptr);
3 B4 P7 x( |- P6 ?" ~# |strcat(path,";c:\\temp"); 
3 j' q0 z8 E2 z1 w/* replace the current path and display current environment */ ; Q6 v9 L4 n8 Z
putenv(path); ) G2 X, g9 [; h; Y! Z& [
while (environ) 3 O; C& F% o- e5 o. n$ \
printf("%s\n",environ[i++]); 
( t3 U, Y1 X0 l7 Dreturn 0;
+ f0 w; T: R: M; n, A9 J}
6 k0 j: |4 k) M) O+ e: o
, S. \4 K9 ` n1 l. x$ i( t" C5 [7 R0 n
函数名: putimage + a( l' A$ P0 }
功能: 在屏幕上输出一个位图
* _5 m# n9 n3 \+ |% T用法: void far putimage(int x, int y, void far *bitmap, int op); 2 e5 C5 l3 g. y6 a+ a" P, L/ O
程序例: - M3 X3 r) h/ [4 M+ f
#include <GRAPHICS.H>( s) @5 E0 w5 b% G
#include <STDLIB.H>
& j' W: ]7 D9 ]1 a. n#include <STDIO.H>" Y$ X. h0 T! w' ?& h% R, l& u) R
#include <CONIO.H>+ e1 C3 I! O. ?# \$ `0 F
#define ARROW_SIZE 10 
& Z$ i& m/ X9 Q4 @void draw_arrow(int x, int y); 
/ v# E+ ~6 g4 F b, _( a& J( H$ ~int main(void)
) V6 v1 b) x K. H7 r$ q4 H{ 7 z+ U& b' \" f2 q
/* request autodetection */ , s$ [) \2 F( g# l% |$ [
int gdriver = DETECT, gmode, errorcode;
4 C% }) a9 G. F, }, a$ j- M9 \* fvoid *arrow; * V+ @, w& G5 W( s0 E
int x, y, maxx; + L$ j( i" {7 g* v+ {
unsigned int size; 7 d- o4 O% i7 U A1 H) t. S
/* initialize graphics and local variables */
4 V. J! o. `. N* K$ ginitgraph(&gdriver, &gmode, ""); 
 L. w& W* P, U; r9 h% l/ d9 |* w/* read result of initialization */
7 v4 C5 a3 x( } j* e7 K" rerrorcode = graphresult(); }; `8 A) D; H0 J8 T2 P
if (errorcode != grOk) /* an error occurred */ # g$ B' m# i: i2 z% X
{
. H* Y; a4 Q$ e! ?! h oprintf("Graphics error: %s\n", grapherrormsg(errorcode));
( Z9 M7 p( l5 H/ d1 b1 _5 iprintf("Press any key to halt:");
9 n8 Y1 B+ a3 e2 `getch(); 0 J" H; Z K9 S q
exit(1); /* terminate with an error code */
& |& r0 A: w" d2 `0 z3 n- N} 
3 F4 t) f8 }% b pmaxx = getmaxx(); 4 [) H- a' x. o" x6 p8 g
x = 0; 1 u% F0 I) V9 T, [ f" q- G W2 v! ^1 P. W
y = getmaxy() / 2; 0 \# }( B6 F, w+ W
/* draw the image to be grabbed */
! ]/ D, {) n$ @5 W& qdraw_arrow(x, y); - l; Y1 m3 r9 T* N5 l
/* calculate the size of the image */
8 |" Q1 I' k" v& W8 ?size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); ! Y3 X# O8 y* d
/* allocate memory to hold the image */
3 r# R3 Q. k* Earrow = malloc(size); 
 r! |& ~$ t9 C @6 q/ ~& \# o/* grab the image */
$ ]5 ^' i/ g, t9 O( G/ L3 Egetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 2 E9 @- ?. M9 B; _+ U3 c. O D' I n
/* repeat until a key is pressed */ 5 e$ C4 @' P2 e5 j
while (!kbhit()) o) G7 ^" [( s8 f6 N5 e
{
 ^; c/ Y* {: Y0 {+ h0 h- R) c/* erase old image */ - d7 _' I- S. U
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
, }% A1 o5 [) ?; Z2 Y' ^x += ARROW_SIZE;
& o2 Q$ b+ K* h9 aif (x >= maxx) 3 v* {1 R3 w0 |$ w- k: I3 k
x = 0; ) N) E+ `, f; ?/ b2 M; M4 E
/* plot new image */
: Q: |6 p; b) C! r( w$ z1 eputimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
% j- w" f7 Z8 k4 v# B* c} l- |) W8 \- N$ X1 Z
/* clean up */ & ]2 m m r1 v6 R# @
free(arrow);
0 p$ H5 M9 u1 g. q$ b: ]closegraph();
 l, Q8 S( N! ]) greturn 0; w7 V4 U# j4 d
} 6 l) i4 S, v0 p% @
void draw_arrow(int x, int y) - U7 `1 j k2 T" ~' m
{
+ ]* X4 n! E5 n4 ~- v% \* P/* draw an arrow on the screen */
. y/ [$ o$ U! \7 l- w3 Ymoveto(x, y); 6 M' y! r; N* _; i- Z) K7 I4 r1 q
linerel(4*ARROW_SIZE, 0);
6 u, d- j0 j! O/ s, Clinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); ; A: W; ?- w" F% n6 C0 i! x
linerel(0, 2*ARROW_SIZE); Y5 c- O% A; j0 S9 Z* Z9 q+ O. U
linerel(2*ARROW_SIZE, -1*ARROW_SIZE);
! t5 A" z/ g" @* k} ! a+ O8 o) h- k5 w! w) K7 {
% e0 i$ f. S& n/ ^. h
1 Z, _& h$ o5 W7 m8 ^7 o: p4 a- d4 Y6 Y
函数名: putpixel 
4 }! N+ E5 t$ Q功能: 在指定位置画一像素 ) f( G. t9 o# a( k
用法: void far putpixel (int x, int y, int pixelcolor); ! x, P) F8 ]0 Y$ l/ }
程序例: 
3 } A* V' K# I#include <GRAPHICS.H>- ?: i1 r; ~$ J" @) ~5 \" ^
#include <STDLIB.H>% V7 U! |2 I+ L- o& S. z5 w
#include <STDIO.H># o- _2 l5 _& y, M9 u9 G0 k4 o8 J
#include <CONIO.H>
4 M% G7 @, i3 s: D/ n#include <DOS.H>& E! A5 L) j2 K
#define PIXEL_COUNT 1000 # t! n% W* e) m9 q( O) x8 z
#define DELAY_TIME 100 /* in milliseconds */ 
; w& I9 s" m8 B- p( w7 z# qint main(void)
( V1 c; I, r2 O8 k4 r( F{
* e! U0 Y: @( h/ s! q/* request autodetection */
+ r' O% x( |2 X) d' Fint gdriver = DETECT, gmode, errorcode;
+ I# m" ]2 r h0 N: ?! i0 d$ N, m1 Sint i, x, y, color, maxx, maxy, maxcolor, seed; ) ?8 M' j7 l, h% F! P8 ^8 X
/* initialize graphics and local variables */ 8 J4 m' {! s$ i$ a
initgraph(&gdriver, &gmode, ""); 
/ y$ a: W: `$ V9 Y r* }" p/* read result of initialization */ ; |! I/ h! z/ u6 J
errorcode = graphresult();
8 z5 b4 r. A* uif (errorcode != grOk) /* an error occurred */
$ C" f! g1 S3 N+ h8 C# X V0 B$ ^+ k{
1 M2 I# i" M5 f- g8 N; w9 M Fprintf("Graphics error: %s\n", grapherrormsg(errorcode));
* Y* M+ Y' Q) `printf("Press any key to halt:");
* [* C D: b. X0 m: s. `getch();
# ~9 v5 ]5 `) G( Uexit(1); /* terminate with an error code */ 1 d" F7 T9 @& y; K+ w% V
} 
; w" b( G) B* a& {7 C3 Amaxx = getmaxx() + 1; " B: c6 c% }: N
maxy = getmaxy() + 1;
2 ?; N3 M3 m0 o# j9 H: J- |9 Nmaxcolor = getmaxcolor() + 1; 
$ j3 e- x# F! N; I* Ywhile (!kbhit()) 0 n# R7 [ v. {* e0 Z2 u- t
{
$ ^) v' [% ^9 e5 l/* seed the random number generator */
5 j: l+ x8 A2 o2 t" \+ {0 w( \seed = random(32767); + g% z; n6 m% P* k6 [
srand(seed); ' I6 H. _- b; Q6 ?; K
for (i=0; i<PIXEL_COUNT; {
# P: @( l+ H6 px = random(maxx); 6 b7 l V1 J5 e
y = random(maxy); ; v4 ]8 m9 b, p: o W# U# I) @
color = random(maxcolor);
& j |; T# r- _+ [putpixel(x, y, color); l) a7 [" D4 {/ A1 L6 ]% R
} 8 Y8 T7 F5 Q. Y, m4 F5 @
delay(DELAY_TIME);
$ j- y, Z, z3 E% Psrand(seed); * m9 ]% B8 e/ J; v: U
for (i=0; i<PIXEL_COUNT; {
9 W# ~+ U5 F) F$ F/ Ux = random(maxx);
5 Y( B( P) I0 yy = random(maxy); ; y8 p1 f( s1 j- Y7 |" x
color = random(maxcolor); ) z! J9 @+ _. b! e& B$ W
if (color == getpixel(x, y)) " ?. y- g( r) x/ A6 O1 ^; @; p
putpixel(x, y, 0);
 { h9 c7 h4 f$ y( S& H: ?}
/ P1 Z/ w: O3 C1 ~} a% } f- e: ~- g
/* clean up */ : W& K) e9 U' k
getch();
8 q+ x$ F* `" C; nclosegraph(); 5 d( t, u+ }/ K, j! P
return 0; 4 ?: \, C# C# x6 b
} * p9 q$ C; y/ V/ t

2 C' P; Y$ {* W! T+ w" y( ~/ O* P, P! ?; ~9 ~7 x4 p& L- o
函数名: puts 
1 x2 D+ x9 M0 C1 i1 D2 N+ I- U功能: 送一字符串到流中 ' ~: b% }4 V, r$ G$ Q9 T
用法: int puts(char *string); 4 C8 [& X/ o& n2 f/ q) u
程序例: 
5 n& ]- V! ?$ E1 u/ ~8 q#include <STDIO.H>) x G% N/ k0 [/ @2 H
int main(void)
; K* K! Q9 W" Q3 R" w{
1 L# \3 K8 ^! S3 s) X3 Lchar string[] = "This is an example output string\n"; ' c8 U6 q3 D7 ^5 I+ l
puts(string);
" z+ X* f9 V' `2 Oreturn 0;
2 P0 g2 b4 n4 i$ k# v) V} 
/ c& J$ q8 X4 C! g1 E8 [6 q
+ Y9 r- T( ]5 g+ {; C: q8 w& q1 N, s) h6 F, g
函数名: puttext 
9 t4 L7 m! |+ G; C9 L4 ^: d$ T" y功能: 将文本从存储区拷贝到屏幕
5 J0 R, r% j& p' v! z3 o用法: int puttext(int left, int top, int right, int bottom, void *source);
" L! _" T1 D6 ?% V8 z程序例: 
 a2 N& }6 m0 M" Y" ^#include <CONIO.H>; ^$ Y4 M8 `9 v' X4 A3 S0 l+ u
int main(void) 7 }" U, u4 o; v# Q4 }
{
) r& z% H. m0 {char buffer[512]; / w6 j3 N( ~$ |4 `/ ~
/* put some text to the console */ ; K' q0 C! M3 i, r
clrscr(); " H h5 n* V8 Z
gotoxy(20, 12);
+ c3 G$ }0 C3 k# I5 [cprintf("This is a test. Press any key to continue ...");
, `9 p- `+ I4 y- Pgetch(); 
 D9 a {3 e3 r8 s/ h2 r/* grab screen contents */ 3 Q1 ?% K% V7 Z2 g
gettext(20, 12, 36, 21,buffer);
7 T( Y7 s1 i, H* D" a1 x! ?* Dclrscr(); , Z. H7 N' R" I7 L5 f% d1 d. l
/* put selected characters back to the screen */
1 E4 z- A; H' R: M6 Mgotoxy(20, 12); 8 N; ?8 F9 C. r( E) I2 R9 n- M6 ^
puttext(20, 12, 36, 21, buffer); / E# t# _0 m0 ~2 R4 {, m7 g* Q" s
getch(); 
9 J/ r% _& W% ]4 r. ^return 0; 8 [; ]6 t; W, {. k1 G
}
/ M+ m2 n ^, t2 U# f$ L9 \
8 E7 e( g5 _3 B. E: p6 ~$ b. P
函数名: putw 
; P6 m% Q( P9 d) r x9 u功能: 把一字符或字送到流中 / Q& }" K) U+ d+ _3 u0 u* A
用法: int putw(int w, FILE *stream); , K/ |/ B* s' }0 V$ l* W: E; S* H
程序例: 3 y! Z, b+ j: X5 Q6 `( L O6 O
#include <STDIO.H>
* f2 x& z- Q; m, a3 p8 _2 e#include <STDLIB.H>4 v( k' J2 ?8 t* {2 n: V9 C
#define FNAME "test.$$$" - F0 K* r3 Y5 C1 e# w# }2 Z
int main(void) 9 V$ v! ?" w2 b- r8 Y
{ 2 Z) [# X$ C0 a8 `5 e' c
FILE *fp; 9 u2 h. z+ a7 o" b. h
int word; ! ~3 P3 |' U2 x3 h, m2 r
/* place the word in a file */
& j. [) P% S4 B! X6 Efp = fopen(FNAME, "wb"); ! W8 {# V' \) }: Y8 V v( R4 c: W
if (fp == NULL) 4 [- G& x# ^0 `+ g, ~8 B, Y
{
% H; C9 d' c% x$ T7 d5 D# `% ~+ iprintf("Error opening file %s\n", FNAME);
. `& T7 |3 `. d% A& [ y' ?9 Iexit(1); , y4 Z* k) f: o0 N+ @
} " i" B0 M$ D, ~7 z5 [# d3 P% a
word = 94; : ?0 d/ a- K a' O& ?
putw(word,fp); ( {- t% ]& @0 Q, A% ?4 ?
if (ferror(fp))
3 ^3 E- x9 r' kprintf("Error writing to file\n");
* d% X9 L* Y5 n7 gelse 5 d& F1 s0 Y9 R: Q, C
printf("Successful write\n"); - Q6 E9 g, J, y8 n& {' Y e7 \( u" B
fclose(fp); - a! X2 P3 ?1 b$ w
/* reopen the file */ ' w7 x, o$ N6 h- F! h9 t9 O
fp = fopen(FNAME, "rb"); $ a; y! s# L/ B
if (fp == NULL) ' d# M" ` N6 d( j" L$ Z. N
{
- Z% m) [: M# N( w; H+ A8 L$ dprintf("Error opening file %s\n", FNAME);
 o/ K! C' d' U6 H9 L: `3 I5 I9 V' Jexit(1); ; B, G2 r- v, |* P& c
} 
7 _ E f: l/ j3 ]- [/* extract the word */ 7 y5 r' D, Q* ]2 y$ |
word = getw(fp); 6 s8 \$ U, J8 W% Z0 u$ C! c
if (ferror(fp)) 6 g' w' y* W" O+ z7 a
printf("Error reading file\n");
2 ~" |' |2 [: j" Telse 9 R0 k9 D# l0 {* |6 l$ V/ o
printf("Successful read: word = %d\n", word); 9 p$ P8 O T! |7 g
/* clean up */
7 k" o* j: D9 S2 u" k+ gfclose(fp);
9 ]/ d f; H l7 Z5 munlink(FNAME); M2 L2 {/ u; B* a
return 0; 9 k* u! F6 x1 w' n3 R! a" o& E3 v
}