查看: 2722|回复: 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) 2 [& ^2 A9 b9 ]! f9 S, f
putc(msg[i++], stdout);
( S) s0 P8 c+ ~% f* y% L: I# Areturn 0;
! H. [7 O+ B5 _3 L/ G$ O4 N; E1 D} ! w D+ c9 L9 q: j; U* r# S4 h3 z
- Z; F% U3 |% E0 V5 F+ G( J

& l7 X6 e" v" g( Y: G0 M: K函数名: putch 
1 f/ ?% B: j7 `# A功能: 输出字符到控制台 ; ]# V9 d/ ?5 s {. i: q# T
用法: int putch(int ch); ; ^3 B3 @& U, q; K, k4 ] L
程序例: 
3 \! P1 B" d5 J; P#include <STDIO.H>: r1 _1 d) n8 y# b& K% v! W% A
#include <CONIO.H>
/ w, @9 u7 \$ V2 Q1 g% @int main(void)
; d' P, N* G h- m- A9 M7 d{
- z$ x8 T" J: m9 h7 z' p0 gchar ch = 0; 
' ]' A' g2 U8 L9 y% rprintf("Input a string:");
8 q) D: x) ], ^; N' l* ?9 Gwhile ((ch != '\r'))
2 h3 B1 {* }" p7 m/ ^( u{ # n% q; q2 |9 K; w& n
ch = getch(); & Z' t# c& r6 e+ p* ^6 {0 b2 N
putch(ch); 1 I7 x4 r' A$ \
} % B+ Y% f" s, q
return 0; 9 R8 M1 E3 W9 ?* F, D" k! a/ q
}
6 n+ s# [+ l5 c- I$ {
/ ~3 {: e& r6 j, B
6 X$ b h! z) {4 H7 b函数名: putchar : ~& G, |+ G( n$ X" _
功能: 在stdout上输出字符 8 R |' B$ `. ~* U" [
用法: int putchar(int ch); 3 R( u2 H8 b5 ~1 E7 n0 {' C
程序例: 3 N8 P$ N" H4 e/ M0 {6 a
#include <STDIO.H>/ ^- F4 }; Y' _
/* define some box-drawing characters */ 6 q# u4 x! V) `5 Z0 ^4 C
#define LEFT_TOP 0xDA ! L1 O! H( p4 g, A2 f6 [
#define RIGHT_TOP 0xBF % g+ d8 [) y0 {
#define HORIZ 0xC4 * n0 Y z1 R9 h2 e) T7 }
#define VERT 0xB3 7 v; j0 p. j) T0 ?6 A6 S0 t) I
#define LEFT_BOT 0xC0
( v3 d0 x5 v" \9 A# y#define RIGHT_BOT 0xD9 3 L$ n% |/ g. p& c# s0 v+ i
int main(void)
. c8 X5 @! M+ o4 H6 b{
1 Q/ r; a0 Y, e3 T5 bchar i, j; . I9 E2 ?0 i% w) _$ g7 k( `
/* draw the top of the box */ d* u. C; ^7 X3 C9 B: Q2 D' R- i
putchar(LEFT_TOP);
( G# f9 e4 |6 Kfor (i=0; i<10; i++)
, _. ~- Z, B$ @: X m6 F+ Mputchar(HORIZ); 0 o: I0 c. u1 D) b+ M
putchar(RIGHT_TOP); ; e& f1 I5 D$ p
putchar('\n'); 
5 g+ k# f4 k, w# [( W' m: z6 L/* draw the middle */ . c& S5 l4 z; K
for (i=0; i<4; i++) n* m; q* c* T) m. D4 f
{ . p0 x. w2 {* F: M( R2 D8 L5 p
putchar(VERT); 3 Z. r/ ?* ~" H2 r$ L2 i
for (j=0; j<10; j++) " e- q$ i; O( p9 E. b' Z1 D6 A
putchar(' '); , Y4 W# S0 `2 Q
putchar(VERT); ; g4 r0 R& q4 p3 a" f
putchar('\n');
- n) n1 ^9 J7 E# C9 j} " D* H3 y; M6 {% v! j4 I
/* draw the bottom */
5 b2 q! d7 p7 W3 v3 d% cputchar(LEFT_BOT);
! h$ |2 {: ?7 P7 s% h/ L1 U0 Jfor (i=0; i<10; i++)
+ {. U x, t! Uputchar(HORIZ); 8 j4 P% B. c8 E6 w
putchar(RIGHT_BOT); 2 ~/ c$ r( i5 N/ ~
putchar('\n'); - I9 ?3 O# K5 P% o
return 0;
0 X4 H5 O/ X- y2 s- I1 P}
 ~8 G4 L; e* ` g, ~1 s9 S. G% H1 u5 }( Q7 x
2 h% n) K% w G7 f
函数名: putenv 
" b- u. Y+ a6 v功能: 把字符串加到当前环境中 : ?7 u! C$ ]! B9 g% Q
用法: int putenv(char *envvar);
7 r, n" N! L* C4 }: K程序例: + Q' H* F o) k- r6 g
#include <STDIO.H>
! M1 _( `3 W3 v' X# H* O4 G#include <STDLIB.H>4 M; B: |6 k B
#include <ALLOC.H>. F, O- N& ], K9 n
#include <STRING.H>
) `& U1 d7 [& D#include <DOS.H>
& P/ r6 Y2 j1 K% Lint main(void) 8 \! h+ Q& A: W E" T9 F6 q" U
{ / y4 H h* c" m2 C7 {
char *path, *ptr;
& Z0 H/ U4 S0 Z; L8 r1 }. yint i = 0; ( `* j9 P/ s j9 w6 L
/* get the current path environment */
! }, E% f7 c/ ?ptr = getenv("PATH"); " R/ U6 A! B# i
/* set up new path */ ' ?. u+ n' @" T; }' F# _
path = malloc(strlen(ptr)+15);
+ M2 [+ C) b6 m+ u* k9 lstrcpy(path,"PATH="); - Q% N, l! u( N4 `$ {
strcat(path,ptr); % U8 u+ W1 F' d# E9 B* A
strcat(path,";c:\\temp"); 
4 S. J b- @; m( \% ?, z/ A/* replace the current path and display current environment */
* Q/ I/ N7 H$ jputenv(path); & s( N# L1 Z7 w2 {
while (environ) 3 S6 _9 k7 w0 x! x* k8 [9 g
printf("%s\n",environ[i++]); 
: v" `' N7 h6 ?$ d! ~/ Y. Qreturn 0; 8 S5 a6 `# G. @9 E( q/ q- X
} $ a) b/ N/ e, ?6 z$ Y/ j

. {3 ]9 J) i: v# g, E$ p0 S" K7 `! B M' }
函数名: putimage $ b' A2 }" d V6 Z
功能: 在屏幕上输出一个位图
4 M1 ^+ F" h' [2 I. N' ^用法: void far putimage(int x, int y, void far *bitmap, int op);
! z$ h7 I; r; `& `: t* V程序例: D) f' g* V8 X- |- S5 J. p' w
#include <GRAPHICS.H>( J. x- D5 M, B, z( _' ?
#include <STDLIB.H>7 Q* |6 f/ S c1 \
#include <STDIO.H>" C$ a/ I7 I* ~& f
#include <CONIO.H>1 N: ~/ x E8 m& Y$ U4 v# ^, E
#define ARROW_SIZE 10 
% M$ X% |3 O0 g4 y/ l( E! pvoid draw_arrow(int x, int y); 
6 m2 \1 r# S9 `5 M) [2 A9 Oint main(void)
' h$ l, |3 j3 R; d{ 4 D8 Q: i( L }' G6 P9 m
/* request autodetection */ " I9 G# }' l$ i# k6 F
int gdriver = DETECT, gmode, errorcode; / {& `) |! f. Y, M, l2 ^# u) \
void *arrow;
" O& d# J* l* t0 A8 |int x, y, maxx;
5 w! V. }$ s! |% }2 o8 _unsigned int size; 
: K* b! h; S1 U$ K/* initialize graphics and local variables */ ( a' I0 b+ r. S# o4 X
initgraph(&gdriver, &gmode, ""); 
1 h$ W' M! F0 @6 N N0 |/* read result of initialization */ ( y0 Z% Q6 x. ^# L
errorcode = graphresult();
: b9 c2 O" u5 V* J, W0 y. `if (errorcode != grOk) /* an error occurred */
, M* N8 J u8 G8 j( }9 P' j |{ ; A1 c1 m! d ^( K' r
printf("Graphics error: %s\n", grapherrormsg(errorcode)); ! q0 G, i. `6 `+ [, |' f' N& `
printf("Press any key to halt:"); $ E X7 Q2 B c- w
getch();
# E* `/ L9 B7 B, F5 o& |* zexit(1); /* terminate with an error code */ 4 E. Q9 b0 n3 j0 R3 ~; x% z
} 6 o+ M r7 P$ s- e- C8 A- e# r
maxx = getmaxx(); , {) {1 T- z1 k; n7 O% {* {+ O
x = 0; ( v: f& C. p8 t4 q
y = getmaxy() / 2; - {8 M. Y& S2 W' N U
/* draw the image to be grabbed */ ( I8 G" Y0 h$ K# k+ r3 R
draw_arrow(x, y); 
9 {0 X: P% Y1 C/ p. p% n( T/* calculate the size of the image */ 7 }0 \8 ?$ I4 Q) [+ f
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 8 d- r0 i) [9 \: Y8 n, u1 Y
/* allocate memory to hold the image */ 2 S# |6 Q! ^" U+ ]3 v Y( ?; L
arrow = malloc(size); ' Y4 g" h9 [9 J( a+ O9 K; F3 f
/* grab the image */
* s# F% a& _" N6 r6 @2 bgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
% ~ c; {7 x6 p/ x' |; m# ~/* repeat until a key is pressed */
5 x" |8 ?7 e1 ^* gwhile (!kbhit()) 6 H, q" x( F- u, L. s$ E6 \" q
{ ; P, k, w. x" Z. w3 ]- M
/* erase old image */ * L3 K4 l: m" ^; w. n7 [, U% A s
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 0 X% N$ i% u$ \9 p1 H3 s0 e. O
x += ARROW_SIZE; # U4 z& v& K/ h$ k0 \8 x
if (x >= maxx) . J- `7 t t: e, `; O
x = 0; 
$ E s7 `6 {/ c! R3 A3 p/* plot new image */
! L `* ]2 A2 C% q- ?putimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
. d: |# E$ L! t! l5 H6 U} 
0 q: H/ A3 ~' Z0 n# f& I" ~) b/* clean up */ 4 U- [$ }# \7 Z% t4 Z- u+ s* {. z1 ]( [
free(arrow); . z# ?8 n8 Z5 y2 \
closegraph(); ' U& ?1 b- r6 d( b, s! S
return 0; 6 B' A0 i3 i! U9 n& ?
} 
2 Z+ C2 O, z; i; n) rvoid draw_arrow(int x, int y) 6 q$ p, |, I$ `) d
{ 8 n( h8 N" G- A, q
/* draw an arrow on the screen */
/ }5 A! N( h+ p% j; a; f+ kmoveto(x, y); " I. R) D7 v$ N* \) j2 ^
linerel(4*ARROW_SIZE, 0);
' N: }: i2 F0 U: j! E0 K; Vlinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); ; F' i7 _. I5 o) l' v
linerel(0, 2*ARROW_SIZE);
2 L$ a$ L8 i& \# V. B& c7 i) zlinerel(2*ARROW_SIZE, -1*ARROW_SIZE); ; }( v$ E# e( t* h; H5 X* K: a* r
}
& D% G9 B. T5 V) f% Z7 a
8 \) U& Z4 ~& m
1 d H* z' U5 m$ R: x% I函数名: putpixel 
4 v! G! y" y% G( y7 F6 @6 o功能: 在指定位置画一像素
+ i* c1 A+ X# U0 t( Y/ |" j用法: void far putpixel (int x, int y, int pixelcolor); 8 l9 S: ^- A( [, R; F
程序例: 2 R' ^! C( c0 n# j) M
#include <GRAPHICS.H>
4 r* B3 M$ b4 ]5 \. \- f) ?+ C#include <STDLIB.H>
( O; v q9 q% W% ~3 d b4 y7 Y#include <STDIO.H>
2 b' i7 \* \. ^5 Y#include <CONIO.H>) E7 `4 X. p3 l8 y9 Q4 ]! s% i1 |
#include <DOS.H>! X% ]- {1 n' W+ Y4 l) |8 ]
#define PIXEL_COUNT 1000 5 z$ _0 q% q" Y; I* J
#define DELAY_TIME 100 /* in milliseconds */ 
) o( C2 Z9 C% n: @' E, B7 Eint main(void)
1 _$ a5 n1 P" J+ r9 C) ~9 l' a{
( a' ]2 w+ x6 B! G/* request autodetection */
+ `$ C7 ?5 h. `: h8 D' {; u3 s0 vint gdriver = DETECT, gmode, errorcode; * D; \3 G. H2 x5 L9 d" x7 X
int i, x, y, color, maxx, maxy, maxcolor, seed; 
$ W9 W, Q* g) V1 m- x' P/* initialize graphics and local variables */ : f, Y, t. C- |( W& V
initgraph(&gdriver, &gmode, ""); 
# R* Y' F$ J9 Q% N/* read result of initialization */ 9 N6 m& b. A- _" p% p8 j
errorcode = graphresult();
+ _7 S4 z0 v! i, ?! zif (errorcode != grOk) /* an error occurred */
/ w$ r7 `$ h2 v" ]' U8 H{ & j& q0 ^2 \: l3 x+ H
printf("Graphics error: %s\n", grapherrormsg(errorcode));
7 b0 B: l7 i5 h/ Wprintf("Press any key to halt:"); + E7 B! W4 l i/ x: N
getch(); ! h. b# l" Y9 }, \* u
exit(1); /* terminate with an error code */ & |! a; M0 l0 a. U F3 j! _
} 
' @) v. ?5 m% T* E( _/ o8 }$ [maxx = getmaxx() + 1;
5 N4 a! _# X5 `. O) omaxy = getmaxy() + 1;
! s) f" @( v. jmaxcolor = getmaxcolor() + 1; 
2 g$ w J- |$ o, t1 [while (!kbhit())
- f X d" K4 e: o, M{
$ L3 o! `0 G' o" o' H/* seed the random number generator */
7 W! R1 [7 y% ~5 b' B5 V& Hseed = random(32767); 8 x3 G$ W- y& k7 d1 }7 I
srand(seed);
" e$ L- T$ |+ Z+ k; dfor (i=0; i<PIXEL_COUNT; { 7 G0 ^ `) N4 B8 G& \
x = random(maxx);
) b1 Z$ S8 c( j, ~y = random(maxy); " K- A( I3 U" a9 n& s4 H8 ]
color = random(maxcolor); + e4 q" i* N" h4 a- ?9 @" q& ^: I
putpixel(x, y, color);
; Z) H' h7 ?* Q6 y* H} , o4 \& T+ X/ Q( a8 j
delay(DELAY_TIME); , q, y) y2 t9 G! j8 l
srand(seed); 4 ]7 C& [0 g( o5 r+ Y0 j" c" D
for (i=0; i<PIXEL_COUNT; { 1 u& a2 M# m2 r2 m% h2 K
x = random(maxx);
* H+ g8 U) G9 [% @4 qy = random(maxy); - t# E9 B U/ Y) [
color = random(maxcolor); 7 r# [4 h+ a% H/ S3 z; c8 l
if (color == getpixel(x, y)) 4 Z+ s$ ?' q: L, G8 q$ j$ e: D
putpixel(x, y, 0); + I4 K& W4 t3 T
} 8 f" p3 O: z3 ] `
} 
1 J" o3 K, x+ O% M# c5 S9 Z, ~/* clean up */ 9 a0 K6 B9 c* M9 Q6 ^
getch(); # |* b/ s* z# [6 a# b4 {% l
closegraph(); 8 ~7 E1 b" X1 u
return 0; 2 V0 _2 r# Z# V: c6 \) |* T
}
" b9 P$ R' |2 a4 }5 ~: c ^- `. T. t. \6 q0 V

2 b7 Z1 k+ K5 T' G- o2 D函数名: puts 
! ?4 F d3 w, R3 h功能: 送一字符串到流中 , j K; H# s* P8 Y* m7 ~; d
用法: int puts(char *string);
$ [+ I- Q) ^9 a* J! L程序例: * _! \( `/ S& ~- h2 }1 }( L' Y
#include <STDIO.H>
4 z$ j& e: {" Nint main(void) ]) o5 t2 n' v/ E
{
4 J8 |" m; {& O8 h/ t3 }7 k; xchar string[] = "This is an example output string\n"; 
/ z( ?& {7 s3 D2 F# `# n' ?puts(string);
" X: {) p; d0 \$ m$ x" Wreturn 0; 2 n- a. I+ }" e* ^
} $ t6 d. { W \1 i. E

1 z' |6 V, J7 M8 l
( X% q) M4 X% O/ v; M6 d4 W- r/ m函数名: puttext ; F& E6 q* x6 T+ t7 u N' E
功能: 将文本从存储区拷贝到屏幕
) Z( N1 I/ y5 @1 A用法: int puttext(int left, int top, int right, int bottom, void *source); . d( E' ?& r5 G
程序例: 
5 S+ F* `8 s; `/ Y# Y#include <CONIO.H>% I, r7 H2 z6 g: O8 a
int main(void) - y5 G+ |) a9 F; [' l+ w
{ 9 b7 j& x$ S) @/ p
char buffer[512]; 
7 [8 i% B/ U) M# M) M/* put some text to the console */ ; l" x+ y, c2 X+ V+ u
clrscr();
4 h% p+ \! L% t2 q) Q) J* sgotoxy(20, 12); . p8 i- w$ O% n
cprintf("This is a test. Press any key to continue ...");
+ K1 ?; c8 ?% ^0 Egetch(); 3 Z5 h8 O; J4 r: v9 a: ]
/* grab screen contents */
) v4 t, T# v6 j# F0 L# I' Qgettext(20, 12, 36, 21,buffer); . p6 }( m, B/ P3 [- m5 l$ j
clrscr(); ; \5 S9 r/ V. a/ m* W S! e& u
/* put selected characters back to the screen */ " }0 [! z4 G/ j8 [- z
gotoxy(20, 12);
. }5 Q- c8 A# yputtext(20, 12, 36, 21, buffer); 2 H" \2 V7 T) v0 y
getch(); 1 t) S* T: q9 f. h
return 0; 3 o8 ~/ N% H: U
}
$ M8 D4 S$ S+ g5 [" K/ m/ z' q4 k3 U+ Y$ z0 ~& ?+ u
, x$ f# G$ N: e' T( N/ Y/ k
函数名: putw 8 w7 y' T9 A+ P. X8 O
功能: 把一字符或字送到流中 ) O3 A9 ?' Z( j l. Y2 u, l
用法: int putw(int w, FILE *stream);
! O3 N) s: z5 G; ~4 Q% y: S程序例: 8 N3 P! U2 {* {% |5 m/ O2 Z
#include <STDIO.H>
" E# y' S' a* b9 K# C#include <STDLIB.H>% p# y: J8 u1 l/ i% x e1 D/ s
#define FNAME "test.$$$" 
& N5 W; T) L$ r1 u6 Z% i" k0 |int main(void)
) N( E# ] ^5 p6 G3 \! G{ ) x2 a: ?. q; _. j" F4 }
FILE *fp;
; H; Z- W3 P$ yint word; 5 F! k$ W' l C5 S! b. c3 V
/* place the word in a file */
* Z2 D$ P, x7 c2 Vfp = fopen(FNAME, "wb");
# d5 `( d4 z# z: S5 l0 G! uif (fp == NULL)
+ g& s, E- m" p* e{ & z9 u5 N) s" E) }
printf("Error opening file %s\n", FNAME);
# V& z9 ?4 Z2 w) a* v# u+ d! ]exit(1); ! ]# J( _. G8 i' E/ q* R5 Y' c
} 
& c" {5 g" e/ A. ]$ Hword = 94;
; E, i# a, T( K( uputw(word,fp); 4 c7 j' _4 B/ u! F& ]4 j! D
if (ferror(fp))
9 `- H. f! q9 {printf("Error writing to file\n");
! S& m' a" r! Uelse
% w: e6 }# i, w: ]; O$ {# Bprintf("Successful write\n");
" z/ d( C+ m4 ^, yfclose(fp); . Z$ b" e a% A9 @2 k# O
/* reopen the file */
9 ], y7 P$ ]1 ~. V3 @5 hfp = fopen(FNAME, "rb");
 {" p$ o. r9 H, Q0 gif (fp == NULL) / E9 J, q$ O. r- ^6 |! h' J5 J2 `! ^
{ 0 B, @5 v+ G1 {2 K2 M! |1 |+ s
printf("Error opening file %s\n", FNAME);
" r; w; ~( A. V+ q8 z/ Cexit(1); 0 J3 Q g9 B+ R- j" r5 }" d8 ?
} 
! [4 H5 ]) q& `& v1 X$ [ a/* extract the word */
& @# z: g; R" ]8 x% oword = getw(fp); 2 P+ M* l& @" `3 N* C( d
if (ferror(fp))
1 B. e9 i, W/ D0 }printf("Error reading file\n"); : b4 `8 @- H1 M( s6 k$ K
else ! w/ W3 B5 L0 u T! ?
printf("Successful read: word = %d\n", word); 
: b' y9 y% g! T7 a/* clean up */
7 c7 {; W: Z7 \& mfclose(fp); 1 Z( w# ^) X6 Q) H A2 T3 i
unlink(FNAME); - d0 g1 r$ |: _0 c* V, b$ J/ [: L
return 0; % ^! }3 s& e! H8 L0 L; g6 w/ |
}