查看: 2736|回复: 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) & r- t6 E I# i6 a
putc(msg[i++], stdout); 6 K6 k& D% L1 y" F% r, p" U: j( r
return 0;
8 C1 P2 ]9 u8 p6 Q* g0 [( E}
/ v; m! D, X3 Z( h) J# u" L1 I5 ^. Q# F$ ~' R9 a
; s. j8 L0 E2 N
函数名: putch " x( @0 X9 Y9 o2 ^$ U4 h
功能: 输出字符到控制台 3 z5 ^0 i- c* n5 F! ~0 x
用法: int putch(int ch); : s J6 z$ \3 c- N' y# K3 y/ {
程序例: ]$ B4 K3 [* T9 B0 ]
#include <STDIO.H>" z& ?& e" g1 h; d- ^' t, S& ?
#include <CONIO.H>
2 {( b! _/ D6 G( ^) D/ C4 h8 Kint main(void)
* R& l- }! Q' ^. M5 N{ 6 }$ Z' D( O. q- t5 w
char ch = 0; & a) [' Q# d7 d' y- T7 ?2 o% {8 U
printf("Input a string:");
3 }! R) X* m7 ]! Xwhile ((ch != '\r')) + j5 l. a+ O" X, B5 @8 c& x6 J
{ ; j1 [) }- c' o
ch = getch(); 0 W- A2 _* C. a/ v
putch(ch);
3 i. K2 m$ l- O} 8 j3 P7 i3 @# M, {6 Z2 i1 R
return 0;
/ V! L2 L0 x# q" k5 K7 D}
" U# W, X& I, t- k, G5 P2 E7 X+ \6 [" F+ Y
$ p& U& L$ @/ k* w/ t/ F
函数名: putchar K" P8 p+ Q6 q. }
功能: 在stdout上输出字符 4 b$ _; U+ b5 k5 [4 E: @% J
用法: int putchar(int ch);
0 O2 ?; C+ ~2 U$ n8 E( ?程序例: : e/ \; N$ Y6 F( J
#include <STDIO.H>
$ P* Z0 p/ v5 G; O1 ~! K5 v3 x/* define some box-drawing characters */ [5 e& }( d9 T4 ^
#define LEFT_TOP 0xDA / Q; Y6 E$ s6 m; r9 s* m
#define RIGHT_TOP 0xBF
2 T9 W; y3 l% u# [; p2 M$ w: i1 a#define HORIZ 0xC4 8 y3 ^0 B# o+ o7 o: B* r
#define VERT 0xB3 * J8 m/ E$ T5 X; S. t L( ]1 K
#define LEFT_BOT 0xC0 L4 [. I% N0 L: ? k
#define RIGHT_BOT 0xD9 5 X4 U( y9 x* i7 H h/ g( g
int main(void)
0 w# ]2 W* J8 \& S{ + W9 {+ f: w3 C- |( F" B
char i, j; 
& e0 X5 Q4 O3 u" Z7 a8 B/* draw the top of the box */
. l4 v" u6 G8 i" R. Eputchar(LEFT_TOP); " g8 Q8 W! @+ C) U! h7 I5 B9 `8 x
for (i=0; i<10; i++) + W {3 |' t. d9 `1 a' a
putchar(HORIZ); 8 o4 [" q. Z- V5 k2 R$ \! l G0 X3 q
putchar(RIGHT_TOP);
3 g, U: q0 Q& l7 tputchar('\n'); 
9 |1 C- E$ S/ y2 |7 q' Q; H/* draw the middle */ % N: N/ y( w" ^9 B
for (i=0; i<4; i++)
* o- P5 F: ` w9 H0 c6 Z{
8 u: p, @) N0 _& g2 Sputchar(VERT); # l0 A: v4 N- ^( f8 y
for (j=0; j<10; j++)
; M$ R5 I- @ W+ H( e4 nputchar(' ');
+ k9 }9 n( S( S6 @' W, U( E, w( N1 m! ]putchar(VERT); $ M! r) a3 J0 H) N5 f0 m
putchar('\n'); & N+ _" h0 ]% r! T- L( u3 A
} 5 Y+ w! f: d5 S+ V2 C- x! H6 z
/* draw the bottom */ + G$ [# ~4 F( Q1 T* c. p+ E& _
putchar(LEFT_BOT); $ P# F8 e7 f' j$ M$ D. c; N: I
for (i=0; i<10; i++)
6 k& U+ u' ]1 bputchar(HORIZ);
# U2 j, {/ v) V/ S0 }8 Q, G& M8 |putchar(RIGHT_BOT); - r3 A( l2 [9 Q5 b" @/ c
putchar('\n'); 5 S* Q2 P1 N; X3 F8 j
return 0;
# b) R+ g; M$ l" V4 \4 E! p} , i, Q- B* J1 J, p
: h' w1 T$ |8 L0 @3 e/ N
, f5 f3 a) D% B( [
函数名: putenv 
2 E5 [6 I4 [1 |功能: 把字符串加到当前环境中
' C z _9 \9 d' W2 N3 n# x用法: int putenv(char *envvar); 5 w: Q& L8 f ]8 C: Z
程序例: ' w- Z9 e' T7 z2 c/ v) }
#include <STDIO.H>" Z1 k, n( {8 ]1 X5 W3 Z
#include <STDLIB.H>+ j9 u( r1 T, Z( u) c5 p% R( q
#include <ALLOC.H>
0 e$ T0 ~ N& |- T \9 p#include <STRING.H>
3 q2 Q5 @ I; J/ a6 K3 i7 @#include <DOS.H>1 o) s9 ]' t; n& A( L- S' k! A
int main(void)
* b, U1 r. a' X, {& n{
. r {+ N- J4 C T# U1 \char *path, *ptr;
! P1 H& D7 G& H0 D' Y+ F' ^$ ]int i = 0; / U$ I' w' }& k( v& @* q" }
/* get the current path environment */ ' e1 W/ ~ J$ t8 H5 R
ptr = getenv("PATH"); 
0 ^$ u6 |7 K1 k8 Q. c/* set up new path */ 6 p' w* i8 T$ n( G$ d% U8 d, q
path = malloc(strlen(ptr)+15);
1 j3 {1 X! G! ~4 Y$ z, f3 A: A5 Fstrcpy(path,"PATH="); # a0 b7 m. X' G( R( z0 o1 j" m7 s
strcat(path,ptr); 4 {, r. W7 q+ \2 j; l4 `
strcat(path,";c:\\temp"); 
* s) |" D) V3 R/* replace the current path and display current environment */
' k9 ]8 m, k! G2 Y, P4 Pputenv(path); 5 {. l6 R# a1 @2 k# } F0 D2 |0 z3 R
while (environ) 0 H3 P5 d) e. }, ?* t
printf("%s\n",environ[i++]); 
+ C2 X: [" d7 H- freturn 0; # N% F9 E, j* f- b' Z) R
}
7 _+ t$ L4 w$ N
' B6 K! S; b" T) d$ v) j2 J; ~2 X, }# _9 Q; i
函数名: putimage - c) ?6 q% ?7 k
功能: 在屏幕上输出一个位图 5 i/ S: Y' [: Y, t. p$ Q* |) ?" L
用法: void far putimage(int x, int y, void far *bitmap, int op); 1 Y/ o* J+ O( h4 f
程序例: 
2 K0 L8 \% V) v#include <GRAPHICS.H>
/ t- Q: S9 @+ ~0 ^4 ~$ n7 n. Q#include <STDLIB.H>
; S# W$ S6 ]; S+ l#include <STDIO.H>* c) F0 m% e4 r) x) _- P5 L
#include <CONIO.H>6 S$ J$ h8 l4 D- C- w
#define ARROW_SIZE 10 # z6 j. l. ?9 j; x- j
void draw_arrow(int x, int y); 7 ?9 K. J- u7 K4 x# o
int main(void)
 E% u% F# a1 h: h$ C. _{
/ M. \' g# t6 v! c. ~/* request autodetection */
3 R& d+ K f- [& \int gdriver = DETECT, gmode, errorcode; * x1 h1 t+ F6 Z3 x+ a& s+ ]" _ z
void *arrow;
, [6 ~/ K8 l1 R0 n% mint x, y, maxx;
2 B, u! M+ c( h- K! `8 ~unsigned int size; 
9 M6 z8 p; t2 [/ X: O/* initialize graphics and local variables */
5 ~5 D) C+ v F( k9 R% cinitgraph(&gdriver, &gmode, ""); 
5 l* ^) P2 h# x! Z, x" L9 M/* read result of initialization */
, ?6 z" v, O; q& I% E0 Serrorcode = graphresult();
+ V( V; ]: e! S7 ^if (errorcode != grOk) /* an error occurred */
: \% v+ P! B X1 |% c+ l{ ! _$ d# X3 e. ^- s7 w0 P4 X
printf("Graphics error: %s\n", grapherrormsg(errorcode)); : F; r8 q/ K- D
printf("Press any key to halt:");
- }! p1 ]1 c$ e2 l$ jgetch(); - a3 m5 d# N+ e Q d
exit(1); /* terminate with an error code */
; D$ m0 c; R2 m p$ U' \} , W5 E7 k+ y' j
maxx = getmaxx();
# e( u% R6 o1 b' ix = 0;
1 |* g0 P' F4 c/ V/ N6 ey = getmaxy() / 2; 
( |. D6 {4 D6 X8 A0 I! A/* draw the image to be grabbed */ : Y. z, l; p- t8 n9 j0 c1 |
draw_arrow(x, y); 6 |" K: G: {8 K3 J3 ]
/* calculate the size of the image */
 l2 m3 ]0 C& g0 v* ? Ysize = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
/ ]5 |3 G2 r7 u/* allocate memory to hold the image */ / U6 v" x6 i6 v3 N6 O8 N
arrow = malloc(size); 2 f! k0 W& }2 l5 x2 t1 M; i- n: i. q
/* grab the image */
. c: J: ]& b$ e K- Tgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
# y$ b5 l' l1 T! U# g/* repeat until a key is pressed */
: G, q, w; y4 |2 V- _4 Xwhile (!kbhit())
$ @3 I& O5 r% U$ y+ K4 X- g! L9 N3 J2 a{
8 s' e- N e3 T3 M* E/* erase old image */
' k6 X9 E" f8 ~1 p5 L! dputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
% C- J( ?; O: `% _( r% e- Ix += ARROW_SIZE;
- \- C# o, Y Kif (x >= maxx) ( ~9 M3 h6 I$ s/ V
x = 0; 1 F# r, o6 l5 J& u
/* plot new image */ 1 `7 ]+ t% @ \/ F! Q4 r+ R
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
 h6 w$ w5 y9 {} 
& k' n! ?% h! s/ i; Y. _3 `$ Z/* clean up */ ' Y# U. `2 R9 C. B
free(arrow); ! q2 w9 e3 F' B4 i* {! F
closegraph(); 1 n0 ? q8 i' V- ?* X
return 0;
 S3 U- k* B7 Q* E0 O; f5 R} 5 p% N& n% w& j! n4 @ ~3 M
void draw_arrow(int x, int y)
5 j- T; P, l& m{ % J. K8 l3 `, [7 y6 v
/* draw an arrow on the screen */
 @& p# t0 L, G. d6 Rmoveto(x, y);
- @! n9 I/ |0 Wlinerel(4*ARROW_SIZE, 0);
+ T R' {9 U2 s) \- s2 R0 J. Ulinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); . L, w& w) B- H6 I
linerel(0, 2*ARROW_SIZE);
: q5 ?( w, N; h. v( ^# Q. ylinerel(2*ARROW_SIZE, -1*ARROW_SIZE);
3 l" B/ F0 t& W5 {- s- N} & a2 e1 E7 q* A4 N% t8 N' b+ D

+ s0 z: J. G: o* $ p2 c: Q8 p' o1 e' }& J; R; W
函数名: putpixel 1 q; N* _8 X: p; C' Y
功能: 在指定位置画一像素
. y7 O) G+ x- N% h- w4 I用法: void far putpixel (int x, int y, int pixelcolor);
: K0 t2 l) O5 @% ]& @' T' ^程序例: 
4 }0 R# {. {( k: L% h! S g#include <GRAPHICS.H>
1 g. E1 U& D) \#include <STDLIB.H>! q8 O1 T% [! o& s
#include <STDIO.H>$ A% G; R& k' ~4 I
#include <CONIO.H>' N. I. _$ [' I9 A. C6 z2 d) `# Z. t2 G& ]
#include <DOS.H>
" A: Y3 o. _% ^4 {2 c6 E3 S#define PIXEL_COUNT 1000 3 C( l6 n& _5 e. I. U
#define DELAY_TIME 100 /* in milliseconds */ 
0 }9 K, f( T8 i: G& zint main(void)
: D+ U# X9 {: v* z& V1 [{
; P! T0 N8 R2 y% x8 A/ $ n- a7 C/* request autodetection */ 8 c+ |; M3 f* _. ?7 b& s
int gdriver = DETECT, gmode, errorcode; ( L8 `: `1 z- O1 Z' ~
int i, x, y, color, maxx, maxy, maxcolor, seed; % M6 L4 B, G. C5 g0 `( s
/* initialize graphics and local variables */
% ^ t: I- d! `; U7 a- f8 y! cinitgraph(&gdriver, &gmode, ""); 
0 C+ g) I+ V2 X: {7 J/* read result of initialization */
1 ~$ p0 H: N* i% L5 A7 `" u; ~errorcode = graphresult(); 4 r$ m7 t; K$ }7 E- o- z
if (errorcode != grOk) /* an error occurred */ , @, t4 ^+ Y/ j/ m! K7 h# q/ s
{
0 h/ }9 r3 g- |% cprintf("Graphics error: %s\n", grapherrormsg(errorcode));
* J4 w" V. |& bprintf("Press any key to halt:");
& `& C' s& [( D- l/ K) @getch();
/ B5 I0 d* e2 hexit(1); /* terminate with an error code */
! L. ^! V5 j/ m( t! c& w5 C6 F: I} 
, g9 p- o! a; O" B- ]! m7 q. nmaxx = getmaxx() + 1;
+ N4 {; W1 W9 z9 X+ o' |2 k' pmaxy = getmaxy() + 1; ( E1 z; \! f+ T
maxcolor = getmaxcolor() + 1; $ O s8 d! H( @4 _
while (!kbhit())
& z V# j1 c" S4 B{
6 X4 ?0 x: m0 Y% g/ L, @/* seed the random number generator */ ; O8 o, S% @6 U( L; ~
seed = random(32767); ( \* ^- l' v% P% i: ?* p: U0 ~ c
srand(seed); / S, y1 E3 V/ ^' a. D9 t. H# ^" ?
for (i=0; i<PIXEL_COUNT; {
6 k3 R$ ?- |7 ] s: d% Q" m# hx = random(maxx); 2 F: N/ P1 k' P% z" N9 E- y5 N
y = random(maxy);
0 W8 B4 q- L1 D' ccolor = random(maxcolor);
9 d, i7 s5 U5 _' O4 Qputpixel(x, y, color); 2 O; {% W* X: R+ G
} 
9 V2 x- k+ ]% o# [! |1 P& {delay(DELAY_TIME); ! l2 |2 L1 u0 ?! q7 b
srand(seed);
: c+ s5 V6 q: l2 y! N$ z% l: ?for (i=0; i<PIXEL_COUNT; { 8 S* z2 f$ B8 J B+ c2 \
x = random(maxx);
& o# G4 j8 ]' C4 k, `% n+ E, jy = random(maxy); + a1 u" n" C6 c* n& L- E
color = random(maxcolor); ) b# J3 S) N5 m* o i) l; n
if (color == getpixel(x, y)) 0 W' T3 V( k/ s6 M3 d& o
putpixel(x, y, 0); ! I' Z# y" u! _" k
}
) T B( @2 o" K, s7 p} 
3 V+ S" C* Q% c/* clean up */ 9 q" m# ^; n1 [
getch();
3 p! \% f; R" @) G+ O# a- j. {3 Zclosegraph(); 0 R D9 W# s4 x3 \
return 0; " @/ e) P- l+ [7 Z C
} 4 I v; B1 U0 s- _
/ b" `8 U, T8 [+ }& a- \

& e- j) N2 [ m( y函数名: puts $ T- a M2 u, b g
功能: 送一字符串到流中
* p( @/ f, w8 q5 g; K0 N8 `用法: int puts(char *string);
- C! ]: J( F, S5 v. M: q- D程序例: 
/ {8 |0 x3 ?, ?3 C; s t& R#include <STDIO.H>7 A2 a3 r' p) P
int main(void) 7 y8 X4 Y5 x0 {- b% o- {0 u) l
{ ) l0 y5 |4 a# A7 Y
char string[] = "This is an example output string\n"; 
: ~+ b |) w0 c5 Nputs(string);
. y; C! H2 H) V2 Rreturn 0;
6 {) k! p- y! O+ q7 ~, H' p+ h} 
3 D% F: ~, ~! l$ Z0 `' m+ J8 B% }
6 J. { w6 K0 C* ]% a6 x3 o( \1 B5 L' D
函数名: puttext " c/ ~, \2 s0 I$ n, y
功能: 将文本从存储区拷贝到屏幕
1 v8 e( B0 t2 Y3 X* y' [3 d5 V用法: int puttext(int left, int top, int right, int bottom, void *source);
" v: f, Q) [8 m( `2 d; w9 Y0 U程序例: 7 h8 \ u& ?9 Z# P8 K2 F
#include <CONIO.H>
) k7 b! s' @# {! j$ O# d; tint main(void)
8 `) ]$ I1 z- R{ / ?& T/ Y8 q+ `$ a
char buffer[512]; 
- t6 `5 x L! A& h2 Y- H7 ?1 I/* put some text to the console */ $ Z2 J! j5 |, S! F3 u
clrscr();
/ t4 S3 W0 d' ~8 I* ogotoxy(20, 12); ( D5 h- l& g# y4 i
cprintf("This is a test. Press any key to continue ..."); 7 |" {& \' x+ q$ w& c3 G
getch(); ; x2 @- y# q$ W: R- \. _
/* grab screen contents */
. f6 z% b, p: ~3 rgettext(20, 12, 36, 21,buffer); 4 O6 @; n) t3 `& N% f$ ~
clrscr(); 1 t3 {2 s: ~8 b3 G% A
/* put selected characters back to the screen */
* k* s6 ~$ s/ h7 ?" a) bgotoxy(20, 12); 9 r- N0 j4 K- I" i
puttext(20, 12, 36, 21, buffer);
. A! T1 D% ^5 C5 f/ t3 V/ Ugetch(); 7 n5 \( p) P$ ?2 A+ }" |; t& d8 `
return 0;
% Y1 O k- t1 @}
- h# s8 V4 I0 q7 t5 Q; J* Y; }. J5 p) L: J6 z
# d. ^/ O. X s. x/ ]9 t5 p
函数名: putw 0 x; e( q* y4 |) R. `
功能: 把一字符或字送到流中
3 k) u! c q) ^% @9 `! P: f* _用法: int putw(int w, FILE *stream);
. C# }* ~3 t$ b, P$ w程序例: 6 {8 y' B) y8 l) f* I, h$ r$ w: O
#include <STDIO.H>: z1 ?) x1 v, R6 d1 W3 q6 Z
#include <STDLIB.H>- H7 e" D! t' C, R
#define FNAME "test.$$$" 
' ~+ x; C4 u( jint main(void) / H" `7 \$ y$ i. [5 J L
{
& t" F4 y' Z! t' fFILE *fp;
9 ^1 {7 } w) o4 z* n9 H: tint word; ; N/ Q8 n& |7 Q0 H/ D9 I
/* place the word in a file */ 3 f8 L# Q. i5 l) t% g3 K
fp = fopen(FNAME, "wb"); ?+ N v! {& V! ~% R* J4 C" A
if (fp == NULL) # y. `" c# ]8 ?
{
- K6 M; ]0 ?' K" p5 xprintf("Error opening file %s\n", FNAME); 3 t& v7 B1 A' P P
exit(1); * Y. U. G0 n: m$ K+ @
} * ^! O3 ~% X( p2 J# J( a
word = 94;
5 n; `; ` w: d, C2 F: k, zputw(word,fp);
. ]0 S3 f7 Q3 S* mif (ferror(fp))
6 g7 Z$ v# a, `$ ?8 d) A ^" C, Kprintf("Error writing to file\n");
; z' ~. k1 x3 M3 v; M7 N# gelse
% s; \6 o+ B) J, f8 T$ N0 i4 Q8 F, |printf("Successful write\n");
3 \! x0 K5 C ], T1 xfclose(fp); 
- G3 R+ \" K/ m% c0 ~8 k/* reopen the file */ 0 U# g" e% ?0 Q) j
fp = fopen(FNAME, "rb"); $ g2 t5 ], ^1 M) t3 b
if (fp == NULL)
- N! Y% A- t$ n0 k2 E{
; ]7 n, E! w' {2 f# l' t- Gprintf("Error opening file %s\n", FNAME);
5 g! e) B, k% D) ?2 X& gexit(1); 4 B% P% m6 m9 C# [
} ) B2 R. M3 O5 W( @6 f8 c
/* extract the word */ 2 ]) _; l( ]# Q/ X/ u7 q# T
word = getw(fp); 7 ]- T7 o: ]' B
if (ferror(fp)) ) M3 O d$ _% B" K( ?" n a
printf("Error reading file\n"); 6 t. ~+ |# c" e# a; Q4 ~
else
+ O4 u4 U; I) a0 dprintf("Successful read: word = %d\n", word); 
 |) c2 Z7 ^+ F# Z/* clean up */ % ?' a* F$ V" D* [3 _ m( M0 e
fclose(fp);
0 o. V& ^' k' j: vunlink(FNAME); 
6 ]! T- O/ X' t: Wreturn 0;
4 k$ } I1 D& J0 b1 i1 D. g, D& V}