查看: 2781|回复: 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 Z$ P5 J6 m/ f# h+ m( \9 }putc(msg[i++], stdout);
) J4 y) K: o# g2 K. c dreturn 0; 2 {* e7 E8 G4 M- S4 p C+ p0 M0 W9 H
} & H) z+ q1 x5 H+ M$ m
. Q) u: l2 u, u/ j) J
4 A8 t$ K% E/ M; b0 |9 k
函数名: putch ( K$ n. J/ Q- Z# ]" @
功能: 输出字符到控制台
% I$ _, h& @ M1 \8 \+ d7 c用法: int putch(int ch);
+ m# F: r1 d- w* ?程序例: 
# H7 W4 F4 z- T; U2 y- H7 Q1 d#include <STDIO.H>
9 E" n6 V0 w) ^: O) y#include <CONIO.H>
. D R' z" a- wint main(void)
6 c2 ~% Y6 R* V( O$ n. M{
& r* N. P Z! b1 kchar ch = 0; % G1 Y4 I+ \$ L. n. R e
printf("Input a string:"); ) O. P. r/ d3 S3 E* `
while ((ch != '\r')) ; X8 C$ |2 p; n+ P
{
/ R1 ^3 T6 c" P) N; X a* z$ Tch = getch(); 0 T6 M. w+ z% J$ u$ q, [1 z2 s& T
putch(ch);
& p# y# ]% Z1 a$ d. F ^} - b+ i3 a5 x0 q7 `7 k k
return 0; ) V3 y- p. H& ^) V8 ~8 K
}
- n+ ?3 Q( R, h) F: l! j; E/ l4 i+ F& ?& [8 E# A

. T, |/ X7 A' L, H: v; J函数名: putchar ! b9 f: L6 b9 R8 T* L
功能: 在stdout上输出字符 . B8 m- Y: h3 O% g' R/ ^
用法: int putchar(int ch); ' w! Y# \' H" G& T% x0 H. y
程序例: / |! @. w4 ~/ n- ^- | M
#include <STDIO.H>
) R4 m- f3 X. w# @/* define some box-drawing characters */
6 r! x4 ^& |/ J0 C' o& M#define LEFT_TOP 0xDA
2 j0 _. \7 g1 d7 y7 Y- `6 P9 o/ D& A#define RIGHT_TOP 0xBF ; j- S2 P: R# ?1 {. _2 K
#define HORIZ 0xC4 7 ~/ G5 B/ z8 _, k
#define VERT 0xB3
0 B% a0 A! k( _8 V( g* ?" S#define LEFT_BOT 0xC0 8 \$ O/ u% E/ Z6 i9 G
#define RIGHT_BOT 0xD9 
. y5 F, M; C+ B0 H% T( @1 Xint main(void)
3 Q: f, U0 T/ f- C8 {+ W{
- e4 ]3 i" V( x( ^5 S7 ]" ?1 F- cchar i, j; v& ]$ ^' _0 U
/* draw the top of the box */
8 R& T8 q- l" j' K- c, I f. Rputchar(LEFT_TOP);
* y5 y1 e w; w5 Z. I, E$ vfor (i=0; i<10; i++)
- Q* q; u) B3 L$ f. G. Hputchar(HORIZ); $ n) Z# K9 }7 e6 q9 ?: u0 ~
putchar(RIGHT_TOP); ; R" k7 v5 C/ E$ t! F4 V) D( L
putchar('\n'); 4 w3 \" X' q' z7 E
/* draw the middle */ : _& V l; y" o7 `. @( F2 a3 j" o
for (i=0; i<4; i++)
& x" ~% b y2 @4 H5 h7 f0 @{ ( e9 I$ A& a6 y
putchar(VERT); + C5 B7 s! o5 x, Z: h
for (j=0; j<10; j++)
7 X4 f6 _5 I* [' w" o8 U% qputchar(' ');
1 h3 Z: [7 A0 Y9 @* Mputchar(VERT); 4 V& t. w. G" ^8 @+ B
putchar('\n'); ' F/ D: ]8 s+ w' I
} 
4 v6 Y1 b4 ?& l/* draw the bottom */ & r" c: U% G) I* n$ X
putchar(LEFT_BOT);
7 i* m( e9 q& [3 z( X2 _2 p7 p/ Yfor (i=0; i<10; i++)
! F# U" i7 u/ e- ]2 c/ }putchar(HORIZ); 0 K1 G6 X2 E5 L2 L9 g2 z: N
putchar(RIGHT_BOT); 3 k% |9 i' P+ e8 x- e
putchar('\n'); 9 l! ]& n! h# b D
return 0; 9 T3 h: `$ o/ T) O0 e* Z
}
 N3 \+ R+ C3 e- q2 F. H
, [1 Y; D0 {7 J3 w' L; h
' `3 w) _6 |' C( s& W+ k6 R( B8 w函数名: putenv 
% y7 H3 F1 ~1 y. C& X1 e7 F' c. E功能: 把字符串加到当前环境中
# @0 `7 y9 C/ [# L( R j3 P用法: int putenv(char *envvar);
 B1 r0 K/ f6 ]+ C程序例: & i1 h0 i7 J+ N* |8 [' w% l" b
#include <STDIO.H>: I1 S8 ]7 e5 h. `# K* [
#include <STDLIB.H>. ?% b0 X2 {' N/ l0 u% h
#include <ALLOC.H>
- a1 \& w0 y# G1 z#include <STRING.H>
2 s. q& }7 q2 H* ?1 |#include <DOS.H>
- z, G0 x7 G8 a! y9 F" q5 s( uint main(void) % I! p* _2 x8 T, s6 m* m
{
$ B0 v& Y5 v' S0 fchar *path, *ptr;
+ X" C. v6 i( w. ]int i = 0; ) Y& n; h8 Y: s$ \
/* get the current path environment */
& j5 |' e+ B0 r9 Z# `1 g* }5 j- Hptr = getenv("PATH"); # m- ]9 _" a( v# A K
/* set up new path */ $ A9 T$ k; [* u$ Q; n" M
path = malloc(strlen(ptr)+15); : A* j9 Y H, r* e
strcpy(path,"PATH=");
, a3 W" d9 {4 B' g+ q/ Zstrcat(path,ptr);
3 y9 B* w# J4 vstrcat(path,";c:\\temp"); u2 d% k5 Q! x. V( L5 ~
/* replace the current path and display current environment */ + A3 K" G" u4 z7 e
putenv(path);
& ]0 k& [! f. Q2 twhile (environ)
: b+ t- [5 s+ n K% _8 wprintf("%s\n",environ[i++]); 
0 b8 H- J; E5 V( {% E* ~return 0;
" n: u4 z/ ]+ ^1 N}
 d1 r+ C' z+ B! x) g! x; |& W8 A v7 l i1 n7 H
2 w* q& c+ ~9 l! g w% q. s- T: t; M
函数名: putimage 6 z9 a% c; E& U- ~8 n
功能: 在屏幕上输出一个位图
# W/ X, \, x5 E$ }+ K4 D/ q7 J8 J用法: void far putimage(int x, int y, void far *bitmap, int op);
) t B5 Q, M2 ?" \5 x* Z" t, M( D1 h程序例: ) n. G& d/ r5 m: ?' d: z
#include <GRAPHICS.H>
. g. u% Q$ I/ V. s#include <STDLIB.H>
% L8 d1 ~3 K ~$ k3 E#include <STDIO.H>
( R5 p) K; F) f) X) z; M#include <CONIO.H>
* O3 L8 T( S6 k9 {, E" |- I#define ARROW_SIZE 10 
; d' m6 P4 ~; T: Dvoid draw_arrow(int x, int y); 
( P/ P# a" m+ e% n1 `" G7 Hint main(void)
& u r7 B. f0 M6 L{ ; c: C/ j. ^3 j
/* request autodetection */
& p+ Q' a7 p: n( u. Zint gdriver = DETECT, gmode, errorcode; 5 J5 ^% N# k7 a1 g0 r R
void *arrow;
: t4 d- r+ S4 a( d V aint x, y, maxx;
/ B- u/ l6 ?' `4 j( }" F& [1 y5 Iunsigned int size; ' ~$ x3 f& n+ _# H8 P. b
/* initialize graphics and local variables */ 4 [# E1 a4 o* ?# s5 \+ K- b
initgraph(&gdriver, &gmode, ""); . w9 e3 H# B% K7 d4 X; x6 h
/* read result of initialization */
3 l0 j, N% i+ B" e4 T9 T- ?" H/ [) r4 Herrorcode = graphresult();
 J: u) h0 r6 }& B% nif (errorcode != grOk) /* an error occurred */ " p1 G. Z w$ O( a' ]# ?+ y) ?
{
5 Q9 a9 E' J! W, n& xprintf("Graphics error: %s\n", grapherrormsg(errorcode));
) n4 _6 D3 E7 c% A/ F* \printf("Press any key to halt:"); 6 O; r6 h8 {" U& I. l, f2 U
getch();
5 c$ q1 o+ I) F4 Mexit(1); /* terminate with an error code */
$ I: i' c8 ?" X- p/ I} 
+ K9 p' o' F" F dmaxx = getmaxx();
- D1 ^9 { \9 I7 ?$ {/ ^# v9 Xx = 0;
8 ]* E3 N, {/ h7 @2 i4 W9 }y = getmaxy() / 2; ( S* Q2 U# X1 X8 {' P* w
/* draw the image to be grabbed */ # W# V- G8 Z' H+ p2 e! n" m, O
draw_arrow(x, y); 
8 Y0 `3 N- l9 ]% H f/* calculate the size of the image */
! d! e6 x& z9 X* Q0 a: w* Ssize = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
* o# u$ s$ v. o6 n0 I/* allocate memory to hold the image */
4 G/ w* q8 Y+ t# w) carrow = malloc(size); 1 n" H0 \1 i. {# G3 t% [) b% w
/* grab the image */ 1 j0 V5 o/ |& f
getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); # ? }( g0 C# o# A% Y$ [/ B& e4 L5 d, Y
/* repeat until a key is pressed */ . _; \4 b9 p" _$ [) q4 M' S+ h. M
while (!kbhit()) - n' _2 q' ?0 N$ [ p v; B
{ , e0 a# R8 j% A& _/ m
/* erase old image */ ; C5 y2 s$ w8 ~& Z" c
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 4 Y3 o: L8 @0 @ ~9 z
x += ARROW_SIZE; ( V2 X& ^% s) k" ~; u$ `! D
if (x >= maxx) ( X5 [1 }) X+ n* S
x = 0; + u8 w9 t, t! v5 e7 K3 @) H1 E
/* plot new image */ ! Z7 p0 `9 m; ~# M/ L; F
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); ! c4 V M, @, C8 z! r
} 6 Z- H( A4 ?7 i* u
/* clean up */
& I3 `. A0 ]0 Y5 q U' Ifree(arrow);
) q, P8 S7 F9 W% y, _% i9 J% {closegraph();
6 |) U" a! b0 ?9 r) q4 Z5 v, Hreturn 0;
5 _6 f5 q: a) n/ F: Y% V} $ }7 r- [9 U$ Z3 }" R3 ^. d! ]
void draw_arrow(int x, int y) / k0 R( m% u2 z5 N6 x/ c
{
: `' L, ~" a8 `( x7 A, m/* draw an arrow on the screen */ $ G- w7 F/ k& c. w y: ]% @+ u5 k
moveto(x, y);
# ~' G2 d x1 n8 Q8 Q3 dlinerel(4*ARROW_SIZE, 0);
5 h1 E: q+ S7 `. Tlinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); 4 X$ Z1 R( d2 j1 L
linerel(0, 2*ARROW_SIZE); 6 k" q7 W. {' x; I! a" J
linerel(2*ARROW_SIZE, -1*ARROW_SIZE);
) x1 b6 b' h% w9 s} & _: Q6 Q! U7 s

$ ], p& ^ o& a' k- z% j1 u; P/ |4 s* r7 b
函数名: putpixel 
% K2 E( k$ F. c) l& E7 Q功能: 在指定位置画一像素 3 @; J0 [; c* j! F
用法: void far putpixel (int x, int y, int pixelcolor); 7 K" Q. V3 j" v( E; Z
程序例: 
4 S- ]$ l& t" e; g6 [#include <GRAPHICS.H>5 I P, {8 f% E" d
#include <STDLIB.H>
- V( ]- Q; c3 P! o+ x- F#include <STDIO.H>
7 t' C' Y* r5 j9 E* e3 z. a#include <CONIO.H>
- w v9 T. b7 [: h$ B2 z4 B#include <DOS.H>8 [4 d, w4 k9 U& h( D
#define PIXEL_COUNT 1000
0 F5 S1 i c7 O$ e' }#define DELAY_TIME 100 /* in milliseconds */ 
' |3 Y! N+ k7 o" l5 u# _* H5 @int main(void) $ I4 Q) F, T5 Q
{ 7 q# r4 J$ p& `1 H4 Z% I$ k6 C
/* request autodetection */
) i* J+ D/ j" l; Q9 |int gdriver = DETECT, gmode, errorcode;
, B* i/ S: M- m0 sint i, x, y, color, maxx, maxy, maxcolor, seed; ; P9 T$ x7 ?# A! _% p! l) u. L
/* initialize graphics and local variables */
$ K0 z4 Q' H& d$ D4 b! E W9 \3 g( Minitgraph(&gdriver, &gmode, ""); 
/ t Q% j+ m# W, ?/* read result of initialization */ 7 p4 \3 q) m( Z' S# j3 _! r
errorcode = graphresult(); & f+ ]+ j' w- P" o/ _% O' P
if (errorcode != grOk) /* an error occurred */ 6 k$ Q9 w. j' e$ N
{
, w/ i5 A! E7 u+ @% j5 y4 J6 {: uprintf("Graphics error: %s\n", grapherrormsg(errorcode)); 5 \+ P* [ }! d7 g( G
printf("Press any key to halt:"); % B. S% m0 P) |! G% Q, \. h
getch(); 5 s% D# p9 n4 ^+ ?3 |3 d
exit(1); /* terminate with an error code */ * h# R* B: X9 g# A9 u, ~7 O
} 9 Z) u" [" V5 I5 g2 r; G. F) o
maxx = getmaxx() + 1;
0 \6 L% M' ?- Z% F/ x$ {maxy = getmaxy() + 1; 6 S: w. ^2 Y( A! x& f
maxcolor = getmaxcolor() + 1; " M8 W1 D+ H2 k* y
while (!kbhit())
3 o. S/ _( z! L! I{
8 p7 S2 ]; ?) h' k( Z7 p/* seed the random number generator */
( Y8 c9 r4 l& X9 zseed = random(32767);
! }3 h' B' K6 U7 w9 Vsrand(seed); $ Q, u s9 X! Q B; S" ~ t, a
for (i=0; i<PIXEL_COUNT; { $ Q1 H: z: B9 J' X$ z* j
x = random(maxx); ) D+ k2 y& o1 A+ ?, M
y = random(maxy); * P' R' q& b' t0 c& C, Y$ I" J
color = random(maxcolor);
' F% c; P2 f( U2 B. G$ F- N6 nputpixel(x, y, color);
} 2 U7 X7 x/ T% R! a. u
delay(DELAY_TIME);
! |- R9 f y1 A3 b0 Usrand(seed); 5 x4 }6 e4 [$ l" U/ m, K
for (i=0; i<PIXEL_COUNT; {
3 G+ i, o" T8 @6 d7 H+ wx = random(maxx);
4 v' ~7 h' l* M& ty = random(maxy);
' G( U9 l$ p& ~! ycolor = random(maxcolor);
" [) ]. H, {+ G7 J! I) Eif (color == getpixel(x, y))
, G. p! A; f$ B! Q2 d8 A; V3 |putpixel(x, y, 0);
& y2 [7 n# Z2 R9 x} 1 F) `2 I$ E) [ X' D) j. s R
} - z! [ c* u/ T. @7 d
/* clean up */ - t6 I, p' e. G! a% S
getch(); 6 J6 d- B4 P: F2 V. i
closegraph(); - \& U# W, @+ Y2 v% p2 K5 o
return 0; 1 k/ T' w" \) A4 s
} 6 ]3 k+ ~6 ? V# U% W/ \

$ r4 O ^# V% f2 {. [, u/ D
 o2 x8 E/ m( ]7 n$ i函数名: puts : v$ {' J) }+ V2 \) O! H
功能: 送一字符串到流中
 g5 N5 k0 a+ r+ d: \用法: int puts(char *string); 2 s# O, P2 E o* o1 @# o
程序例: 
/ I: [1 ]7 ` q# x#include <STDIO.H>
1 ~, _: q# O% i2 \. l2 J! ]int main(void) " E0 y+ v* g( @6 m" n) I o
{ / C3 o, `- p6 N7 m, ]+ }
char string[] = "This is an example output string\n"; 
: Z6 d' q3 m/ Z7 c8 Zputs(string); ! M1 @* d. x4 a+ h! e
return 0;
3 `) X7 O3 O0 {0 g} # F* L& }8 [8 r2 v. x

, Z5 f/ ~) {4 A6 j1 c; j; e, Q2 Y! [1 g5 z. }: s
函数名: puttext 
6 y& V4 q3 Q3 k! y功能: 将文本从存储区拷贝到屏幕 ) D: a1 O5 y, n& I. L& k
用法: int puttext(int left, int top, int right, int bottom, void *source); ' e& e5 s$ T9 ~( G* D2 x: L+ P
程序例: " P7 E/ I' t) o. z8 ?
#include <CONIO.H>! B- d0 k, ^/ j
int main(void) 6 P% C+ j5 G+ \2 O
{ ! E1 x$ i* h) J* a- F
char buffer[512]; + n1 k( \6 }5 w8 v/ N5 L
/* put some text to the console */ % x- T$ g- z# M9 h5 Z
clrscr(); ) C2 c; V9 T6 @
gotoxy(20, 12);
5 M/ N, u+ k! B( J$ f/ n( x" i: Scprintf("This is a test. Press any key to continue ...");
( Q2 R* B8 s5 z, c$ A; E# vgetch(); 1 M5 |& ^0 V& Q( }* M- }; a
/* grab screen contents */ / z M4 D W! \+ A3 s+ q
gettext(20, 12, 36, 21,buffer); 4 } V! d( `) ?2 \$ `: R
clrscr(); ! A( A, D. O1 R, e8 D+ @/ b, q
/* put selected characters back to the screen */
+ K) s, P3 t0 p8 F" j8 }gotoxy(20, 12);
. [* g- e6 o& Q' c9 ^1 \% W6 G9 Cputtext(20, 12, 36, 21, buffer); ' Z+ s; y1 x: l- I/ K
getch(); ) X. R! m4 S. s7 Q" h, \# C
return 0;
% P; A: ^1 M5 f6 l5 Z$ j3 k: {}
! p8 e/ n* @, s7 M( Q; y0 A" w$ M% p- y" ~

. c, S6 C$ O5 P" C: Y) v函数名: putw 
/ Y; d* G$ O" v6 a" b$ q. i功能: 把一字符或字送到流中 8 u9 v+ n. ?' u% K( \5 u
用法: int putw(int w, FILE *stream); ; ^2 ?# p) K, C" Y
程序例: 5 F6 |4 h2 a1 N* W( ~! N
#include <STDIO.H>- ^! K. t, n: m- j1 h7 g q# X
#include <STDLIB.H>5 P/ ?+ P+ l! v9 Q- h7 t+ ` N
#define FNAME "test.$$$" 
# L4 A; @) P+ r- Yint main(void) " c+ k1 r0 p' Y e D+ Y7 w* i ]
{
4 f M2 x" K" P' R) C& ]FILE *fp; * S5 |9 w0 n9 ?$ I/ u& _
int word; ; m( J7 F$ m! J7 R4 S6 ~9 ?& F
/* place the word in a file */ ) L& D6 j9 j" H9 E ~, g
fp = fopen(FNAME, "wb");
5 U, N( }5 y8 h) T, ^. }if (fp == NULL) 3 A- U0 b6 R1 W5 Z1 {
{
7 c- c" }) g( Tprintf("Error opening file %s\n", FNAME); * ?% a' h$ N) W4 Q3 J: B# d
exit(1);
7 J* f1 b7 r# q/ e, d} # l( }/ I3 F6 i Y7 W: i5 r# i. Q
word = 94;
/ ^% m/ ^: I& u* y3 u1 M: hputw(word,fp);
: \, k. b4 ^$ x+ C/ xif (ferror(fp))
& P* a1 T3 D6 n, n0 F+ q% m0 `9 Oprintf("Error writing to file\n");
9 p( d, [, F; D5 Z$ zelse
$ _, X) y3 }, Gprintf("Successful write\n");
: h+ n+ O4 Z& g: ffclose(fp); ( K1 [' [: S# ? v
/* reopen the file */
- L1 [( z2 t3 J' K4 d @fp = fopen(FNAME, "rb");
4 T' K, L. V1 v5 B( Dif (fp == NULL) b: S# c5 h6 N# F# D2 W2 Q
{ $ y- x8 G7 p7 n n9 H
printf("Error opening file %s\n", FNAME); 7 ]: A) i' S! _
exit(1); . w0 c$ Y" `0 l
} 
$ g) b) ^. m( S* L, `6 K/* extract the word */ 6 t" R- Y4 V' j, t8 @
word = getw(fp);
4 _! p$ z/ ^' f6 _& b# c" Lif (ferror(fp)) 1 e. v( H6 L& P" G b+ V6 @
printf("Error reading file\n");
. J: O$ d1 L5 g" h9 delse
4 F a1 n) u @5 L, n: O0 Oprintf("Successful read: word = %d\n", word); - }8 H3 J- N H- D3 L& K& e
/* clean up */
# S4 S+ |# b. h" l) j; yfclose(fp); 6 y# R x+ d& H% B
unlink(FNAME); 
% f( ]& j8 `) Q/ W `+ d g+ q( dreturn 0;
2 ?6 v, Y6 a3 P2 s6 x9 v+ |}