查看: 2689|回复: 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)
; R9 A- ]) f0 S7 ]putc(msg[i++], stdout); 8 |( v" w4 [9 {4 d
return 0; ! A% k. p( Q; s4 R# a$ a- N
} , v0 O. |2 _6 v" s
+ B3 U' n% S2 P. c5 W0 s

5 `7 S. S# Z) P5 U函数名: putch 
! d0 B8 p1 N8 l" n/ [4 D( [- Y功能: 输出字符到控制台
, Z* V1 o' w/ i9 D5 M; ^用法: int putch(int ch);
6 A0 B9 \8 [3 u \ a" y程序例: 2 E" O) G" g. ]
#include <STDIO.H>
3 K9 i' O/ E" |% a$ u, [. h2 K" Z/ w#include <CONIO.H>; e2 [& y s5 M% o5 D
int main(void)
 Z$ S5 T: w8 `2 R{ 8 _/ J+ Q; y$ a: s! R& @
char ch = 0; . v* ~! |1 c- W
printf("Input a string:");
. b& w- c, T* n/ awhile ((ch != '\r'))
$ q9 O9 [/ `% |7 }* v{ {. p/ X( ^- z) A5 R) O( G! i: y
ch = getch(); y% n+ J+ z; E; X% B
putch(ch);
& c- k) q) p; Q) s$ m2 D' O1 }} 6 I! U) V! z: T7 ?
return 0;
+ c# Z. F/ y5 V: B5 U}
8 b% ^9 g& e- p- P- D. i$ J2 x, T7 h2 d5 q. S# S
" l6 ]+ L9 v+ E6 ^$ D
函数名: putchar 
" J$ W, F7 I- ^2 E! a& q功能: 在stdout上输出字符
7 M1 E% ^/ a% r& H5 q' _用法: int putchar(int ch); # c! C$ o! }' m
程序例: 
6 A- G% t* }1 I#include <STDIO.H>, j9 F1 D. X4 H, \. t3 E: `8 y
/* define some box-drawing characters */
/ R8 U+ J& o9 W$ t0 h1 Z! \9 p! [2 {#define LEFT_TOP 0xDA & m% L9 ~: ?+ V! |% `7 L, j& b
#define RIGHT_TOP 0xBF ( H* v0 f# }' P9 x& Y
#define HORIZ 0xC4 # Z- V" Z3 J$ u+ s1 s' |
#define VERT 0xB3 " r& ~: r1 v* f
#define LEFT_BOT 0xC0 ; q8 v: M `4 {9 e) J' p0 N( Q8 m6 O
#define RIGHT_BOT 0xD9 
/ L, `! o9 M+ |, Q; zint main(void) 3 X2 N- C$ |# ]
{
5 C' T( N" u. C" n) O6 K$ Gchar i, j; # u5 \/ [/ j F1 [$ k/ L' }
/* draw the top of the box */ 1 [# z! j) v/ \# T& ?. _
putchar(LEFT_TOP);
6 [+ \8 ^8 f* F) R d3 qfor (i=0; i<10; i++)
; b5 a, i! q: U5 \! Hputchar(HORIZ); * o2 y7 @) P8 L* y/ H
putchar(RIGHT_TOP); - t* {2 e; Y' J) ?& t! a2 b; p$ D: ^/ t
putchar('\n'); 3 B; m' B7 Z% Y/ B0 S- @2 l$ F
/* draw the middle */ ; T2 i& u8 M% M$ w& I+ Y, v
for (i=0; i<4; i++)
7 k6 r$ V$ F* X; U: h{
/ \; u' m" l9 H6 iputchar(VERT);
7 S9 P8 C- f; w& O6 j8 e' Ufor (j=0; j<10; j++)
8 g9 h ?1 z3 t/ |putchar(' '); 3 Y6 S. d$ l9 `4 C6 q
putchar(VERT); - o- C6 W5 j6 o! T( H" y; v7 c) U6 I
putchar('\n');
9 W; {) [( S* B# B$ H3 p} - S. Q, |" \7 E0 S' R9 b( m
/* draw the bottom */
5 o4 [. u1 f3 L' R7 Z! R) ^4 Oputchar(LEFT_BOT); ; l" e1 o) y- @
for (i=0; i<10; i++)
0 a: b- L: {5 s! W vputchar(HORIZ); ! S g7 g/ [, I) S4 w1 r; b
putchar(RIGHT_BOT); . U, ]" z" [8 r# d" x
putchar('\n'); 
: |$ Y& }+ }/ D7 e* _! a& \return 0;
 c# V; E% K9 h* \/ P& I$ r2 N( X} 6 Z* @' N9 l9 `6 M0 l
3 [4 K; ]5 n6 R9 t% A3 H
& Z* Z( g/ i$ K& Q
函数名: putenv 
- |+ n9 ~& g: Q3 Y' i. X- X# j) Q8 k功能: 把字符串加到当前环境中
 Y- w( j3 }( @用法: int putenv(char *envvar); 5 e, U2 ~$ }9 ^! j6 h1 n
程序例: , B2 M7 y2 r! f
#include <STDIO.H># Z, g/ l+ J& `$ c8 y) Q& {7 {
#include <STDLIB.H>: {2 o8 b( w( @, @! a
#include <ALLOC.H>
* v; j3 O. e7 i#include <STRING.H>* e2 G0 r% c8 J w- h% a
#include <DOS.H>
# r4 i, ^0 K* r+ Y( H" Lint main(void) ; g+ j. w$ Z6 C* X' p- e
{
5 \+ n5 d6 C7 m8 |char *path, *ptr;
8 Q1 y2 H, C$ n# ^/ Zint i = 0; 
: W, l* f8 f' E+ B# V( f/* get the current path environment */ / \7 z% H6 U5 d& C1 C% Z! Y+ ^
ptr = getenv("PATH"); & J* [" S: `* z- Z' i% t/ l
/* set up new path */
9 A% s+ ^' z' V* @: ~- ^path = malloc(strlen(ptr)+15); 3 e4 _/ R7 Z/ ^
strcpy(path,"PATH=");
8 H$ ?( ]# S2 }4 Z( i' Istrcat(path,ptr);
, V7 E* D1 h& t9 r; T# y" Tstrcat(path,";c:\\temp"); 
3 H& C1 m# l$ X3 Q: c# Q/* replace the current path and display current environment */ ' _) K2 A9 Q4 k) N) D
putenv(path); ! n6 }& {# Z5 X- B* [" w4 ?, J
while (environ) 9 g0 I6 p* E4 t0 h, J
printf("%s\n",environ[i++]); 0 P1 X! k5 ^2 q" r6 G
return 0; ( ~% m3 I( F) S# Z6 H, u; q# c
} , j" v: _ ?2 A7 g; q6 ^+ \

1 |3 r5 ]3 Q- E) ] I; n3 D+ {, Y5 S5 U; `
函数名: putimage
; P& m1 f. {* w% D6 c功能: 在屏幕上输出一个位图 % A8 |0 x- T0 ~0 f r+ _( O6 ^
用法: void far putimage(int x, int y, void far *bitmap, int op); ) `5 ]% p! }. C8 S w$ ~$ C, p
程序例: & i% i# J8 {6 C. o5 n
#include <GRAPHICS.H>; D9 k& |4 \! h* b+ b- j8 |
#include <STDLIB.H>+ ]' f# M: V1 M9 i
#include <STDIO.H>1 ]* Q0 ~* i5 l) q5 F3 S& D
#include <CONIO.H>9 I( ^: m5 m8 v. x* [/ V% A
#define ARROW_SIZE 10 ) z( O1 e$ _ w5 Z6 a0 f
void draw_arrow(int x, int y); ; a2 s/ u4 J4 t5 x X
int main(void)
' [9 l$ ~9 c! S' r{
! O' {8 X2 k+ o5 r6 k9 Q% H: J9 P/* request autodetection */ & E6 T G1 Q5 h* e
int gdriver = DETECT, gmode, errorcode; , K/ |( k$ n! z0 u) K# u
void *arrow; . V% t) Y" s. o2 U& {; {9 ~1 ]
int x, y, maxx;
! N& |$ |6 I6 B/ h8 S$ R& C* @9 ^unsigned int size; 6 e/ T! t8 p8 G
/* initialize graphics and local variables */ 2 d9 d4 v& G# r: b
initgraph(&gdriver, &gmode, ""); # h v; N$ B" `$ X' E
/* read result of initialization */
" j3 Q# A# L4 @2 D* Gerrorcode = graphresult(); 1 p: ~1 W. d0 r8 V2 P" S9 H, w
if (errorcode != grOk) /* an error occurred */
9 K4 |: Q7 v$ c5 M{
6 i# O4 P3 l/ M: s6 Iprintf("Graphics error: %s\n", grapherrormsg(errorcode)); 8 T/ ~% W, s* d7 R( N4 K/ w7 T
printf("Press any key to halt:"); + a T h+ n- X/ M7 p+ Y" \
getch(); 2 K, h0 I% F# x5 v8 Q1 U" W* E& i
exit(1); /* terminate with an error code */
- e. r" G0 a' m5 I( ?} 1 _0 ^4 n; M" u; h: q
maxx = getmaxx(); 4 U/ C& h3 F* k- V/ H1 S
x = 0;
7 x8 z1 R/ M( y. u; D Ly = getmaxy() / 2; 
, U# l) ~" _' H/* draw the image to be grabbed */
% j! @( f, {1 z" N4 \5 v0 Pdraw_arrow(x, y); 
! j4 L4 Z2 d! Q/ ?% P c0 m/* calculate the size of the image */ % S5 J3 |, {7 d
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); $ B; A) K R7 I) K
/* allocate memory to hold the image */
7 M5 q! A, ]# w+ w- X8 r Barrow = malloc(size); + w: n3 h$ t$ C
/* grab the image */
7 V; i v3 L$ ]9 W# t' ^getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
$ r, E+ C& D2 n! Y; g- q: q/* repeat until a key is pressed */
! Y" C# `+ j8 G& O- W- p. Xwhile (!kbhit())
/ [8 H- T0 v2 {' J Y3 s{
2 K0 C. L, ?- I: V1 X/ @/* erase old image */ ; Z) Z! v3 _2 c% J z1 Q4 @/ C
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 3 P% e) Q# y2 A* X2 ~
x += ARROW_SIZE;
* r6 M! \( Y' _7 _3 w( F4 h0 R2 lif (x >= maxx)
( q0 X! G' g2 T/ C% Jx = 0; 
8 C j6 g; w q7 O/* plot new image */ 0 x3 R1 L, o' g/ l d3 o
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
4 }9 s8 ]$ F+ L: @1 I( j+ G1 s} 1 \6 ~$ H* v0 h: g9 D+ U2 K
/* clean up */ : D1 O4 b y4 ~7 Q7 |2 Q
free(arrow); ! z' }" ~7 }1 ~( G- L/ J b
closegraph(); # m- W3 m; q% ~, p
return 0;
- v1 h; L1 k9 H) v8 E* V& ~+ Y+ s} - v, A7 k: I& [( M( C* s+ [
void draw_arrow(int x, int y)
6 M: ?0 x! n( |) t" G& J( C% ~{
7 @& y1 D' \* m( k/* draw an arrow on the screen */ 0 y/ Q+ M5 y+ ^4 L9 U% X$ Q
moveto(x, y); ; C! E* R# m$ s, U0 H/ r
linerel(4*ARROW_SIZE, 0); / F2 \, m4 [1 y: U- z$ c0 K" R
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE); 0 ?5 Z$ G; a2 o, C, F
linerel(0, 2*ARROW_SIZE); + }* I! P N; q x) M- Z
linerel(2*ARROW_SIZE, -1*ARROW_SIZE); 8 w- r! l: p( `0 U* W- x) B9 H
}
; e) Y: x( L$ \! ?$ _
, v( |, M1 c! t" g2 y* }
' S7 D4 ]$ h6 C9 p函数名: putpixel 1 h' J2 W+ u7 M0 U V& W
功能: 在指定位置画一像素 2 ^: I, Z2 D8 S( |* |
用法: void far putpixel (int x, int y, int pixelcolor); . m7 d' G+ O' j# I' x' I
程序例: 
9 `3 c: j9 H8 }) p5 v#include <GRAPHICS.H>
#include <STDLIB.H>
' n) {" ?+ P2 F/ V#include <STDIO.H>5 @4 J, ~" A8 A0 ~
#include <CONIO.H>
4 c9 T; e# r! z2 e, [ B; ^0 ^% L#include <DOS.H>
+ b2 X: \* O# j#define PIXEL_COUNT 1000
- K# e, y: h& {. z ]- }#define DELAY_TIME 100 /* in milliseconds */ ! e6 r+ k% O% U% p" S
int main(void)
4 L! p3 Q0 T* a. T1 W{
; R- X7 @9 K9 v6 R4 q5 x) }5 Y/* request autodetection */
$ D, a& h% e( n8 x7 \7 |# Q$ ^int gdriver = DETECT, gmode, errorcode;
' u# R8 z7 w5 l+ U7 _0 d! Gint i, x, y, color, maxx, maxy, maxcolor, seed; $ y8 I/ n$ `7 r6 Q+ {
/* initialize graphics and local variables */
8 Y) R; y* |& n' [- Yinitgraph(&gdriver, &gmode, ""); * G3 N3 W* ^! ~+ t( T/ i- b
/* read result of initialization */
; r. N: L% o4 d' C- q0 Uerrorcode = graphresult();
% o( Q9 s" S! e3 V- hif (errorcode != grOk) /* an error occurred */
- m; @5 y9 _. }{
, i/ s( j# [, g5 `7 |printf("Graphics error: %s\n", grapherrormsg(errorcode));
, P& O4 h' \; Lprintf("Press any key to halt:"); ) f- n' \6 s7 U7 ]- x3 F
getch();
/ j% U' X0 z F2 ?* ?exit(1); /* terminate with an error code */ ! m3 `# e6 {' v
} 
. Y, P! r# O- ]7 qmaxx = getmaxx() + 1;
" m/ e: ^: ?% Smaxy = getmaxy() + 1; / k G: X8 F$ G( ~& i" P
maxcolor = getmaxcolor() + 1; 
9 \1 v8 I+ j! W; _# Y( Pwhile (!kbhit()) $ i Q1 c, Q/ ]: \" D1 X3 }$ ]) o
{
, ~" t9 a! o. l! M2 u/* seed the random number generator */ , m5 e7 x, L; L/ i+ ?/ L
seed = random(32767);
9 T: J8 y3 f. [' e* \1 h7 Vsrand(seed); ' ^" o* ~! G+ a3 |" M& Y) n
for (i=0; i<PIXEL_COUNT; { ; z& s; r2 l0 C' b# k6 [: L
x = random(maxx);
& @8 P: u, {+ Zy = random(maxy); ( Y5 q8 j+ q) k! P2 B
color = random(maxcolor);
8 d) g$ N+ M% k1 ~putpixel(x, y, color); $ W; A; P! Y$ E# {
} 
# ]+ U5 ~$ H' Q; L: i% l; Z. G3 Ddelay(DELAY_TIME); # r* i7 H0 S) Y& e5 O
srand(seed);
9 R" _( K/ L( R0 y3 ^: W% ~" tfor (i=0; i<PIXEL_COUNT; {
 b# V* W2 ?% p p5 z0 _' ]% [1 ^x = random(maxx); . m/ I6 h; v7 z/ L2 L) h/ l$ X' N
y = random(maxy); / d: D& h: n! `2 @
color = random(maxcolor);
* m" _2 ?" ?; Hif (color == getpixel(x, y))
+ k7 V. [& u' T3 @- s9 `& zputpixel(x, y, 0); ( g' ~, j4 E4 p4 T
} 9 D) h9 c, W5 F8 J8 N0 W- i
} * n/ f$ B" l2 S& x" |
/* clean up */
; W; H1 @/ M3 ]4 y) `0 pgetch(); 2 a4 O' s& }. Z9 U+ X. w) B
closegraph(); 3 K4 @! t1 z3 T) r8 h# u, s
return 0; 6 W7 M( m( l+ A, A# b+ D
} ! U3 o$ _$ A0 P) S
6 q9 n/ {) x- L0 O

0 k" ]' w; [% C! L4 Y% J函数名: puts 
( I1 J( B, I, O' |功能: 送一字符串到流中
8 C5 i- B$ r3 b用法: int puts(char *string); + `/ K# j0 [/ G1 x) s0 @' R1 u
程序例: 
8 J2 g- L, L5 Q# h#include <STDIO.H>& i) N1 {2 `3 O4 I( K
int main(void)
5 ~ E7 n' B, A$ }{ ! C9 g) N. e7 H2 Z8 R+ [' W |, A9 a
char string[] = "This is an example output string\n"; 
8 s* Z+ {3 M8 `+ J1 n9 U6 u M$ dputs(string);
; s/ F: {! y* W( y. ^* _: R3 d3 zreturn 0; $ x. S r$ }5 z
} 
5 E9 q, R K! ^. B# \& j" d
, a# }! c: Q& I& a$ a% M/ {
2 Q- Q, A( E0 t" R函数名: puttext 
9 ]8 j9 N5 \5 u' V6 K- Y' d功能: 将文本从存储区拷贝到屏幕 1 `6 m% b7 v) Y5 U
用法: int puttext(int left, int top, int right, int bottom, void *source); ( N( B# h" K: o
程序例: 7 m; A+ F/ c) y% {. g) ^9 b' y1 D% s
#include <CONIO.H>) e7 a* [& `7 q4 q/ U1 J; \8 T
int main(void) ; g' f; P `8 R% f1 H/ m
{ & _* T. o. n' V2 f7 B
char buffer[512]; 1 x7 L0 k: O% r% ]5 w3 m" S" H
/* put some text to the console */
- q" r' a n$ D% ^% i1 ?6 ?6 ]clrscr(); " ]$ q0 n# b# I
gotoxy(20, 12); $ C8 s# @# `4 I% h. } X
cprintf("This is a test. Press any key to continue ..."); , ]* |; K# I" ~) N# d
getch(); 
+ J5 g9 e6 A. r3 Y6 l6 S/* grab screen contents */ ) x8 K7 F7 T8 u' I+ \5 y
gettext(20, 12, 36, 21,buffer); 3 E8 Z: |- D x$ m' |9 W" \) h
clrscr(); 
 h" O0 t& l, Z# Y3 {7 B. f/* put selected characters back to the screen */ * n& ]5 y9 x8 c2 T2 k$ X/ Y9 n
gotoxy(20, 12);
8 |- } N2 o: M' X, b7 Gputtext(20, 12, 36, 21, buffer);
1 O7 l9 w3 l: |# H: Z7 L! J, a: H2 L2 Bgetch(); & Z( }& ^" V) M+ J
return 0; / u1 f, W7 J* z, @
} , O# Q$ u- h Y. {1 T( n
& j1 M, W1 @1 ]2 m; d/ l$ u4 r

- C: P6 u9 M' }. H3 u函数名: putw 
. Y7 A( u Q" n* ]) A4 n- h/ z$ R功能: 把一字符或字送到流中 " v' y8 Q, u4 U$ g
用法: int putw(int w, FILE *stream); 2 I9 Z1 b& j: c1 o- v6 j: `" a7 _
程序例: 
; l3 s o/ ]& @" x0 B1 d8 h3 B( t#include <STDIO.H>
, V8 J0 [7 n* E6 K# H6 W#include <STDLIB.H>9 z' g4 F# ?9 M; w8 P0 n( x- B
#define FNAME "test.$$$" # G* L1 ]/ {5 ~1 K% ^- M: x
int main(void) ! M% a e. l l0 ]$ X( |- {
{ 2 _$ B) k# o. ^
FILE *fp;
; g. w1 I( T8 B5 ~5 e7 I. j; r! n/ dint word; 
1 {* H* N8 k( ~/* place the word in a file */ x2 ^: M" }3 x J/ r a/ s8 `5 T
fp = fopen(FNAME, "wb");
- i# Y- V2 d" m" p% Wif (fp == NULL) + L- r( B0 H: d$ ^9 m( T& m( n+ }
{
' j- ?- g/ h! j" Y6 `- ^printf("Error opening file %s\n", FNAME); : j4 P$ P' \' H& c+ X; M
exit(1);
" h- ~3 D2 W, c! V} 
$ A2 s: F& S* v0 b; n6 Cword = 94;
+ t) ^1 S# k+ C: J0 Bputw(word,fp);
# A! l+ t- P) c& |0 Uif (ferror(fp))
4 F& N2 U1 r% s! m7 qprintf("Error writing to file\n");
1 w* v* q' J- l8 r! e& a+ aelse
, X& J$ H" s' q" N pprintf("Successful write\n");
$ U& s9 n2 V! t5 {% Ufclose(fp); 
- P$ r. B* g3 O5 k% b1 M+ O& t/ l/* reopen the file */ , l+ N7 u+ ]* ^
fp = fopen(FNAME, "rb");
- H9 i b4 h& A1 ^ O7 D5 sif (fp == NULL) 6 u$ i5 O: j0 M
{ 9 X3 |# Z; J6 V# Z' W# k8 x
printf("Error opening file %s\n", FNAME);
# c/ K" C/ E# Mexit(1);
) Y2 ~. n7 a1 o6 }; k} 
! @3 ]/ z; B. Q/* extract the word */
9 R, q- d8 {( B3 E# Zword = getw(fp);
# n7 c+ Z) R' j6 {/ Gif (ferror(fp)) ' b" D4 P5 y3 z3 i
printf("Error reading file\n");
; B: k8 ]: E# r3 k+ c& d% zelse & z4 r! x: T) s1 |
printf("Successful read: word = %d\n", word); * d# \5 L m& U; ?$ A
/* clean up */ ! g% a0 E/ S: [! j% V/ E
fclose(fp);
8 k, V8 O4 B) [4 ]& h7 v. J: [5 yunlink(FNAME); - E4 h0 E+ O0 o; `/ B4 C" P- c7 z
return 0;
 i' u2 L) ?, v' I1 ~}