查看: 2784|回复: 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, Q$ }) F0 k5 N1 p& Z3 _
putc(msg[i++], stdout); M3 I' P% W! {! k1 Q& j9 T
return 0;
& E# I0 d0 Q( O' C4 ]% M}
. c) J0 T' t' {& E3 J& [* n
4 p8 T8 ~4 Q. @ U# D5 K4 S8 @* m! H, A7 h" k7 B
函数名: putch : ?, d8 a2 y- A U; G0 ~
功能: 输出字符到控制台 5 K: ]$ `7 [. u4 g* _
用法: int putch(int ch); 9 S4 g1 w' c1 @8 E2 @9 ^$ h
程序例: & e+ \) s0 y) q2 t* p: V+ Y
#include <STDIO.H>2 I, G& ~) \* m3 z% D
#include <CONIO.H>' T x- B+ @; o+ X, }/ v
int main(void)
6 S1 z# _6 L" H0 g* a( B- l7 L{
" p( Z( u& @& N" `* J; Wchar ch = 0; 
8 A& |% L# ?8 l, [2 [5 cprintf("Input a string:");
1 `: c1 e4 x2 bwhile ((ch != '\r')) 9 t3 J8 E0 u" e- L1 q% X
{ % y" A9 f5 d8 _; f9 p/ M; w
ch = getch(); 0 y+ a9 b3 ]" q0 t/ |; ]4 t
putch(ch); 7 G% p4 |/ q# {3 d. C2 y. J1 r
}
2 o( M, ]% J6 ?4 t9 Ireturn 0;
# M6 G/ q! k; a w. g}
8 b* W4 c( ^6 \0 M6 [% a7 d/ R! c5 R+ Q: M
7 c/ C! p- c! P. @2 F# y* f
函数名: putchar ( t+ i _5 Y: `. u' E1 g
功能: 在stdout上输出字符 $ n! O7 O6 k: t6 n; |9 R5 N, f
用法: int putchar(int ch);
6 n- w" j$ v. d8 K5 q$ ]程序例: " z. O0 U9 B: H1 O: S3 v( }0 e- a( {
#include <STDIO.H>
: \ D! h" k$ o4 l/* define some box-drawing characters */ ) p. o, {. z) a; E- y
#define LEFT_TOP 0xDA
! E' t! G9 b: O5 Z#define RIGHT_TOP 0xBF
/ w/ G$ b% Z: }1 | S2 s( J6 o. B#define HORIZ 0xC4 ( M" T* [( B& C- K
#define VERT 0xB3
) m! e% ?3 \; @! f0 \# [ U0 R/ b#define LEFT_BOT 0xC0 : }( r) ?/ P* j$ c' L
#define RIGHT_BOT 0xD9 3 N' ^7 u( I8 {9 \6 n) D# r d6 L
int main(void) ; Z4 I+ n; `4 `3 G2 R( }7 o
{
$ S. Q8 A) l n# z* E3 r, A" Jchar i, j; , @4 E6 a: M$ y
/* draw the top of the box */
" e. t! h2 c- }putchar(LEFT_TOP); " b5 m/ F v! p, D0 [& |5 M
for (i=0; i<10; i++) " _& \1 z9 [1 E! k. @$ i
putchar(HORIZ);
5 A" _1 s2 A7 g6 v: @, E5 ~" I6 Xputchar(RIGHT_TOP);
- r: i4 k/ F& r! k7 m6 K! e' i, ]8 Xputchar('\n'); 1 H" i6 Q7 X P" I7 j/ w( v
/* draw the middle */
7 j' V a% s# T, }/ L" v# V& sfor (i=0; i<4; i++)
/ h% s/ K# l* Z6 v; c{ # q% t; Y" x V
putchar(VERT);
9 j# J* i J) x5 }1 Yfor (j=0; j<10; j++)
; y4 Q. U- @4 v7 q7 ]putchar(' '); " q3 i/ Z+ \4 J* V' _
putchar(VERT);
3 U* E. {& F1 R+ @* nputchar('\n');
* X/ s$ j4 J7 C! T% r+ T} / K) Q, `9 w6 I. S# _9 _
/* draw the bottom */ % L" _: d( I6 m: _9 G
putchar(LEFT_BOT);
( U# y. w3 e- _ D( o) x" I* `for (i=0; i<10; i++) $ `, b: Y, Y; h/ k& v7 G
putchar(HORIZ);
3 O% _, W% e/ H; |3 a2 q {putchar(RIGHT_BOT); 8 W# o& A/ {0 b! }2 c
putchar('\n'); $ m1 V6 x* }4 W9 a
return 0; 5 `1 \$ `) h8 P# e1 W
}
 m( ^. _, E6 _6 ]. K$ u0 v' n& ~" a; l
- q( t( y: V1 C: I8 l
函数名: putenv 4 c# a( z) _( U) O' b# j
功能: 把字符串加到当前环境中 : Y/ N1 A7 Q; `6 a5 b
用法: int putenv(char *envvar); ( Y6 h% `; ^* R9 W7 k2 l% L
程序例: 1 ?# l0 ?2 D4 g% X( _; C5 J3 ?
#include <STDIO.H>
: _: Z1 M' f! o#include <STDLIB.H>
2 c4 `- d& L1 \#include <ALLOC.H>
2 q0 l$ U0 s9 c% D, G#include <STRING.H>
/ Q1 k6 f& G1 ]2 r#include <DOS.H>( K8 E: q% m' @( E' f1 A* Z4 s
int main(void) ! c; Q3 g$ s8 P( l$ H, @
{
6 ]+ `9 i' M+ b3 n- J; Achar *path, *ptr; 7 \1 Y4 x* l2 v# O$ x& ?
int i = 0; 
! m5 p$ s( Z: n6 [' w/* get the current path environment */ - \7 C! \) ^2 @ L8 S
ptr = getenv("PATH"); 
& o/ B9 C4 P. k/ h7 k$ O- |/* set up new path */
; n/ h5 m( T" O# C6 {5 ]) Wpath = malloc(strlen(ptr)+15);
: w8 [- e$ f! Y" F/ F% R* J4 ?- S cstrcpy(path,"PATH="); % f4 y) P& R' e2 x" y( w/ Q
strcat(path,ptr); # i) l/ V; k! F. S! x# [
strcat(path,";c:\\temp"); 
4 f6 P! ]2 b2 u/* replace the current path and display current environment */
6 h3 i4 V: [: V' c9 c2 e7 |) D! H7 Jputenv(path);
7 s: y* g1 x1 c/ e- d& Twhile (environ) ! f3 H1 w# r! Q" h, C: t% I: E% g
printf("%s\n",environ[i++]); 
% n, x2 z R( w. R) N2 ]: B3 L$ Greturn 0; $ S$ q% |8 R) m. k, I: j0 r+ J
} 5 k! T& f1 a- z! F. h" a J
 K1 F. U7 u. F7 K+ m& b7 G! a6 W& g2 A

2 ?% E7 F: M7 V% ~, @& g' J% z函数名: putimage # k: ~- M0 I; d: Z
功能: 在屏幕上输出一个位图
9 y3 I; }; S3 W用法: void far putimage(int x, int y, void far *bitmap, int op); ) B7 i3 `/ w! C q
程序例: 
) W- ~. H/ i% ~1 f( n' T0 Q! i# M#include <GRAPHICS.H>% Z& t' C _2 ~% `; e) F( O, }& f
#include <STDLIB.H>
; z9 t0 `, L" l! u8 t) {& R% T& P3 A#include <STDIO.H>) q6 j$ g+ v( w7 h
#include <CONIO.H>
) m- g! ?$ P/ i#define ARROW_SIZE 10 
( o# k8 N5 q o7 _3 s# {* ? jvoid draw_arrow(int x, int y); 2 ]; R) i% z8 m3 k z' Z- F
int main(void) 4 x! N4 F$ Q3 B* _- L/ f
{
$ x) ^. ~4 d) y1 Z9 H+ Y6 r3 S" `/* request autodetection */ : S/ E( v; A* b- I! ]" }
int gdriver = DETECT, gmode, errorcode;
1 l# V) d0 o. ~; Ivoid *arrow; 3 B; L; [& p6 M4 X% N$ Q
int x, y, maxx; 2 P( r4 d# u4 i- L+ O. U! g/ [
unsigned int size; 0 O* c- z- u$ W% a
/* initialize graphics and local variables */ - q; V; Z8 B! K4 q2 t! h/ s
initgraph(&gdriver, &gmode, ""); 
' {7 g6 O: ^* |7 a: J d/* read result of initialization */ & e2 M" x( Z0 V- D8 j" J/ E
errorcode = graphresult(); " E$ Q* L6 H% B
if (errorcode != grOk) /* an error occurred */ " i4 v( |( J# c% s# a' T+ a2 L5 Y% P0 W
{
/ V/ E9 m9 m2 g _" ?+ \printf("Graphics error: %s\n", grapherrormsg(errorcode));
( ~7 Z3 B* Y# h. yprintf("Press any key to halt:"); . S: p0 b O2 k3 U B. t
getch();
& v0 X: L7 l" h5 \' P! `exit(1); /* terminate with an error code */
9 r' Y) J" |+ |3 N$ v% ~; e} / e7 Z% M( t% }! B# p- F
maxx = getmaxx();
: X; d$ M9 z3 y# b, Px = 0; * u3 Q8 R$ B' c8 v+ c. g
y = getmaxy() / 2; & V7 n8 \$ D. G$ b4 D% w. V
/* draw the image to be grabbed */ ' @9 e+ a3 w/ o
draw_arrow(x, y); 
/* calculate the size of the image */
. U4 R# _& B! Qsize = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); ; y. Q. [0 Q+ a+ {) e6 k
/* allocate memory to hold the image */
# t( r8 M' C# N! ?2 v4 [$ L+ `arrow = malloc(size); # Q; d( _2 U& z0 e" p5 Y
/* grab the image */
8 d7 u: ?- X i5 B. T3 @getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); % y$ I( t5 E( ?
/* repeat until a key is pressed */ # z) x/ }9 W' e* R
while (!kbhit())
/ b0 T r& V+ w+ u7 {6 P) J{
; a7 v. F6 y& i' F3 p+ m/* erase old image */ 1 f& w, G, e9 A/ F# u5 O: h
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
- f" z" S' }6 f( Q& V* S4 }x += ARROW_SIZE; ! l2 M! V' W4 d/ Q
if (x >= maxx) " G, ^' d% |2 I. i
x = 0; - F2 F6 {& ?; ?
/* plot new image */
6 d5 U# l5 X# `& sputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); : }+ r4 H& @, {0 @: m1 @
} 4 z: P# e" c0 T e. \4 r) X
/* clean up */ $ u9 v$ K+ o5 _2 M4 c* b, E! Y
free(arrow); 8 t. P: Z4 `/ N. x# }
closegraph();
/ n7 J, \' j \8 T( ?0 ]% Hreturn 0;
" x0 z8 n# H/ R} 
3 \0 _ k# Y1 F$ k& U. n; V8 I1 ?void draw_arrow(int x, int y) " l% P* c: g r3 F
{ ) e- B- {; K- L1 Y* G
/* draw an arrow on the screen */
& k) U, }; s8 m2 ymoveto(x, y);
# G- p0 v2 u3 A" y0 q1 tlinerel(4*ARROW_SIZE, 0); 0 T3 C. K h) t5 |
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE); 5 d( I# @, g! r3 k, [( u8 L
linerel(0, 2*ARROW_SIZE); ( }, A3 \6 \7 ]# N5 d, x2 N$ m4 S
linerel(2*ARROW_SIZE, -1*ARROW_SIZE);
: B+ L9 w: D" X& M5 \/ y4 r7 l} 9 v6 d$ m9 v5 C! n* s
& ~. N4 v. S$ R" e) L1 W

* [% o7 q o" F( Z( r) W8 M9 C函数名: putpixel 
' f5 v1 f) N: W2 ]+ |/ k5 k1 g功能: 在指定位置画一像素 ' x9 I3 d: P8 T m
用法: void far putpixel (int x, int y, int pixelcolor);
& I$ _$ d5 I2 q4 G) R, R程序例: 
7 |5 T. g2 D1 D: J+ s4 p#include <GRAPHICS.H>
7 a0 I" R6 ~7 w' @1 q* H#include <STDLIB.H>
( B% v& B+ l1 V! e% [2 ^5 D/ I#include <STDIO.H>; K% i/ @: G$ B
#include <CONIO.H>: z/ T ?# I# G6 f9 g
#include <DOS.H>
* j& O5 O! j! o4 Y6 ~/ N* d- Z#define PIXEL_COUNT 1000 . O9 Z8 g8 O; l7 h
#define DELAY_TIME 100 /* in milliseconds */ ; h/ S% H# _9 S2 v! u" v
int main(void)
& Y1 z& G4 z3 y) w{ z. z+ K6 r, C; a, M& t
/* request autodetection */
 v( b& L7 h7 ~2 ^0 O( |) `int gdriver = DETECT, gmode, errorcode;
4 J4 p/ ]9 i7 q. A% K8 o1 k7 Fint i, x, y, color, maxx, maxy, maxcolor, seed; 
% G% ~( O+ f# v* b: |/* initialize graphics and local variables */
- a2 T/ F3 e2 _; e* Ginitgraph(&gdriver, &gmode, ""); 
2 y1 G! e4 Y- k% b! u" E R/* read result of initialization */
errorcode = graphresult();
8 a5 r+ v/ c6 b8 dif (errorcode != grOk) /* an error occurred */ " F7 m6 p: t5 N* }
{ U0 B1 D7 r) _! J) b0 T
printf("Graphics error: %s\n", grapherrormsg(errorcode));
6 E; U1 t, ~9 M. mprintf("Press any key to halt:");
) ~7 V, D. Z( W2 g0 P5 \ fgetch();
2 w, @' ^1 x8 S: i0 [exit(1); /* terminate with an error code */
5 c8 r n/ U% ?" ]; K} 7 k p8 I" i. d ^- }
maxx = getmaxx() + 1;
: ~1 N( Y6 A7 ]maxy = getmaxy() + 1; - F3 Q1 A6 R& a- t
maxcolor = getmaxcolor() + 1; 
7 q; H! H% I* \9 i9 i# a$ wwhile (!kbhit()) 6 q2 {$ b6 `2 Y9 O9 @
{
8 u3 j( q" T) x5 L6 e K/* seed the random number generator */
1 s: Z1 p/ Q- H+ S8 f( Nseed = random(32767); " ]5 ^8 E/ m# A% s" D8 x5 O
srand(seed); : t& k3 P# |. \; }0 T i. X
for (i=0; i<PIXEL_COUNT; {
+ q* F- j6 _$ p1 X i- Ax = random(maxx); : N3 l4 E* H5 z$ j& T5 z: m
y = random(maxy);
; d4 X+ P6 M" J: I% O Gcolor = random(maxcolor);
2 f& G$ V3 Y5 h- Nputpixel(x, y, color); * z8 i; ?; l5 E; m) V
} 
. F6 w. A, A" }3 }- }6 K4 Jdelay(DELAY_TIME);
" E4 R E/ ^; t" w+ h/ C; Zsrand(seed);
! I8 p# ^+ A) `for (i=0; i<PIXEL_COUNT; { 0 r9 _9 U3 H( V% q' n7 _
x = random(maxx); - |. L! r$ l. P* j: h* C
y = random(maxy); . | z$ L+ k2 L
color = random(maxcolor); ; j# B9 n+ W9 @( D" f/ d$ U9 `; L
if (color == getpixel(x, y))
& o5 j) Q4 ~' w# T; k4 H1 u' nputpixel(x, y, 0);
+ y* [( ?, ]! B: x9 H$ M! W} . {7 u0 r# u( F; f
} 
' F* E( a1 b k6 ]( z5 ]1 W/* clean up */
, e! e3 R5 j0 W! H# Hgetch();
7 Y" N! M& k5 l% d* V! p6 ^closegraph();
# m7 g1 A( w) N- H* X4 E, b) qreturn 0; 6 S6 n5 ~/ ^7 u+ ^+ _+ s k
}
0 {, X! }* R# e2 P$ n O' Q9 y1 Y& H( f6 J9 H& g# x0 e
7 z+ v2 A# l, Q) _0 j+ L* w
函数名: puts 
2 h( C; O7 s7 Y0 ]9 B$ [功能: 送一字符串到流中 5 X9 ^- P: \% e( ]
用法: int puts(char *string); ; w$ Q" J6 [* X, n5 d" T7 S3 ?; I
程序例: 
) T& [2 {9 r* {, w! z7 J#include <STDIO.H>
; N1 z! Z) E Z! _( l# c3 gint main(void) ; W- U- c, Z. M
{
& f5 S- O! e7 `: Rchar string[] = "This is an example output string\n"; $ Z. T" B, { c. j; M+ b5 Y1 C
puts(string); g; {" c+ l& H" A& B
return 0;
8 Z' [- R0 s; i! k/ d} + E9 W3 I5 N% X3 \- r, E5 ]
6 H! H3 A: z. |0 F4 w
+ r: K% z2 o Z$ P! _" U, q9 _ k
函数名: puttext 
+ `9 J$ X6 F: W/ r7 @6 I+ u9 d功能: 将文本从存储区拷贝到屏幕
9 T5 s% o: Z+ g* R ?用法: int puttext(int left, int top, int right, int bottom, void *source);
5 U( {$ l( t! z* p' U: l; V程序例: 6 [" a. f, ^/ w3 O8 S3 P
#include <CONIO.H>
0 o+ {7 A5 E, \9 Y2 w4 K' s, Aint main(void)
$ O1 w% [; e& ?3 h! }2 k{ / ?( D2 k/ c- C6 l% q
char buffer[512]; : G9 D& {5 r' U" C. y( e
/* put some text to the console */
, E6 ?1 A* g+ c6 h* k# lclrscr(); ) M- ]) q4 n9 F5 J* T& k
gotoxy(20, 12);
4 J, I6 H* Q7 ?: ~cprintf("This is a test. Press any key to continue ...");
0 b+ l, W" h: q3 r+ j. Bgetch(); " p' Q6 O3 d4 O8 Y
/* grab screen contents */ ) O5 M ? @$ X2 M$ {" U1 @
gettext(20, 12, 36, 21,buffer); - z5 m+ Q& r# {% ^% ^2 j( V' t2 }
clrscr(); 4 g+ v# [3 S3 f: w
/* put selected characters back to the screen */
& J4 Y0 \( b( ggotoxy(20, 12);
1 l: E8 ]4 O1 \4 hputtext(20, 12, 36, 21, buffer); % B# F( s/ C( U. M2 n( c, G
getch(); , T8 _; J4 a# u* }$ V
return 0; * B3 r2 g! O) W+ |- J' `8 d( W5 e* q
} % X( Z- _ {$ Z4 E
7 D& n ]$ h, \+ y8 d7 A0 j
9 }8 R* ^! i+ i- l& ^1 \
函数名: putw 
7 X7 d8 M6 v' C' M" M功能: 把一字符或字送到流中 # w+ J/ o4 }/ U
用法: int putw(int w, FILE *stream);
 ^6 N) T( d. L8 Y& i, e程序例: ! i. ~6 p4 b/ r5 Y6 Q
#include <STDIO.H>
* B7 o6 U. v x+ ^# G4 Y#include <STDLIB.H>8 Z6 A% W, U6 Z( I. U* M
#define FNAME "test.$$$" & U& Z# [4 W$ l& d$ b
int main(void) t5 A6 z6 j: N" \# X% {( A
{
- C, H3 j" n( O. E8 LFILE *fp;
( Y, ?! ~) d0 }# Uint word; 
; K4 W0 C! j+ p r% M/* place the word in a file */
% C! g5 M9 ]2 y4 M9 `2 p/ ~0 H Nfp = fopen(FNAME, "wb");
if (fp == NULL) 7 P0 E# o* O$ k( t9 i+ j
{
7 m3 x) n$ y6 s3 Q6 Lprintf("Error opening file %s\n", FNAME);
) g! D' o% u+ _8 Bexit(1);
 {7 Q4 |! y' `0 |0 q! m: _} 
# H3 L L; u& Z- D) V+ fword = 94; 9 ?! t! j. N6 N. p/ {
putw(word,fp); - x6 e X0 e3 S8 z; t
if (ferror(fp)) 4 b; L& D* C+ U r" Y$ y/ _
printf("Error writing to file\n"); , W' p- j: B' W7 p. X8 {* {, Y2 t
else
printf("Successful write\n"); 9 A2 Z' ^" |2 ?
fclose(fp); 
0 F" B. U3 l: ]1 A/* reopen the file */
9 Z7 F h- V2 m# a1 \6 Efp = fopen(FNAME, "rb");
/ c0 E5 Z8 U$ r2 T4 Fif (fp == NULL) . V( k8 ?4 h, u4 Y; }
{
6 W' d9 |$ }+ z9 Vprintf("Error opening file %s\n", FNAME); - g J1 K! j9 Z6 p8 T' ^1 A( m
exit(1);
% O8 ]7 e% k0 u; V} ' p! p: D* Q! q* |# y: |+ d7 d
/* extract the word */
- A: Z7 H4 o, u1 e, a, P a2 ?word = getw(fp); % \ F8 s: p1 Y
if (ferror(fp)) 1 Z2 c( ^4 c v7 @+ d
printf("Error reading file\n");
# ?! D, p3 m. F* Helse
' b7 I2 I% l' dprintf("Successful read: word = %d\n", word); 6 Y/ q/ I) t. @7 R
/* clean up */ 4 d; B; V9 f9 p4 p c
fclose(fp); # F/ o; |$ Q5 [. u. r+ E8 k
unlink(FNAME); 4 u: L) E5 j- d6 N3 y6 O
return 0;
$ C* l; i( [; F0 E0 @}