查看: 2725|回复: 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)
1 i; ?' b! b& [6 L# \( Uputc(msg[i++], stdout); 3 [0 e: F6 D L, S
return 0;
/ i6 @6 @4 F: G}
, A- N' ?8 f) w! C2 A$ M$ S$ [; x6 \7 |5 @8 J T; p/ H

 n5 p8 z6 p8 z7 x8 X( x函数名: putch & C1 [7 m2 @, Q; G$ a! P
功能: 输出字符到控制台
* F+ X6 J+ M# U9 v7 l用法: int putch(int ch); % v6 S* t7 ~1 b, l. |' m7 e
程序例: 
" E1 P; b& q+ t0 ~#include <STDIO.H>
0 [% `! x9 |+ D1 ^/ p; I7 h! L#include <CONIO.H>
7 g8 L6 b9 s4 N+ Xint main(void) 7 \. Z0 @1 j f( z% r( {1 e2 u
{ * G4 Z7 g8 \5 M! x
char ch = 0; + o7 L, _# r- v9 m( V/ V* J
printf("Input a string:"); % y, J/ X2 x* u8 X
while ((ch != '\r'))
) C. |4 l- j6 }{ 6 p' r) N( @# v; @+ g9 t
ch = getch(); 2 H, t5 R1 {6 k b0 q3 V, D
putch(ch); * t& n/ G! M& B+ R1 W4 C% m
}
 Y5 F2 o! q! S% qreturn 0;
( P3 S4 }! F/ j$ e9 M} 9 r% X, b0 M# s

& V. g% I- A, _2 ]4 S8 ], Y
7 N, B: ]* ~; S, y# b5 O6 @ p函数名: putchar 
4 v# k" q0 F L功能: 在stdout上输出字符
$ K* f, A2 j2 O+ b+ d" L用法: int putchar(int ch); . K$ _' R- x/ l7 U; c9 T
程序例: 
+ W$ G; H) y. m: O8 A, @#include <STDIO.H>
: G1 t, S- k" s3 ?0 Y/* define some box-drawing characters */ * v: V; C8 e8 {- g8 l( o
#define LEFT_TOP 0xDA - _( H0 x2 i: i- k
#define RIGHT_TOP 0xBF
) Y0 R8 w2 k+ U% Z$ z9 j! L# N#define HORIZ 0xC4
3 ?( A6 Y' ]" v( P1 ]8 ]/ j- s#define VERT 0xB3
2 V8 N/ L) ^/ m6 V9 v& _#define LEFT_BOT 0xC0
 Y0 M; l/ ]+ e! w; u8 l T#define RIGHT_BOT 0xD9 ( H5 R6 ]' m- {/ v
int main(void) / f& x' [. P8 C1 g# ]$ C* d2 _
{ $ r @8 c. d8 _7 S* a# `0 f
char i, j; & Y$ e: Y/ n& H
/* draw the top of the box */
4 s& _' u! z5 V! ^: C' U* ]+ Tputchar(LEFT_TOP); 3 Q! z3 ]( j$ Z# H
for (i=0; i<10; i++) 3 E$ }: b, `9 [% n! Y6 v/ y) E
putchar(HORIZ); ) R. `3 x- W- C- x, F. i0 u
putchar(RIGHT_TOP); 6 y" k% ~& ]- @; ]9 b
putchar('\n'); . V& i- `/ H+ b/ N7 s# i
/* draw the middle */ 2 E1 @6 U% I+ d' N5 R8 R. I
for (i=0; i<4; i++)
0 W' w; x# i0 q5 D( R$ V{
6 }0 o2 f7 f, Z: ]3 Dputchar(VERT);
. ~! M) p; v7 n5 i" s3 bfor (j=0; j<10; j++) 2 c- s" q# a2 V2 q, M' v. w
putchar(' ');
+ _& Z: U; b: `, @1 w9 w$ u( \putchar(VERT);
* S. P- I5 [2 O; g* G! y# ?9 bputchar('\n'); 9 w u {( X2 T# E. [
} 9 i; }; `1 g+ x, B
/* draw the bottom */ 1 j) x6 N0 V: x8 ^/ w# E# j$ Z
putchar(LEFT_BOT);
4 ~$ k1 c& R* w9 V# F ~/ S; ~" D: Hfor (i=0; i<10; i++)
$ R! ~5 u h o. rputchar(HORIZ);
: X% f; F6 Z& |9 qputchar(RIGHT_BOT); 7 a9 M+ ^& Y( @1 Z% |; @+ @4 o
putchar('\n'); 
! \0 s. E' R+ ?/ hreturn 0;
& Z) h( U2 \" R, ~6 ]" f}
/ p# C' H8 F, I5 P7 |+ n
9 c- p- R5 L! t3 q! U
" u& f3 V9 |# p3 A4 }函数名: putenv # k* |& ]2 C8 c) K" d
功能: 把字符串加到当前环境中
7 ~/ j4 l. J: |8 i' `) g# j用法: int putenv(char *envvar); ( A: ?1 _* x3 M$ f+ V X% k" X
程序例: 
1 y6 n5 \7 r! O0 C3 b! I#include <STDIO.H>
 H: C5 O) h& x: f4 C1 h+ v#include <STDLIB.H>0 b/ D& m9 n* @6 V# N
#include <ALLOC.H>! S* y$ t7 @4 }3 Z8 g4 I! a$ P
#include <STRING.H>; q6 Y5 h8 i, T; A* ^( Q
#include <DOS.H>
: n& c5 _! f! q0 W2 I; A; pint main(void)
" [8 w. X$ p5 F0 l( S& ?8 P{
7 o3 |3 Q- t( d$ lchar *path, *ptr;
* U9 u: o' J4 h) w, H, M5 X! qint i = 0; 8 c8 g `4 v" m
/* get the current path environment */ 5 _' q% v- w1 I/ y+ {; B
ptr = getenv("PATH"); : D2 N _' g5 k' _5 U
/* set up new path */
5 s& N7 s' y u: p$ ?/ Hpath = malloc(strlen(ptr)+15); , i) x+ Q0 C Q( Y) X* Y* _
strcpy(path,"PATH=");
$ g5 R7 t1 s1 z( w! k% Qstrcat(path,ptr);
! c( j3 H6 @+ h5 pstrcat(path,";c:\\temp"); 
, y& p4 G+ C3 F \ b+ q/* replace the current path and display current environment */ - a8 D* g8 s9 J; ]1 |
putenv(path); 1 w7 J1 J: A* b9 W( G) M
while (environ)
- `/ A5 F0 J; `0 U4 A8 L9 w! Aprintf("%s\n",environ[i++]); 5 p& J6 _/ Y0 |3 o( O
return 0;
, V$ ]' _" ?3 b5 N} : ~4 x1 x0 ]* O0 \8 u+ I7 X+ S E

" }% g# ?" q5 V) u& D3 s! A' @: |$ T5 N- S$ G0 o5 W2 N2 v, f
函数名: putimage / a, L# O& T$ Z
功能: 在屏幕上输出一个位图
. E# \- @) U# `用法: void far putimage(int x, int y, void far *bitmap, int op);
, P# J6 J5 k: p, C$ Q1 v程序例: 6 T3 i; `) T; {4 }
#include <GRAPHICS.H>+ G4 M e9 l* w& q0 U) d6 N
#include <STDLIB.H>% x! ^1 B) M9 _7 ?# i" @# B
#include <STDIO.H>
* v9 D) f) E9 H, g#include <CONIO.H>
& ?+ w, K. H* [! j4 \. O) i w9 I( b#define ARROW_SIZE 10 * H. t0 k4 ~, z4 |, L
void draw_arrow(int x, int y); % ]2 D# s) h' j3 w4 g
int main(void) ! i1 [7 B, r2 X( C" s. x% ^, y/ b1 S
{ ! K0 c7 f2 e3 D& S" ~: l$ o; U
/* request autodetection */ $ }% N3 k0 x/ R& G0 Z& T& n
int gdriver = DETECT, gmode, errorcode;
: T3 x* F6 E9 o. h! w' Ovoid *arrow;
; R0 c& h) }, N @2 ?/ [* g dint x, y, maxx; ! M6 L7 h" e$ j0 [3 r, a
unsigned int size; ( n: V {4 M5 x$ t
/* initialize graphics and local variables */
 C5 {$ U+ H% @' ginitgraph(&gdriver, &gmode, ""); 
8 V9 b" j$ o# i2 u* b/* read result of initialization */
% D/ c! z7 g' nerrorcode = graphresult(); 9 {4 q x6 t5 w) T) g2 ]# ~ g
if (errorcode != grOk) /* an error occurred */
1 H" i, v' b* }3 T. U$ J{
% K# V/ H" Z2 {0 Y' mprintf("Graphics error: %s\n", grapherrormsg(errorcode)); # q$ Z1 P% ^1 z+ u0 t4 R8 \
printf("Press any key to halt:"); 5 [: e* B" I/ ]; N4 S
getch();
# d' r9 }& O+ _2 H: E7 Q+ }exit(1); /* terminate with an error code */ 4 R0 o$ U0 N1 q6 e' a
} 
( [+ W/ C7 O; I, n Q$ m% amaxx = getmaxx(); " ?( T& m& \2 ~ D7 H0 B
x = 0; $ P* c3 M. ^% y/ a
y = getmaxy() / 2; . Q; R' {7 w' Q' ~6 L4 p! T
/* draw the image to be grabbed */ 6 ?* L U1 c" F! j
draw_arrow(x, y); 
/* calculate the size of the image */ 6 A# e! C& Y" [
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
4 h- I; p9 g# Q+ D& K/* allocate memory to hold the image */
1 ?# s" p/ r+ r$ i8 Zarrow = malloc(size); 
! y3 u- K, c. P. y) O' L( I3 E/* grab the image */
3 T# { [0 N$ {getimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 0 C0 T# f% v+ L! m& {
/* repeat until a key is pressed */
! ?4 `1 q! G) f# _while (!kbhit())
1 O1 \) I% E* c# \{
 p% b# j3 _" B9 U' l! m/* erase old image */
6 w- n( E; ?- p+ J. \+ Dputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 2 R ]' o" _, q1 u- w% v
x += ARROW_SIZE; 4 P. i" l$ r2 w- _( w* Y
if (x >= maxx)
: D! T* c- H% [* k& o8 [x = 0; 8 B1 d. _' [( ?2 }/ N$ b0 F
/* plot new image */
) k9 n: T% M# @. O+ Iputimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
0 U# H0 [) n. m* k7 ]" U$ E6 f1 t} 
. \; b V# L$ v4 N# b/* clean up */ 3 N% C+ `: ?7 r, C% Y4 p
free(arrow);
$ i7 e# s5 `. K+ R0 s# ?closegraph();
2 y# y0 y0 }1 F* t J7 Creturn 0;
4 N/ K. [' l, }, I5 p} 
: j( d4 H( J& u3 wvoid draw_arrow(int x, int y) 0 u: l- F/ b! B: h/ r
{
0 I, _# g3 {' e3 Z/* draw an arrow on the screen */ $ ^- F+ Y, d0 O7 m( o
moveto(x, y); 0 \0 V- I) u* d w( E3 X
linerel(4*ARROW_SIZE, 0); , ]$ X" q+ ?* W) a# [
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
3 _0 s- s' b: Alinerel(0, 2*ARROW_SIZE); - t+ B! i" N0 D- S" r
linerel(2*ARROW_SIZE, -1*ARROW_SIZE);
- G+ B: w; l; g$ Y' t6 B+ e: Z+ w}
, [7 V; J, P# e, Q& D0 C- B# H0 c H% i) V( I9 l( C2 A$ K$ l

$ u( ]; @" `6 e函数名: putpixel 
1 \0 z3 s; B* [7 q1 r( z6 T功能: 在指定位置画一像素 . J! H0 r6 o2 s: i# u" r
用法: void far putpixel (int x, int y, int pixelcolor); # X0 w7 D4 b5 J7 r% y0 b# R3 s
程序例: 
) Y" Q4 z9 U+ V: o4 o/ |#include <GRAPHICS.H>
6 e1 i1 y3 O; P: M& m4 h7 s#include <STDLIB.H>( ^4 ?1 }4 a( n1 U6 l# \4 i
#include <STDIO.H>
) l- G. l/ s: ]( O# O#include <CONIO.H>
3 d. Q" R3 q6 b3 P: s% m#include <DOS.H>1 s3 a( j2 n1 {8 k0 e- n
#define PIXEL_COUNT 1000 # m: c, A7 ~% h2 q' \
#define DELAY_TIME 100 /* in milliseconds */ 
- T$ s5 ~8 m: \& M" l l/ {int main(void)
3 }( o) ?2 V+ d6 Q7 w{ ^2 ^. V' U5 K _7 E
/* request autodetection */
4 R9 M1 H5 a: ?* p6 h; Vint gdriver = DETECT, gmode, errorcode;
% m: _2 L2 n2 cint i, x, y, color, maxx, maxy, maxcolor, seed; 
- \1 D9 z# F& s9 B, I9 B( V/* initialize graphics and local variables */
7 X- k: W. S6 }* Rinitgraph(&gdriver, &gmode, ""); 
' j0 F( f. y$ r/* read result of initialization */
- G, s( d: f0 Werrorcode = graphresult(); ) a0 |3 V# ~$ U: V
if (errorcode != grOk) /* an error occurred */ ' E F6 y ^4 w ]5 `8 V
{
6 f8 f8 C: \$ {: L+ \3 gprintf("Graphics error: %s\n", grapherrormsg(errorcode));
! n2 \4 b8 i" Q# Q% \printf("Press any key to halt:");
7 V5 L5 V, i* J" u6 J* kgetch(); * ]5 z B3 O' C3 A# i0 C
exit(1); /* terminate with an error code */
! H9 [! Z' f, Q9 W+ k% ~: Z6 `} 7 [5 h0 J; A, s7 ^: J
maxx = getmaxx() + 1; - _% q7 ^, a, A$ x" a2 x
maxy = getmaxy() + 1; ( K; |+ n) f+ V
maxcolor = getmaxcolor() + 1; 
/ m: F2 }$ Q* c9 wwhile (!kbhit())
/ s) c1 `0 y& f- V! u; a& w{
' A. n, N+ V2 u" g/ ?4 f/* seed the random number generator */
seed = random(32767); 1 v9 w' e7 Z; M: R1 J
srand(seed);
, o! [& w4 c% o0 }for (i=0; i<PIXEL_COUNT; { 4 a, ^ l$ j8 E; f6 j5 _3 t
x = random(maxx);
, L3 a* k! y7 g" ]1 S1 o' w. ey = random(maxy); ( g7 X/ h( j% L% X
color = random(maxcolor); - o* k% I o( K7 K1 H8 g
putpixel(x, y, color);
; F- [' _6 `9 \* O$ \7 `+ q+ y} 2 I n" B3 ~5 S1 M
delay(DELAY_TIME); & O: v$ U6 ^6 w& _( V \' z
srand(seed);
 m2 G# v1 d( f N3 Q8 F/ sfor (i=0; i<PIXEL_COUNT; { + H, `3 g2 i) ~- e
x = random(maxx);
; g& p4 y9 v6 S$ k' F+ M" Q; Ky = random(maxy); $ @- ]3 G7 l ?7 x _' x
color = random(maxcolor);
; Z+ R8 V+ ~0 c( ~" N" L& vif (color == getpixel(x, y)) . j* h3 m$ q. Q0 c1 k# ?/ s5 o
putpixel(x, y, 0); ' Y3 k/ \7 l- b6 v/ h( s
} # \% [9 D+ E5 f7 n" F1 x$ Q
} p% q& h& H( g; w# g% Z9 ^
/* clean up */ + a' I- O6 l. z
getch(); , k' @! p' R# q% i2 R+ y; P
closegraph(); 6 H1 a" |* J+ c! h0 x
return 0; 2 y7 @0 a' d' t& K
}
; g. X) G2 p) O! r; w. h$ H8 Y& r, k7 ]$ W! l n3 q

! w/ K+ H O/ B( |7 f函数名: puts 2 p) ]9 ~8 {( H4 n& `' Q7 E
功能: 送一字符串到流中 * k0 i9 x: J' r$ o
用法: int puts(char *string);
% N# {& t. K" V) ~; W% W2 w程序例: 
' S% r3 S; l6 h0 O3 N#include <STDIO.H>: K. K, R9 {5 ]" F2 @
int main(void)
0 Z1 h9 T, Y6 G# C{ ( f! Z3 |# C6 w t
char string[] = "This is an example output string\n"; 
2 |! z* I* C4 |9 M$ M+ xputs(string); / k' z, L2 {4 w* w3 b; B8 F
return 0;
8 m8 q; Y1 O; ~8 Y} ) _, M; L; @0 G- N4 D( o, d

0 A( N0 F! a6 Q/ {/ Y. w7 X: g
8 w( u4 b5 |" R( i; H0 r函数名: puttext p H* J( R- E$ t6 Q
功能: 将文本从存储区拷贝到屏幕 3 |% K7 U" x! T, o1 J
用法: int puttext(int left, int top, int right, int bottom, void *source);
! U/ c" o4 T, C& v1 X% G2 S' @程序例: 
9 w; T5 K5 k; Z#include <CONIO.H>
% G0 i" o$ Q" T# _6 F3 oint main(void) , N7 w& O7 Y' P
{
) J3 r8 y) p7 s! V$ E. zchar buffer[512]; / K2 Q9 K+ j6 Z' }
/* put some text to the console */
, w6 R. H1 j3 E& Y! Oclrscr();
. Q/ B3 D! N5 Ggotoxy(20, 12); 1 T, A0 l! {% R* J" |+ Y
cprintf("This is a test. Press any key to continue ..."); + n1 Y" P h, V' Z5 ]/ X
getch(); 5 _* r/ A% u: Q& V2 n0 b# y
/* grab screen contents */
% ?. G# Q4 @% e8 t# [% a) u7 j( _gettext(20, 12, 36, 21,buffer); : V& I/ b) T0 H3 Y$ L) K8 u- Y W5 h |
clrscr(); % F: \2 c# e& h8 p" \# b
/* put selected characters back to the screen */ " l0 e. d- T) _3 N" a
gotoxy(20, 12);
+ R2 h; X1 {+ h" ]puttext(20, 12, 36, 21, buffer);
; s. E( W! F) q2 Agetch(); 
/ z; O0 J0 u" J. Sreturn 0; 8 g6 p9 v$ Y0 R- \, ~1 s/ [4 `
} 6 [, s. S. X( Z1 _, D# b
% P/ y. t: D! F, Q3 l

! T) j9 z! G& _9 d函数名: putw 
" y1 y- U r1 _& z功能: 把一字符或字送到流中 - Z4 q# \1 M+ C- J7 J
用法: int putw(int w, FILE *stream); 9 ?: }; m0 I4 G9 V; s) N
程序例: 3 t- X+ i2 O2 _2 O1 I' D- n0 K" G2 q
#include <STDIO.H>+ o$ K J r$ G0 \
#include <STDLIB.H>
! o: s8 H/ k" O6 D! @. k#define FNAME "test.$$$" ( _" L! w1 [2 m8 T
int main(void)
. F" ?. s+ Z9 @& \& B6 z5 [+ P{ ! t1 h2 ~+ X. T2 C& z/ \3 V
FILE *fp;
0 m! ?! X l$ r/ w9 n% A: ^int word; 
9 D7 a* @1 W0 O- J* h! P/* place the word in a file */ 2 ^" S" v2 T/ h( D
fp = fopen(FNAME, "wb"); # \- y3 q$ {, |, `- g
if (fp == NULL)
) M1 e) h: D4 [/ {7 [{
: d+ k% ~( U; G: V/ r8 M% ^printf("Error opening file %s\n", FNAME);
! A' J$ [! R+ G% Pexit(1); 3 T" V. c& Z. C) Y* b5 W
} 5 k8 u9 W5 f0 i) M9 _
word = 94; % \( O1 E/ |) m0 G! R
putw(word,fp);
7 \% f7 J$ K% t1 aif (ferror(fp)) 2 a( P* [, M8 j: C1 X
printf("Error writing to file\n");
* k& k4 e( K5 u8 W/ Xelse
9 h& j) Y! R( I! `- o, U& d3 e) lprintf("Successful write\n"); ! R5 R; E* V3 I" S A" L: F1 E
fclose(fp); " ^2 c/ j/ ?8 u) F
/* reopen the file */
* V. F( \9 C {8 T2 tfp = fopen(FNAME, "rb");
9 x, s) ~- I! w1 J) O; aif (fp == NULL) d$ T# Q6 Y+ }- Z0 i
{
 i% L! p& h( L1 v9 w ]printf("Error opening file %s\n", FNAME);
; {; ]( z' G+ F N2 |3 ~* J6 Fexit(1);
5 h9 L, O1 j2 x% ~} 
) H% {2 G' K( G9 {- K& `7 J/* extract the word */
+ H# p- u+ S0 E" q% O& B7 c( o Pword = getw(fp);
4 q+ `2 l' ]3 X7 u2 g2 f$ ~3 N4 w! I6 cif (ferror(fp)) ; f1 U" C8 r/ z: M7 A
printf("Error reading file\n"); - F4 a# [" E! r- r
else
: y/ W, A/ C( G+ x, {6 iprintf("Successful read: word = %d\n", word); 8 T3 k Q& ~+ h K" ?
/* clean up */
3 e1 a u4 x" Y( h; n1 Lfclose(fp); . N! R# [/ b! J& K3 E$ c. X( E, K
unlink(FNAME); $ [1 I0 H+ g1 e7 b
return 0; 5 g# G* J# |% Q# l. e; t# N
}