查看: 2688|回复: 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) 7 R2 T x1 [/ C) R- V4 ^' {
putc(msg[i++], stdout); 1 h8 [# C% L" H z M# \
return 0; - W* [, R# `5 w( k ], i, c
} 2 P' s4 k l- n0 `8 r

% R% J% m* ]' [3 G" R" k: J5 p+ P9 D& \' I5 L( \0 c
函数名: putch 
, i! G. j" _ W3 @- e. p功能: 输出字符到控制台 7 r( F. T- f) I: D/ Q
用法: int putch(int ch);
% n. J+ U, e* N7 X6 |& o: O6 ?程序例: 
" L6 C7 y, T' y#include <STDIO.H>7 d' b8 d" s G( t$ g( [
#include <CONIO.H>
, n& w4 v. k6 F0 eint main(void)
( V7 x: m; n) q2 e{ 2 U9 ?6 n" a _9 H$ a. k) d/ j2 C
char ch = 0; 
, i2 p, ~9 m3 {& \7 sprintf("Input a string:");
+ x; C5 F, @8 s: xwhile ((ch != '\r'))
) F0 u" _! y1 s{
" r( b z- R) `" Q" O/ Xch = getch();
! A/ I1 e! V- g+ Oputch(ch);
, [9 S5 f4 P Y- ?; Q} 2 j- n$ c7 P2 e' L) U6 T
return 0;
% `' |3 G9 G: h/ x9 `3 o}
$ K) ]6 w4 Q) A
, f# N( Z; D$ H6 w2 x& @! C! ~
. M- l4 ^0 r- u+ x" h函数名: putchar 
0 }3 f# ]$ n) C8 `5 e功能: 在stdout上输出字符 1 T4 b2 ~8 a' a# I0 l# C
用法: int putchar(int ch);
- `' a1 }5 w3 p0 M+ N程序例: 
0 R9 e1 T3 M* T- C( g: O; r! [#include <STDIO.H>
: L3 r M+ Q( |8 i. f6 |; z! H/* define some box-drawing characters */
; x5 b4 p7 Q# H% E2 C#define LEFT_TOP 0xDA
+ L F8 j9 l% z* Z9 ^- A8 \- x#define RIGHT_TOP 0xBF
' ~! r! ?& `. d; Q; m#define HORIZ 0xC4 % \1 c6 q; c8 y6 f0 y* L$ C4 V) H
#define VERT 0xB3
9 {* z o f5 a. k: l#define LEFT_BOT 0xC0 - P& `. v# |% r& l8 }
#define RIGHT_BOT 0xD9 6 F& K+ A+ i2 W$ F& B* o
int main(void)
6 S+ t1 t8 F: q( B O{
. v- o k; H: N( U8 N/ ?char i, j; 
, A9 e% v. g8 l7 q/* draw the top of the box */
3 |0 L9 P# H) W, Kputchar(LEFT_TOP); , B, ~% x, @( \. d5 E6 g
for (i=0; i<10; i++) / t* n+ l! v9 H) e! R! ~9 ~' A3 U6 u; U
putchar(HORIZ);
1 l# S+ f7 a( k: h+ s) cputchar(RIGHT_TOP); 5 b! M* }3 O7 h1 l( O
putchar('\n'); ' \% k1 i- P3 q, @% I3 m* e
/* draw the middle */ 0 e' A! n0 J% d( t
for (i=0; i<4; i++)
' s0 w- D4 I. n+ O6 l5 [{
7 X, r* x* L6 D# l, lputchar(VERT); 9 S1 q1 T9 d/ H3 w; I/ `! S! j- U2 w
for (j=0; j<10; j++)
$ A5 ]7 H& R& X5 p; X: u( e% Oputchar(' '); 4 i% N! Z: ?8 C1 S
putchar(VERT);
7 Q: w( |- Z4 [/ D) nputchar('\n'); ) l) p; D6 p4 W2 ~
} 
6 X! @7 E$ U" c( Y/* draw the bottom */ 1 U# ` h6 \& l
putchar(LEFT_BOT);
6 @) H$ d' [) Q _for (i=0; i<10; i++) , c, w9 b2 r% G
putchar(HORIZ); : i: K5 k' G+ S: m2 |$ l8 e# O7 `
putchar(RIGHT_BOT); 7 R- f+ j% I" p0 V2 \
putchar('\n'); , \( k& F" a1 _: E
return 0;
- \* Y* G+ ^! b! C; I}
( { y0 g; H& _& z c3 j9 a9 ?8 S* Z( @3 `' I! f5 C6 v

 G: G# S9 z* l/ `6 @函数名: putenv ; V- ~7 w" Y( d
功能: 把字符串加到当前环境中 a& d! O7 j+ F. e" B' ]
用法: int putenv(char *envvar); 0 L3 x. Z4 f& ]
程序例: : a8 ^" d+ r/ b" Q: |2 M" L
#include <STDIO.H>
9 [ [4 M. A" T/ `#include <STDLIB.H>
8 q9 @2 d. m c- e#include <ALLOC.H>8 g2 |/ J6 F% h% \! Z
#include <STRING.H>
: c, L4 @2 t8 r#include <DOS.H>( R7 S2 z4 I$ D+ x; t
int main(void)
9 r6 p, c3 [( `) U{ ; ?. s2 U% n2 P2 S8 `5 Y
char *path, *ptr; & ^" [' ?( I; E& d' t
int i = 0; % Y# F6 I) _1 r L
/* get the current path environment */
! B8 C- w0 x0 f- ~" ]3 ]ptr = getenv("PATH"); 
2 b, {% A1 o( j0 d9 D \/* set up new path */ 2 Y* ]4 L) I4 |. q
path = malloc(strlen(ptr)+15); 9 O+ q& Q- p( w, `! ]1 h# h
strcpy(path,"PATH=");
4 m) E1 a3 j) ?" kstrcat(path,ptr); / A+ l! J' G. O- l7 [
strcat(path,";c:\\temp"); 
2 a2 x+ N8 y+ f |) s9 ^/* replace the current path and display current environment */
2 p3 j' l6 r$ s& B. i& fputenv(path); 1 |- W) f9 w$ n& F
while (environ) # {+ H# @3 f) P3 ]+ B3 Y) q
printf("%s\n",environ[i++]); 
. |% f6 Y9 p4 M' x& g; z& o; Creturn 0;
+ `( S+ Y0 V( n9 E} 2 r' w$ K) G; x5 B3 U7 n9 N

6 F: z: h& {* @
6 Y& P$ @, B7 O7 w Z6 ^4 K1 I函数名: putimage
) F5 Q( J! e5 m' ~功能: 在屏幕上输出一个位图 2 ~3 k3 Y3 ^9 e
用法: void far putimage(int x, int y, void far *bitmap, int op);
7 _; ^( T% Y* @程序例: ' g- f# e) I E* L
#include <GRAPHICS.H>6 s! d& }" H4 x5 Y
#include <STDLIB.H>* _3 T9 i' D: N; A. p4 o2 U
#include <STDIO.H>" E8 w2 ?8 t$ C
#include <CONIO.H>& K8 _" b7 L' S, W. B* Y, [5 a
#define ARROW_SIZE 10 
* n9 S: j2 u% d" _void draw_arrow(int x, int y); 
( }$ Q2 j# M x7 H& m0 q* Wint main(void)
% y5 p$ Y( Q( s{
; s. @6 U! V8 q/ \( T9 P& i/* request autodetection */
( @- _& ^$ ~( r6 ?% {4 Bint gdriver = DETECT, gmode, errorcode;
& \* e7 Q c. X7 Ovoid *arrow;
7 \& a+ F3 t+ d# I; t6 H: Yint x, y, maxx; 4 i# ~9 c7 g- H/ g" h6 r: m+ B
unsigned int size; 
0 V$ _& _4 y. W& e: l# S5 @/* initialize graphics and local variables */ " L& {3 p8 t# g0 i) @) f
initgraph(&gdriver, &gmode, ""); N) l/ n: \! E! Q4 U0 T8 r- Z. `
/* read result of initialization */ 9 [" D7 V0 [9 d3 I0 Z% q
errorcode = graphresult();
' Y9 h3 p4 H/ {# sif (errorcode != grOk) /* an error occurred */
 Y% \: e l7 V( w) S' G& _3 `; P{
' q1 s% [3 Q0 E! t2 i5 C5 B6 Nprintf("Graphics error: %s\n", grapherrormsg(errorcode)); 8 M6 p' ~2 ?: R0 e3 ^
printf("Press any key to halt:");
2 l" }( X1 }! vgetch(); 4 l1 Y- E$ C8 U' [+ X3 N, [) }8 }
exit(1); /* terminate with an error code */
$ G$ [; s3 c1 B9 B. M} 8 f. Y9 J# v0 m$ G
maxx = getmaxx();
; q! s5 o+ L/ ~ j! @6 Z4 W* m: Sx = 0;
% _$ B( e1 A( b( x: ky = getmaxy() / 2; ' [. B! D9 [: E& e
/* draw the image to be grabbed */
) d- }! x5 f4 Tdraw_arrow(x, y); 
; X% j9 n: ]6 v, [5 X* D/* calculate the size of the image */
( ?' j! U d( g3 ^2 b6 c/ A* d3 qsize = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); + R* x5 H p* e% u$ [! Q" f3 Q
/* allocate memory to hold the image */ " l4 L! y2 q, e
arrow = malloc(size); 
# G" S/ T, P! q+ n/* grab the image */ : I2 y" U& W/ j- |7 x/ F
getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
1 [9 |3 E* N! J# K4 D* j/* repeat until a key is pressed */ 9 U7 m, Q2 N+ ?* b6 o. s
while (!kbhit())
8 L5 T1 R; X9 L' A7 z% O{ - K( \6 O5 O7 k p- Q- Q
/* erase old image */
& |# r g1 B% w. U- D3 fputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); ! v5 a; O# y/ N, v; E8 b
x += ARROW_SIZE;
/ N2 B: T* E. r- E6 m: {if (x >= maxx) 9 o" V+ x G- |5 b9 Z
x = 0; + p$ e6 i4 ]3 j0 m! |
/* plot new image */
9 ]& u, W; u% P3 H: n0 R, N6 Tputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); . P- d7 r0 [- z* _ d% w& g
} 1 P5 j" c/ _( Z Z- s. I* F
/* clean up */ 5 F6 J4 K% a5 t& K0 ~4 n
free(arrow); 8 ]0 l: ]4 F% O7 H$ C3 {3 Q
closegraph();
* U3 A W* q7 Z! d% Freturn 0; 8 P# D: `( w2 m+ E$ ~' D6 P
} 
0 I6 \; d! ]7 X# V4 p1 Evoid draw_arrow(int x, int y)
% ~1 M' @" j$ x/ W" ?{ 0 _8 Z! P) w* l) e/ A5 J
/* draw an arrow on the screen */ ( e# w. [& u/ ?1 j$ F) t" V
moveto(x, y);
- ?. e' O/ K5 |% slinerel(4*ARROW_SIZE, 0);
- E7 L" X: S Z/ f a+ flinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); , {" m3 ]5 l/ l1 f5 H& Q7 p
linerel(0, 2*ARROW_SIZE); ! Z1 e" D" a: s. }5 G8 x
linerel(2*ARROW_SIZE, -1*ARROW_SIZE); 6 u+ i: b" }' m& O
} ) F0 K" i. A: g) U6 T
. o* _2 } |; m x3 `- n
1 X% c3 V: y; O8 B9 A# ]0 e
函数名: putpixel 
" {6 }/ _0 u6 ~# g( |1 `( j功能: 在指定位置画一像素
) {6 z$ }! Q8 q* l3 f+ a) `& l8 |用法: void far putpixel (int x, int y, int pixelcolor); 7 b- x) \! B( r2 p; N
程序例: 6 \6 |* `1 r0 L
#include <GRAPHICS.H>
8 S J9 W( x& H3 a3 E#include <STDLIB.H>
+ S5 v2 B% v$ ?* O4 V1 t#include <STDIO.H>. Z: G) Q4 h2 S- H$ e
#include <CONIO.H>
* X$ e7 q, [1 \: |) |5 U: K/ F, {5 X#include <DOS.H>
' |0 y: O- r% Y; H+ h& }#define PIXEL_COUNT 1000
, D, T6 R+ o) k5 H7 }2 n/ {6 X* _+ [% y#define DELAY_TIME 100 /* in milliseconds */ 
8 K" T9 s% c5 |int main(void)
* ?" _0 }# w( q) m8 o& e{ j# A* H7 i# ]4 t, U. X$ f5 M4 H" _/ a
/* request autodetection */
6 f8 ^9 [/ r& O8 T/ hint gdriver = DETECT, gmode, errorcode; & D/ q! F p# y7 v. C' g5 o
int i, x, y, color, maxx, maxy, maxcolor, seed; - L6 ]' Y* y/ X" L% b% R1 x/ M
/* initialize graphics and local variables */
' J- D! K2 ?( s- Q" finitgraph(&gdriver, &gmode, ""); 0 T; T Z( u; b( H9 v
/* read result of initialization */
1 E* b2 B: e* ?1 i1 F4 Werrorcode = graphresult();
, c' @1 m0 u$ r( @0 b2 qif (errorcode != grOk) /* an error occurred */ , ?! u, \2 P" ^4 B! w" d( y6 @! ~
{ # j" O# X7 J, x, F
printf("Graphics error: %s\n", grapherrormsg(errorcode)); + s1 w5 e& z# `- Z1 c% c
printf("Press any key to halt:"); % G( o8 S- `, e! v
getch(); $ Y; G9 b0 w. n2 Z) c
exit(1); /* terminate with an error code */
# X" l* p& l: H} - m9 c9 r* E0 F6 ]- O" }. X
maxx = getmaxx() + 1; 4 F4 U% P9 v2 q$ J+ s0 C! z
maxy = getmaxy() + 1;
6 \- T0 F1 ~3 Y: W% L; q4 V4 C. O5 }maxcolor = getmaxcolor() + 1; 
4 ?0 `4 K9 h1 I7 }while (!kbhit())
2 k8 ~* m, t8 O* w2 k{
* M$ r, F) @, _# e0 @/* seed the random number generator */
/ H% b4 Q: f& o: W5 }seed = random(32767); & K# R+ Q; G2 }" S
srand(seed); 9 \* I4 c) u( O2 [# I- D
for (i=0; i<PIXEL_COUNT; { * ?( U" l7 b) e0 r' N: H
x = random(maxx); 5 x# ]3 E( B% {5 q. A3 ?
y = random(maxy); 4 U, O4 e- Y1 J1 w
color = random(maxcolor);
" @! r1 ?: ^$ w3 L6 Wputpixel(x, y, color); & Y1 c9 p' h/ r) h' F) n C. E
} ; |5 U* u, P7 f. H
delay(DELAY_TIME);
0 o0 ]$ I3 n0 y% z; T4 Bsrand(seed); $ i$ ?* ~" i& p' A: [
for (i=0; i<PIXEL_COUNT; {
7 _8 n+ n/ E0 A7 q9 a4 Rx = random(maxx); ( J- c- u2 N7 Y+ b% k* Z
y = random(maxy);
1 ]. ]' X! I2 f6 ncolor = random(maxcolor);
+ ~. W/ m% y- G' _, wif (color == getpixel(x, y)) 1 Y1 k3 X1 Y/ y- C0 |# X) z3 E
putpixel(x, y, 0); 6 ?2 q( D! j8 l
}
* H; K5 o" r) N$ e9 }6 }4 |} 
& V- v9 d8 T2 ?. u. I3 G% f/* clean up */ 7 ?% E3 ]' H D+ V6 z- |
getch(); 4 \/ k3 y9 C* K( Q7 E' ~
closegraph(); - D6 J3 `' M$ O# k' \+ ?% B8 i
return 0; # H" ]2 i7 T4 P; x% v* w2 t# K8 S
}
5 q& e9 X: }( o% \4 ^
0 a M* L% u$ V
; M T5 K+ A/ R) q函数名: puts 
5 i0 N6 O) X# K# y功能: 送一字符串到流中
) ^: f. ]/ V% [, Q6 A8 U# y用法: int puts(char *string); 1 b# ]" j2 C1 J% e' M
程序例: ' n2 O& r4 ?9 P
#include <STDIO.H># y& Q, i. E% Y! {- p/ c
int main(void) . d: r2 e' w( @' q2 |7 z
{ 4 B/ ?& |: Y; [4 m
char string[] = "This is an example output string\n"; 
1 G3 u: ?5 X2 V% W, m/ {puts(string); . P" T6 ~: v3 u2 w: M7 A- E0 x
return 0; ( I' a0 m9 }6 k( d9 R- {
} 
( U: U5 B% e7 ~) [
1 R9 Z7 P4 W E" }; D
$ D1 e& S$ E2 s0 m1 u函数名: puttext ; n8 g, U+ q: E, t$ T* `6 S k
功能: 将文本从存储区拷贝到屏幕
+ z4 f: i9 b8 j6 J# J用法: int puttext(int left, int top, int right, int bottom, void *source); # l0 B2 m7 z# }
程序例: 
9 \% k+ O6 m3 ~ V7 O( I#include <CONIO.H>- {% N7 b2 ^8 t. J+ _
int main(void) ; ]3 V. Z2 J {3 U5 v3 `+ w4 ?
{
0 f9 N% ]6 A9 lchar buffer[512]; 5 i( A2 u) [0 J# A2 J7 `3 r- b
/* put some text to the console */
6 W5 c( N/ Q* n" X, D% Q3 dclrscr();
4 D7 c$ i' ]1 R1 h, H+ M8 _gotoxy(20, 12); ( z3 q& w) a; C" A; S
cprintf("This is a test. Press any key to continue ...");
) ?5 n( C. ?5 W- a, @. agetch(); 
% m [' M+ e9 w3 T7 `# B. ~/* grab screen contents */
0 i2 R( ^% U4 q" }- sgettext(20, 12, 36, 21,buffer);
# i7 A" |8 K( Kclrscr(); 
, c A* ~0 @7 A) w$ K5 M- s/* put selected characters back to the screen */
) i5 B( c8 d# t$ M% i& S" n$ L$ Ogotoxy(20, 12); " y" r# P8 ~0 @# i
puttext(20, 12, 36, 21, buffer);
8 Q/ m# q: S$ k( ugetch(); ]! ?$ F6 W/ t* G( D
return 0;
0 h; h2 B3 X3 E: M8 y" q% `* s+ N} 8 U2 ?% `3 V% M2 ^) H

2 g6 H. k% V7 G* b6 l8 }: @$ o! z& g x, z5 e& v
函数名: putw ; U% `7 ~% p; l
功能: 把一字符或字送到流中
& c8 r- M) c0 e用法: int putw(int w, FILE *stream); 9 F' m3 t% b& \- E8 E' w7 Q/ H
程序例: ! b% ~- [& G2 U# }
#include <STDIO.H>! m1 }. E" {5 o, ~7 t
#include <STDLIB.H>
4 O3 m) R# V; q" v#define FNAME "test.$$$" 
! C/ k. [" ^ R7 u/ w4 ]) o" Z3 [int main(void) & o9 I+ W* P5 `1 t& K# V
{
% h9 k! F" ^) EFILE *fp;
- y7 m8 e& k8 @4 ?2 a5 gint word; 
) P9 L* A- [$ {: U, R. F( e, k6 ]- {/* place the word in a file */ * k" _9 Q: ~8 _1 n
fp = fopen(FNAME, "wb");
' y9 t) O4 m! f5 g8 [( Mif (fp == NULL)
& X6 a' C5 V- H4 i8 G{
2 g, S3 P! d0 L+ g# Vprintf("Error opening file %s\n", FNAME); + r @3 J+ I Y$ X% X
exit(1);
% r/ b& n# E g, B} 
! D/ O8 z, s3 }8 Gword = 94; 1 F* y, _( m* h6 ]6 m: i0 w
putw(word,fp); J7 l. W: F5 d5 [- K8 v8 |
if (ferror(fp))
* q% K0 T+ G! n, a: }9 }6 iprintf("Error writing to file\n"); 0 q5 y. O# t! P; U
else 4 q5 t5 y5 a0 q& Y" R* {
printf("Successful write\n");
' M8 ^+ h6 c( k: Nfclose(fp); " B3 R$ o' I# G' U
/* reopen the file */
4 n- ?: m3 N' Kfp = fopen(FNAME, "rb"); . s2 _& C: v$ Y+ k: V
if (fp == NULL) 7 E; L" n3 v( M. ]# O4 c9 x" R
{
7 e' a8 N$ N; s, tprintf("Error opening file %s\n", FNAME); 9 R! }/ J- a; N; Z" d# |
exit(1);
# x) g: {9 ~, L) B} 
. U- x' U% v) l3 Z0 t% @- M/* extract the word */
; {0 N8 E, C' ?3 u3 v U9 l4 gword = getw(fp); 1 |, ], f& ]7 \
if (ferror(fp))
) m+ ]+ K$ e; i: ~printf("Error reading file\n");
) S5 W" [. T% J! M1 j# S1 o/ \$ Yelse % A7 ?+ ]3 n6 c g! y1 e( F
printf("Successful read: word = %d\n", word); 1 g* G5 S% `6 W4 U* g8 L
/* clean up */
- O2 t9 B/ E# k4 Q; b! M( M3 ?/ afclose(fp); x s8 }- _ a* k
unlink(FNAME); 
+ w9 M( X% K; d6 P# g8 Mreturn 0;
. f: I I$ b2 Q}