查看: 2788|回复: 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) ! F& R' k1 A% `! _0 ^, r
putc(msg[i++], stdout); , A ^# \; U/ ? [/ [% }7 L2 a) U
return 0; 6 I# i: `- I$ ~; p9 T) M
} & A8 D. s+ k2 Z/ c' k6 F `- v) E

& n+ p9 O+ H- Q( G& z2 }3 @. P2 q7 N+ W ]
函数名: putch $ Z4 K Q9 ~/ t" c6 n: r
功能: 输出字符到控制台
9 k! X+ ]$ t+ @" ?, R用法: int putch(int ch); 1 \4 ~- s6 }7 }- p9 f% |4 d
程序例: 5 G) J# O0 F! S4 w5 I
#include <STDIO.H>
: @% A/ j) W: a* O) W#include <CONIO.H>
int main(void) ( O1 g9 J* D' y, U7 h0 A; f. z
{ / x. G2 T4 ?% b' V: g5 u0 [& `
char ch = 0; ; q- N! O6 v; Y: ?" u5 m
printf("Input a string:"); 2 F: ^; m9 z4 h( B) `( j
while ((ch != '\r')) # v4 H/ l0 ^1 Z4 H6 _% g
{ 6 h+ m0 n5 W" Y
ch = getch(); - R0 T( ^6 F: S5 b, u+ s
putch(ch);
: q: N* x) \. M' e3 d9 i+ P$ H} 9 K/ G4 L' |' ]1 n1 u9 f, |
return 0;
* S9 Q7 I3 H( j}
3 e2 v* m" L) D3 ?: N8 q7 p
- b1 I4 F5 b2 C7 H) _# E8 x* l* k* F9 l" T$ `
函数名: putchar ; o& t# g& N6 }, f7 @
功能: 在stdout上输出字符 + x/ C4 n) e* e* K0 Z: I7 e
用法: int putchar(int ch);
# M, M2 ~& a4 d) B( K) \3 ~0 n- D程序例: 
- s( }: {3 B! V#include <STDIO.H>, V$ d0 f1 \, @7 ~
/* define some box-drawing characters */
1 g1 x5 t ^0 i#define LEFT_TOP 0xDA
% w* O' N) F# a. N8 |% Z$ t# m#define RIGHT_TOP 0xBF * P0 D7 ~! o0 P0 r
#define HORIZ 0xC4
5 p$ \$ _9 s% F( w* j. o#define VERT 0xB3 * `+ C' v5 v0 D* R+ [$ V# ~
#define LEFT_BOT 0xC0
9 f+ f- s1 w' r9 J2 p#define RIGHT_BOT 0xD9 
0 v' V4 ?# C/ uint main(void) 3 b4 k$ F2 n: Z$ m* z6 S" _
{ 8 X# A7 P! T* \
char i, j; $ E8 s/ G- ]8 _* l
/* draw the top of the box */ / m' | X$ z( V2 [+ w: Q
putchar(LEFT_TOP); 8 l S2 @# r& [* P; ~
for (i=0; i<10; i++) & l% l2 E1 h4 f
putchar(HORIZ); * u! a7 e4 Z6 [* \2 ^* y# y6 O1 M
putchar(RIGHT_TOP);
5 c) }0 f/ B$ H e. D6 i9 o, kputchar('\n'); * Z. j e6 H- r4 X7 i/ i( I
/* draw the middle */
, s* V' M- q8 x7 Kfor (i=0; i<4; i++)
' f Q! V6 }; d4 C9 V{ / _- x4 `+ t; j4 @* A" c7 R
putchar(VERT); , A; B, V) `, L- f4 L
for (j=0; j<10; j++) ' o! j$ i0 U3 \0 A5 c
putchar(' ');
$ s$ u* |& u3 N- Q5 P f0 J0 ]putchar(VERT);
* O+ o9 C# |7 F$ Y, l' N: rputchar('\n'); 8 i* E( V4 ^/ j: n. P! }9 k
} 9 x; U% z( [ s( S6 A3 K- [! d
/* draw the bottom */ & F) [5 i3 J! h) a; E
putchar(LEFT_BOT); 1 q6 j/ @6 s b- j& |+ ~) u: L
for (i=0; i<10; i++)
. @; v- i$ [& }putchar(HORIZ); 3 Y8 i, |) x+ I2 t5 F1 c
putchar(RIGHT_BOT);
4 K, K' P5 U6 n$ h- t7 c* m! lputchar('\n'); , J7 f3 u* q" }3 E X
return 0; # W5 [4 z j7 R* q5 Y: k0 I
}
; n! f5 L+ }( o3 ^. s$ U+ w; u: w; m: r* D3 {( q& h+ Z2 C0 I
0 K9 G" [8 ?6 {
函数名: putenv 
. M* J, e! x0 g/ b9 h5 W6 y功能: 把字符串加到当前环境中 a- B% w. U: F: J: ~
用法: int putenv(char *envvar);
! \2 K6 u- ^$ R7 D程序例: ( i% N+ C# i$ h
#include <STDIO.H>
( \) M; |- Y9 z+ P a#include <STDLIB.H>+ }/ g, k/ H. ^9 L% r6 }3 X
#include <ALLOC.H>( p& ] s8 x" ~
#include <STRING.H>
" t3 l, [" w& I7 `#include <DOS.H>. l1 C" t. [6 u, \# T
int main(void) $ ^( E& C3 q# L) R5 b( k8 r& n9 _
{
4 U% F5 ]- u3 [0 Achar *path, *ptr; 8 L1 e5 F. r/ J3 ]( P
int i = 0; % D6 J4 a8 w6 y- a) K
/* get the current path environment */ 2 G8 T3 c- B6 f+ O! a) a' x H
ptr = getenv("PATH"); 
7 u* x; e1 l0 m' V/* set up new path */
, z& M) _( W* Q+ h3 H( spath = malloc(strlen(ptr)+15);
' i {6 p+ b, X- ustrcpy(path,"PATH=");
. o( k7 T X' W9 G0 @: l& Zstrcat(path,ptr); # r. i2 B1 e8 ^2 l
strcat(path,";c:\\temp"); 
* c; W p' s. u" F# \/* replace the current path and display current environment */ ( X6 C! r9 U# p
putenv(path);
1 G+ V4 h& @% z; e" nwhile (environ) & i, J$ H8 }1 ]+ P3 ]
printf("%s\n",environ[i++]); ) L! c4 K# j1 Q1 S& L3 J9 a
return 0;
. r/ U3 i+ A( R# H} # `0 N! F) \. \0 Y
% l6 u! Y @; [

, w6 A( S0 K& }4 M函数名: putimage
4 b4 {1 N% K$ n, T6 r0 b% R功能: 在屏幕上输出一个位图
! \- @8 x0 C7 C! @( v* N, s用法: void far putimage(int x, int y, void far *bitmap, int op);
" a3 X9 e p, H程序例: 
$ T. f8 h. c+ m4 b1 s#include <GRAPHICS.H>8 [# ~( M0 }4 u/ R4 d7 d7 g1 D# g
#include <STDLIB.H>3 C3 X8 U/ g% X+ q7 f' [
#include <STDIO.H>
* W" y0 _2 K* B#include <CONIO.H>
6 K* e) w" b, J% m g5 k* c. M#define ARROW_SIZE 10 2 M7 h: p5 L4 P ]% X
void draw_arrow(int x, int y); + A& T: K* \6 m5 d
int main(void)
% W: u3 V( D5 J" j( m3 b7 p# S{ 8 C* D: E$ ^6 [$ A7 z+ W9 j
/* request autodetection */ " J# r* m- ] D/ ^2 @( r
int gdriver = DETECT, gmode, errorcode; * `% S$ S) G/ M- O9 K7 V8 L
void *arrow; 1 I; _7 q9 g! d& K
int x, y, maxx;
 Q2 h2 J* x4 E; J8 B% uunsigned int size; " C: g% ^! `# M
/* initialize graphics and local variables */ % _3 |( |9 j3 |' k0 B
initgraph(&gdriver, &gmode, ""); 
1 o9 M* H/ F/ R! {0 O3 j/* read result of initialization */
4 G9 p" p: V8 zerrorcode = graphresult(); % S( ]( R4 S6 @# B% u! x/ m
if (errorcode != grOk) /* an error occurred */
" ~0 `- f8 m# Z. R, v! e' q# ]/ _{ ' _% Z0 L% Y. Q$ o0 M4 J6 a
printf("Graphics error: %s\n", grapherrormsg(errorcode)); $ D; H. e$ P' v& d- d7 R
printf("Press any key to halt:");
) I ~) w6 b8 d+ V7 Fgetch();
4 _% k$ u3 L1 l& Sexit(1); /* terminate with an error code */
0 B5 R p2 I4 c( l: Y! z! ?, v+ A} 
: b- ]; L9 C9 I% W& S e, p+ t/ }7 tmaxx = getmaxx();
2 C/ m; p* R$ S0 h0 ax = 0; ! x7 D I5 V' E$ A( z- h" p
y = getmaxy() / 2; . I2 V# u1 {3 ^! Y+ `7 h
/* draw the image to be grabbed */ 4 D0 ?6 Y8 y& k, B8 k0 u
draw_arrow(x, y); 9 ^" F( {8 g3 G
/* calculate the size of the image */ 6 Q% [- {, o- a3 b/ M A
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); ' J H6 n( V J" u& B8 R
/* allocate memory to hold the image */
' M- v. j& Y! _' x/ q! h3 P0 harrow = malloc(size); " f9 k1 T$ C7 C
/* grab the image */
! a" @2 Q) b' b: X6 t: o- Ogetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); : c3 @+ Q% u1 E1 W
/* repeat until a key is pressed */
6 K2 S9 f( j% u& qwhile (!kbhit()) / P$ H1 S, W6 j1 S
{
6 k/ n I3 r4 x/* erase old image */
- b6 Z6 e/ C: uputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 2 S0 [1 k, R; |( z* @
x += ARROW_SIZE;
, e" Y' y7 ?3 C$ e }) {, Tif (x >= maxx)
 L- L: M; M" s0 cx = 0; 9 I7 x+ Y4 ~0 ]/ u# d; _& I1 ~ k1 R
/* plot new image */ / {/ `( W7 b( \: Y
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
3 I# h& B; g4 H# V4 }: V/ }, `} - }9 I6 s" Z# f7 v& \+ C
/* clean up */ " S K: f, E# x- O! ^+ y, ?5 P. K3 Z
free(arrow);
# w% y) Q7 |% O6 l. g* j/ L% Eclosegraph();
% O* ]- O: ?+ Q# w9 areturn 0;
1 ], m8 u* n8 U- @6 }) [} 
# H) n) s! T9 F0 i! jvoid draw_arrow(int x, int y)
; |7 @, c2 L% e0 N{
2 N* P- k+ V. F1 s2 }5 D/* draw an arrow on the screen */
 I. p1 E E! J/ ^, s% imoveto(x, y);
/ O1 D8 O, T! _4 s klinerel(4*ARROW_SIZE, 0);
% ]5 A8 V! B- blinerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
2 @) K( j6 D K' }5 k1 |5 elinerel(0, 2*ARROW_SIZE);
* K) [4 x( b* @linerel(2*ARROW_SIZE, -1*ARROW_SIZE); 6 ]0 i" E. k9 q( ?0 }1 [2 Z( o
}
8 P( g# O/ q* N6 \5 a$ Q) z9 J

8 Z( C8 q8 H* }3 }3 c" ]5 \7 P" n1 U函数名: putpixel 1 q9 r8 C! N5 c" a0 G5 q2 ]
功能: 在指定位置画一像素 8 W. T6 L! z4 }$ c( I
用法: void far putpixel (int x, int y, int pixelcolor);
# E1 e, `; ~* z k/ z }; I5 C程序例: ' K* {+ G3 @" T( ^( s
#include <GRAPHICS.H>
3 q+ H" D" Z* O4 `- A#include <STDLIB.H>
3 g; k+ d. ]; }5 f8 U- w9 |8 i# ^#include <STDIO.H>2 ^1 R! f: l. O# Q- ^
#include <CONIO.H>& J' m% c7 d4 K W( U; t1 b% K
#include <DOS.H>% W) D' d0 C$ C! ?7 P
#define PIXEL_COUNT 1000 ! j6 p4 Y+ O6 d" m: }. I
#define DELAY_TIME 100 /* in milliseconds */ 
 p2 @& t, }1 @/ c; @8 Xint main(void)
, }1 O# W4 O' U{
7 f! u s* g5 t# S$ p; r: U/* request autodetection */
7 b: X" o; z Dint gdriver = DETECT, gmode, errorcode; 5 n+ z1 v( R X$ `
int i, x, y, color, maxx, maxy, maxcolor, seed; 7 O( K3 T9 C7 A
/* initialize graphics and local variables */
% X, r* {/ {7 \9 Kinitgraph(&gdriver, &gmode, ""); & O' p# |4 e! Z$ [$ D* r1 [
/* read result of initialization */
% i9 a! |" |' werrorcode = graphresult(); $ V3 X% c& A4 K" L( N+ C5 C3 n
if (errorcode != grOk) /* an error occurred */
9 |! s! T0 v, B$ u{
8 i" d( h; D; f. U0 V) c" B& ]printf("Graphics error: %s\n", grapherrormsg(errorcode));
2 N& y2 |. G% Z3 rprintf("Press any key to halt:"); ' o+ n8 ^" N. J0 V; _: O: e
getch();
- [+ C6 f& r$ V, p+ N N( fexit(1); /* terminate with an error code */ ( R! L' A) s* |4 u& W8 o$ F \
} 2 {! Y( s2 [8 t0 N
maxx = getmaxx() + 1; 2 `) H( j% K4 T, v- r8 ?. I
maxy = getmaxy() + 1; , ~/ u- n0 ]+ o3 Y; g8 k
maxcolor = getmaxcolor() + 1; + j! z" L( ^& L& V0 n
while (!kbhit())
% I: ~; L/ ~9 r/ D{
5 C+ v" g1 n* [' d% c5 {/* seed the random number generator */ 7 u/ X- P- p' t4 u+ I2 a
seed = random(32767); 5 O4 @2 \5 h2 z: h1 c
srand(seed);
! T1 j- o" O H0 f2 Y& ifor (i=0; i<PIXEL_COUNT; { 7 S5 B7 U# o8 G$ S$ F8 `- `
x = random(maxx); 9 ]7 k4 J) S) E1 z, _- G* j3 i
y = random(maxy);
: g a0 T2 k; E7 Kcolor = random(maxcolor); ; v; B T4 F# T$ s' q# d- H2 T
putpixel(x, y, color); , G; @* w" P( z: O$ ~
} 
- B7 x4 j$ f5 D6 D7 T$ m$ j- Zdelay(DELAY_TIME); 6 ]8 A) {) f2 v9 \1 p
srand(seed); ) `3 t" I2 |/ l% U# I8 l- R6 R
for (i=0; i<PIXEL_COUNT; {
) T$ }. c+ D. S6 rx = random(maxx);
2 z! R' E2 d, u$ gy = random(maxy); $ t7 H) N4 K, b" H1 K, n
color = random(maxcolor); 4 w: }$ Y. K) N" J7 ?* R
if (color == getpixel(x, y))
; C( B5 o( `- s6 r, _/ bputpixel(x, y, 0); ( @* y) p/ F* u
}
} 
/ K- Q |3 D9 v7 D1 K" [ ^8 F9 V/* clean up */ ( Y4 ?7 [% @& W6 G6 t z. R3 T
getch(); - e" @% S9 P& d) v0 w% E* F% [
closegraph();
3 M6 T( r' w5 treturn 0;
( p$ l+ F# b6 v$ D( J2 K$ Y9 T q9 \} 1 b' s' G/ f+ C \2 z7 N& s
' _9 w: P a! b( S9 Z( E
1 j4 c2 v" B, |+ k
函数名: puts ! w$ C+ x8 [! k4 L7 }0 d
功能: 送一字符串到流中 / |( p+ V; w/ B/ i0 F) T2 a8 d
用法: int puts(char *string);
" W" ]" ]' \1 ?5 v程序例: ) J9 ^! \: U) E) N/ q8 }
#include <STDIO.H>" B% I! }/ e, `) m
int main(void) , s: a: p# c1 n% T0 ?* Z
{ & q! _* E- E7 c9 f! y! E" t/ A4 Z
char string[] = "This is an example output string\n"; 
9 @9 g1 f: B$ Oputs(string);
' h! c+ B) \% |+ Creturn 0; 4 Q$ E _; y! v
} # q" R0 h& r, Y6 H1 Y

: A3 y* n; }+ `5 l" A
5 }! o& O) X$ M函数名: puttext $ q6 z. J- |+ l8 y: F" N
功能: 将文本从存储区拷贝到屏幕
0 {# W0 Z$ J/ N1 {4 ]' j- Y用法: int puttext(int left, int top, int right, int bottom, void *source); 9 }# `) |! W! t$ R m( O
程序例: 6 b- s8 f# P' G3 U4 Q# u7 D
#include <CONIO.H>
# v* J4 n/ D1 \- B; D- I1 dint main(void) ' V/ G( s! O/ |
{ 5 A# |- H1 z! U6 c
char buffer[512]; 
! \3 Q) f5 k7 v. z9 D1 P/* put some text to the console */
 T2 w) [6 h; n; [% n/ Jclrscr();
! {) R( A2 x) e9 a( }- M8 @gotoxy(20, 12); 1 V4 B; @1 p$ V! j5 ~' e. Q. T
cprintf("This is a test. Press any key to continue ...");
0 }$ k5 ~6 s N! }/ N, `getch(); 8 O! h3 T# M3 h: s
/* grab screen contents */
* S/ X4 ~- v; k Y3 Jgettext(20, 12, 36, 21,buffer); 0 D+ ^5 x' B3 N% m) [
clrscr(); 6 M$ v6 ~: m: I
/* put selected characters back to the screen */
8 s- R) a% n' }" J& C1 W, r; hgotoxy(20, 12); % ]; C0 E9 x! a
puttext(20, 12, 36, 21, buffer); 5 ?; u0 x8 o4 t0 _* ] V5 ~
getch(); 
( B5 K1 }8 S" V, K: s% wreturn 0; ; J+ S& o# |2 I, k+ b
}
6 I3 y1 {( _4 {7 Z( M) H+ J- ?0 x$ N2 |
( V0 Q' m/ K- K$ E, m: U/ H) H' n7 k2 ~; t
函数名: putw , p6 H: u) v1 t+ p) {8 ?- F0 Q# s U
功能: 把一字符或字送到流中
/ m# K9 k# p W M O* j+ B用法: int putw(int w, FILE *stream);
$ J4 Y# M! w. T: E- f+ `8 t程序例: 
 N% Z/ R' g' @#include <STDIO.H>
% _6 u2 \0 s# i R6 v* a#include <STDLIB.H>& R. z2 d1 ^# l
#define FNAME "test.$$$" 
7 g n! m2 t' `$ V. ^; Nint main(void) 4 l: b, Q% A8 k% O8 }1 M
{ - U! s, |4 T% B" u8 J
FILE *fp; 0 s* [* l. E4 d9 D' e$ e( ~
int word; 6 X0 T0 g% o, }
/* place the word in a file */
fp = fopen(FNAME, "wb");
if (fp == NULL)
8 s- N) y$ [9 C# f+ k{
" q6 r9 B, g& t2 t/ Pprintf("Error opening file %s\n", FNAME);
* R/ I/ ]- R# C) _/ Z. lexit(1); # \9 t# ]! i4 ~5 V7 W2 g$ r6 m5 ^
} 8 n C0 O! U) W8 E; n! L; ]
word = 94; . T. ^ R: h; ~, ~1 l4 P
putw(word,fp);
8 V N. I3 i! Z( E6 Hif (ferror(fp)) - R6 A) f' O# L$ [6 h7 j) H" n
printf("Error writing to file\n"); 0 `1 F% o2 o5 j9 r: V1 t" T
else
; W: U/ Y, M# P8 Z* n Pprintf("Successful write\n");
* V) k) Y& ^! m4 tfclose(fp); 9 T& v5 }' s# q5 ^+ }
/* reopen the file */
4 \! U4 l) [, z1 d3 P1 pfp = fopen(FNAME, "rb");
2 Q2 M( C! S/ tif (fp == NULL) 8 I ^- B7 ^: A( d+ H9 U# B2 a
{ ; U$ ?( v& h n& }4 M; \4 E
printf("Error opening file %s\n", FNAME); $ z9 d: \0 r5 P
exit(1);
- g2 f1 C( C8 |$ {$ I} 8 X/ z: o5 y* E2 [* F/ _$ ?
/* extract the word */ l. `! G2 A% d$ y/ H1 d
word = getw(fp);
5 c) ?$ P, P* {" W$ W3 ]if (ferror(fp)) 7 C# h" s' O* x$ j
printf("Error reading file\n"); , l- M9 G1 e4 N# F
else
( q0 a; X. G3 A+ B2 _printf("Successful read: word = %d\n", word); 3 p) {: E4 _5 j( O. B% P9 F
/* clean up */
: c* d2 Z, `$ Z+ k3 ]5 M) ?* zfclose(fp); 1 R0 q) Z+ l* m7 D* `: s$ L
unlink(FNAME); 
2 z" h$ Y5 I. l: `9 dreturn 0; # d! H# I6 |: K B8 ?) i
}