查看: 2721|回复: 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) 2 K' \( {) d, z
putc(msg[i++], stdout); 4 ]% ~$ z1 C/ z3 Y8 e
return 0; 8 d, _8 W" p C3 j
} ) t) S; Y( P( B. T- p

' U% Z$ a4 @+ L7 r2 [' @, B+ G9 t% I7 u& m7 O- l# \
函数名: putch 
 h- A, B# Z3 o- a$ C! ~1 k功能: 输出字符到控制台 $ @: Y' L' Z$ P7 U1 b0 ]$ _" A6 V
用法: int putch(int ch);
' U, C3 R8 R4 H7 W' P: o* {7 O O. ^程序例: 
" I9 F4 v' i- ?; ~#include <STDIO.H>
7 I5 E4 o9 p0 ^2 F#include <CONIO.H>
+ Y2 H9 Y9 O! O% \int main(void)
0 y' X8 q8 Z% K, Y8 }- {% H/ K{
2 Z2 v8 x/ h8 b8 [/ G4 \char ch = 0; 
8 x7 v a/ w* ~: ]5 B4 X: N: g7 N3 Aprintf("Input a string:"); * V; g% M) V& @9 d3 E' _5 z
while ((ch != '\r'))
0 O9 s* _4 F* {! M8 ^0 y2 y4 V{
$ K5 r. @4 G9 p6 k7 e7 V: Och = getch();
- y, Y" i$ \( H! `. Hputch(ch);
" P) p b! f( \6 S# F2 a; c} Y; j6 v1 K+ h0 H6 U. I, @
return 0; & i* S- o8 ]& d# k/ b$ @ b
}
% C3 Y+ F$ a+ }) t# e# `' U& U* G, S9 t% q' a! i3 P$ a
2 i) P& A4 z# c0 g
函数名: putchar 
: b1 Q, V- G |功能: 在stdout上输出字符 ( Y( h; M8 L1 j K \- j1 T; \
用法: int putchar(int ch);
$ u9 I5 E! |4 [( q' I" n程序例: : s) J/ M! `, X: ^& q% l
#include <STDIO.H>
: ^4 g2 N: X# T5 k/* define some box-drawing characters */
4 ~' T: Q5 b. s# k* U#define LEFT_TOP 0xDA - i0 a# W! A$ q5 H
#define RIGHT_TOP 0xBF 9 J, x4 B2 z k: \3 F2 G* w; f+ {
#define HORIZ 0xC4 ; t9 u4 q; z6 y
#define VERT 0xB3
+ P0 E% S4 T# {; v, E! v#define LEFT_BOT 0xC0
; L/ f& I r, I- L#define RIGHT_BOT 0xD9 7 B' k7 C# T, a4 }+ d5 s% \* @
int main(void)
( k: E4 Y" ?- E7 }{ 8 ` R+ S" S; \1 J6 m( i* A0 q
char i, j; r1 R! c% d$ Y5 @
/* draw the top of the box */
# B4 V. U- t7 y/ g$ pputchar(LEFT_TOP); : A/ P% X$ v" p; @/ H
for (i=0; i<10; i++) 8 G' T1 g, O3 B' _5 P+ ^4 ?/ b8 _
putchar(HORIZ); 7 z& K4 N' X+ M" N, P4 I1 C
putchar(RIGHT_TOP);
$ N! }3 P% r2 P& f) kputchar('\n'); & X6 w8 x* q5 [: R
/* draw the middle */ 1 j; W3 u, v% G. X
for (i=0; i<4; i++)
5 V* M3 t0 Y- c, [{
. y7 x7 R% W: l# Bputchar(VERT); 1 A0 o8 U) c. G% E
for (j=0; j<10; j++)
; `( {+ S( q: }- S& p: Sputchar(' '); " s! L. [0 j# B9 Z3 w, p. y5 p) T
putchar(VERT);
, b7 P- P' @( i' B5 c$ B$ R; S7 V, vputchar('\n'); ( E! V8 J5 U% `6 n: T R: A
} 
6 `- G6 j( O+ x* O9 V4 V/* draw the bottom */
) v9 Z2 b( p h" f6 C( j2 Lputchar(LEFT_BOT); 7 i5 R, t$ U3 \6 J( _+ Y
for (i=0; i<10; i++)
$ K' }, G6 R/ ?7 g( v" Iputchar(HORIZ); % b2 l% J2 n" r" d. ~) E* h
putchar(RIGHT_BOT); 5 ~6 d/ l+ v6 O* s! F J
putchar('\n'); 
. Q1 v9 [0 F0 T# p0 u: V( }; |- preturn 0; * K$ ]: ?" |6 a3 ^4 b
} ( L' M7 y" R O5 E! Z
# h4 d8 f4 X( O7 h7 j+ u9 S
9 b: `+ D, F$ e" ^+ Z/ e9 S2 K
函数名: putenv 
) s# n/ S& V! R, t2 o |' s功能: 把字符串加到当前环境中
7 }9 |5 k2 T$ p' e; N用法: int putenv(char *envvar); 3 z1 E( c1 k0 q5 R
程序例: 5 [+ @/ Q; ?9 Q! X4 F
#include <STDIO.H>' ^# G$ p4 Z, h, U
#include <STDLIB.H>! L0 n2 G5 s* } H4 X; y3 \ H, d
#include <ALLOC.H> ~0 t7 H+ d. c" P
#include <STRING.H>
4 j4 V, E/ J' N$ V: r- Z& c#include <DOS.H>
+ `2 Q L. A4 y8 Y0 t, Tint main(void)
- U6 R' N# `: U& G: }{
* |( d7 o- E- c0 H; qchar *path, *ptr;
/ {: p1 O9 i+ W6 b/ B* Vint i = 0; 8 S2 N+ H! n n/ c8 Q! i* Y* I" I
/* get the current path environment */ # P3 B1 o- v1 U O; B
ptr = getenv("PATH"); 
4 I- S4 W: P! p: P* W- D' g6 p( {/* set up new path */
* I) ^4 B# |5 C1 e4 @7 ~1 h" Fpath = malloc(strlen(ptr)+15);
) ~9 F5 P# P/ R3 p' @4 nstrcpy(path,"PATH="); 3 ~. X7 j, D' U' X4 {- F
strcat(path,ptr); N+ S& `3 z2 K; I6 |
strcat(path,";c:\\temp"); 
# l9 L6 R6 l5 |0 V, ^/* replace the current path and display current environment */ * U, }0 z9 ?# ?% {/ v3 U/ V
putenv(path); . s e" ]2 {* @& E& }
while (environ)
2 T! p- I, A$ o5 n( ?. |printf("%s\n",environ[i++]); 0 s# Z9 w: o+ o3 p5 q
return 0; 3 P, O( R/ N& j; x1 |
} 7 j: D, O B3 K" x0 J, ~3 ^1 a
3 T! ?7 A! U' T3 W
0 d8 [3 E. a3 q4 T, _ f
函数名: putimage
* u: F: L; ~ h( U功能: 在屏幕上输出一个位图
2 s: @; x. A( N. P ~% P r用法: void far putimage(int x, int y, void far *bitmap, int op); 6 Z% c( O8 }9 {" J: _
程序例: - w5 e! P3 M3 w
#include <GRAPHICS.H>9 \4 s6 w! C0 D; d
#include <STDLIB.H>
$ e* U I3 h8 H6 c- s8 K#include <STDIO.H>3 [. M4 T8 k4 |' t$ I
#include <CONIO.H>! K0 x0 D3 C) ?# p! a( M, g- _
#define ARROW_SIZE 10 ; U) ~, P7 M1 i8 _, O! u# i
void draw_arrow(int x, int y); ; W) b2 a" t3 b4 y2 Y& l) x) J
int main(void)
- e! Q4 {( u$ ^/ C! p3 E{
$ I& b( M" {5 Q8 V$ V1 ?* @( O$ Z; E/* request autodetection */
+ [& d2 K5 w4 N# T- N5 Uint gdriver = DETECT, gmode, errorcode; : t# y1 ~+ i5 w7 J# i& D
void *arrow; ) _& `: ]# ]! y( H
int x, y, maxx; % I4 P* w+ w/ g m8 t( |2 q
unsigned int size; 
/ v# ]7 G+ t! [ b) ~/ n8 O/* initialize graphics and local variables */
2 o0 O. e6 f; ]$ M. _initgraph(&gdriver, &gmode, ""); 
; \ o$ N- A" g5 z9 p5 b3 g/* read result of initialization */ 4 w5 m" a( l! ?1 w+ G% H& o
errorcode = graphresult();
$ K7 }4 T5 f) Z4 E8 Bif (errorcode != grOk) /* an error occurred */
; D' y/ Z* U5 B# a{
% B' |8 h# O7 m5 x0 i) iprintf("Graphics error: %s\n", grapherrormsg(errorcode)); + i" R7 F4 J5 ]& x, z
printf("Press any key to halt:");
- [( x- X. f) X7 U' F* Bgetch();
# {/ X' s& }* Y! D8 x* j) b6 Bexit(1); /* terminate with an error code */
1 K$ G0 {, D' ]! X} 9 e- j; X4 e% i
maxx = getmaxx();
. g) c! B( Q* L) m& D* rx = 0; % ], P5 @7 [. [, I7 R1 F) O/ U
y = getmaxy() / 2; , l3 k' Y6 w- F7 V: j
/* draw the image to be grabbed */ ( U2 l; O0 P0 M0 S9 g
draw_arrow(x, y); 5 N9 L y' b* T. I; w. f; Y
/* calculate the size of the image */
1 v3 j2 D/ v9 \- r) Bsize = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); ; O0 B# g m: Y3 \. X5 R
/* allocate memory to hold the image */
) e$ r! l; h/ Q( r% a5 karrow = malloc(size); 
7 b8 O9 e2 b5 }/* grab the image */
/ A+ G4 a) x3 j8 lgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
# d+ u# I, y- b5 ^% i4 v" r1 i/* repeat until a key is pressed */
 o) |+ Q3 y7 ^while (!kbhit()) + G7 M" q" F5 ?8 Y
{ 6 N, u7 D; z% R, n+ l' S
/* erase old image */
: v/ p- L1 V/ p" Oputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
) s( r6 I3 t, K& ?% @' C2 tx += ARROW_SIZE;
6 |, n+ t8 E3 Z* R1 W h+ k3 cif (x >= maxx)
, v& i7 b. E7 e" |x = 0; 6 t: l8 G/ n( q/ X
/* plot new image */
1 K' `, n& B9 m* F0 p' f0 pputimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
' p5 m1 @3 `' }1 t} ( L5 |. H0 N% ~; L0 g1 I M$ `# e
/* clean up */
2 o1 y0 O" Z) {. U$ Nfree(arrow);
4 Q' u* w. I, \- F X8 [4 u# `closegraph(); 2 H {# J# g! u6 Z+ d: U
return 0;
( R5 [8 C; W1 g3 M8 ~} 0 E0 t+ Q0 G+ U
void draw_arrow(int x, int y)
! x- ?+ d' \, ]/ b8 E6 z* N{ / k w! P) O4 U3 i7 A3 X2 l9 n
/* draw an arrow on the screen */ / l9 u6 l, r! {" j2 G* C; c, k
moveto(x, y); # \/ Z: f& q3 L X! ]
linerel(4*ARROW_SIZE, 0); + D) J o: J' ]' u6 f: B
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
* Q; i. z. N- y1 ?, dlinerel(0, 2*ARROW_SIZE);
% `9 Q6 t5 c# L' X" F6 e! Llinerel(2*ARROW_SIZE, -1*ARROW_SIZE); # s8 S: h% p, y) U
}
! V; f& d" v2 O( {; ]4 l* E" d9 M4 j0 K; ^ H! H2 G

+ ], t$ ~, c+ f" f8 ?" P; p9 M函数名: putpixel 7 E7 X' i% f1 f3 w
功能: 在指定位置画一像素 : Y+ B9 j3 ~8 F' g. v9 ], Z
用法: void far putpixel (int x, int y, int pixelcolor);
, w& o8 ^( W9 \# S程序例: 8 ]2 I" S' c+ G- M/ u
#include <GRAPHICS.H>
) i M; _$ M% g1 F% D. S6 w, x#include <STDLIB.H>5 e+ o9 C ` H# i
#include <STDIO.H>4 x: c |" X- `9 d/ m
#include <CONIO.H>
9 K F. |2 ]. p: {3 \: @' D#include <DOS.H>
' @! \# v7 L* h& g$ v#define PIXEL_COUNT 1000 ; T1 }% `! |1 h5 Q( Q7 A7 U
#define DELAY_TIME 100 /* in milliseconds */ + x+ T% ^5 G w2 i
int main(void) 2 D2 y) N+ M, S3 |/ Q' \, X5 X$ F+ N
{
* H4 P) L7 p" A8 I" P2 V1 d8 F* ]/* request autodetection */
( l* |7 y: a; X# [3 I# ~3 b7 v) Uint gdriver = DETECT, gmode, errorcode;
 s5 u1 N y% k* b0 `int i, x, y, color, maxx, maxy, maxcolor, seed; 
7 b6 t, X* y( o3 y6 N- A9 ]/* initialize graphics and local variables */
 X. V2 p" A0 B: N! cinitgraph(&gdriver, &gmode, ""); 
: f# \; }4 v2 W; w# q/* read result of initialization */ , L$ c- Y+ B( p% Z: Z; ~" ~
errorcode = graphresult();
5 Z y. R6 y f5 F& o9 T8 c. lif (errorcode != grOk) /* an error occurred */
! E! `4 q3 b9 }) T4 A) y4 E{ / Q: `1 z/ r2 k6 P# m1 X h
printf("Graphics error: %s\n", grapherrormsg(errorcode));
, M+ i! O3 V7 u! P" P3 vprintf("Press any key to halt:"); " X. I7 ^* Z( r4 H: \% s) V
getch();
$ a4 U2 o5 E5 |9 I/ Y, s9 ~exit(1); /* terminate with an error code */ - `3 L/ ]9 R7 b5 v0 L/ A
} 
0 c, D8 x# u( Vmaxx = getmaxx() + 1;
5 E" f- A) w# y1 H. {# C1 \8 hmaxy = getmaxy() + 1;
/ v: m& p" ^# w8 z7 t/ W. s) Kmaxcolor = getmaxcolor() + 1; 
) p$ v6 A) Y* ^/ O- `while (!kbhit())
( {) a' C- Z& |+ v4 V) A& _* @, j7 H{ 2 w( O0 p+ J# }
/* seed the random number generator */ % T$ u1 {1 g; ]' d% w/ u( b
seed = random(32767); / w0 p a9 w# G, {
srand(seed); $ H) V# T( k e
for (i=0; i<PIXEL_COUNT; { 4 q( c7 o6 N0 }3 w) `8 D3 f7 O
x = random(maxx); 2 N2 O. T- v0 |0 A' O E
y = random(maxy); y& q: Y( U) l( Q' J. H, t& r
color = random(maxcolor); ( }* P1 L. a8 ?9 {
putpixel(x, y, color); 6 s5 m: q9 [: F" q" }
} . P6 ?# |) s3 {) D5 n1 k
delay(DELAY_TIME);
) a) Y# A, J7 }2 h5 f- ^8 i0 x, J2 isrand(seed);
. H! _+ X0 N4 G4 c5 Zfor (i=0; i<PIXEL_COUNT; {
7 X; _# o9 M0 M" l8 J; Fx = random(maxx); , C- |8 {) t& T7 K* X B: H
y = random(maxy); 1 v+ y0 Q% q3 K; y/ t
color = random(maxcolor); ' H; k0 [9 _' s3 b6 A. ]
if (color == getpixel(x, y)) ! d! r# W X5 i5 U, `9 H; h
putpixel(x, y, 0);
+ y! n. D0 M) Z- x3 \) ]" K} ; q8 N% W% A( f/ g S
} 9 z m8 s* z1 T4 w1 x$ @0 L
/* clean up */
8 \% q8 I* T) l9 [getch(); 3 _5 h' d9 ^/ U# b
closegraph(); ! H9 R/ v+ a$ o4 a* |! y/ ]4 K
return 0; 2 n4 C2 R9 o4 ?- _, ]2 @
}
, _# _+ ^% ~3 [+ s* A
% a0 e3 @) n( O% H
7 ?( W3 l. i% E3 F+ `函数名: puts 
: k8 R) ]9 B* L, n功能: 送一字符串到流中 9 E+ |. [0 T! S) {$ a& d# h% l
用法: int puts(char *string); - _5 ?9 b4 Q& y7 s/ d) Z
程序例: % k! N( t7 E2 S
#include <STDIO.H>
8 v5 L$ B# z8 ]6 q2 H- gint main(void) . \) W& g1 s, a9 l0 s1 N4 ~
{ 0 }: P! m5 |7 ^# W
char string[] = "This is an example output string\n"; 
" r5 S2 x: D B3 iputs(string);
: _. P H' U o, a5 o# xreturn 0;
% y ^* C, P$ s8 a# h} . i! D& M7 | v" u* R
* \- E& R% R6 _* d

 [" P! G% E' `8 Z+ Z3 s函数名: puttext , G- i. R* r2 R* U
功能: 将文本从存储区拷贝到屏幕
3 |3 W2 B5 Y% ?) a2 b用法: int puttext(int left, int top, int right, int bottom, void *source); . r0 R% X: W; N* q8 b: _
程序例: ; {3 L) X/ L7 U
#include <CONIO.H>7 U v8 a5 n+ u6 v' N- f! o
int main(void) 5 q2 t2 t) T9 h! ?
{
' `7 m, v* o) |" E+ g; K7 K& B W% Zchar buffer[512]; 
. T7 ~3 ]: o1 q4 V" J* F/* put some text to the console */
5 {, u: l7 g4 Wclrscr();
, Y& A7 ~: \- Agotoxy(20, 12);
0 |0 w* p; B& H5 b* `. Vcprintf("This is a test. Press any key to continue ..."); 0 o) C$ l& m) g7 n! y
getch(); * C' u5 u F6 M( C# z
/* grab screen contents */
& I" k I5 S* [% Egettext(20, 12, 36, 21,buffer);
$ [, ?; R- A" R2 T( F$ ?2 k# p. u9 C1 Bclrscr(); 9 k' D" u( y- q+ K' y( s
/* put selected characters back to the screen */
1 W5 e; C) {5 D4 ]! D) r" ~gotoxy(20, 12);
/ W [& E6 @! K. e& q# e) _puttext(20, 12, 36, 21, buffer); 1 P2 \0 K) W) P6 O. G: w: _- v1 A
getch(); u' A+ `/ [+ d
return 0;
- v7 ~! |% B o/ m* V}
* e) K! e3 {$ U* B) n
7 p8 X6 m$ Z6 S/ K# O$ ?. Y+ x* }; e- ~# E, x
函数名: putw 
" ^ j1 Z# C& ~; j功能: 把一字符或字送到流中
: p$ U+ a; ], E$ I" X: a用法: int putw(int w, FILE *stream); # B9 q8 w( e2 ^
程序例: 
9 I j0 c# `, @6 u4 E6 f. [$ Z#include <STDIO.H>) Y2 t7 i" v- s* b3 m
#include <STDLIB.H>
: S4 B# \. ]& |3 q#define FNAME "test.$$$" . P: e) B6 s* b. w. ^6 v
int main(void)
. x* X4 A# o2 {{ , o B/ C: C8 j9 Q4 y. Z- W+ |
FILE *fp; * |6 n0 |, n' L: [# W& ` i
int word; a& P) d& b6 x6 O8 ~
/* place the word in a file */
2 `! R; j- `1 r9 c% P& X: ]* g: }8 Afp = fopen(FNAME, "wb"); . r0 k( d) [4 ~% e7 w5 [, O
if (fp == NULL)
. Z9 a7 Z' G& o4 D{
, C0 p/ }! P& F- }1 P: H1 Bprintf("Error opening file %s\n", FNAME); ' X. z* c# e4 t! s* W
exit(1);
8 v$ |- V/ M" L0 a; R8 L! Z" c% x} 0 [- G. J% n$ `. u7 m0 @( n8 g
word = 94; 2 h. D0 T9 q) f+ ~0 f' k4 M4 b
putw(word,fp);
% p: [- l/ a, X; ^/ E1 P r4 P0 ^% Kif (ferror(fp))
( a4 U8 t0 O$ f5 ^+ o- Bprintf("Error writing to file\n");
8 R! p( D0 H" m* b; B8 Welse
" g7 q2 v3 T& _; Cprintf("Successful write\n"); & @4 g. t) Z) C: Z4 K* e/ w( S
fclose(fp); # `. X2 T: w; y
/* reopen the file */ 7 T0 \* B) Z7 D* P5 u* g9 z0 ~
fp = fopen(FNAME, "rb"); 1 Z" C2 Q* y) A- E* b6 b
if (fp == NULL) 7 }1 s( F& @* L8 H
{ ; \/ ]6 b6 Z% W
printf("Error opening file %s\n", FNAME);
! _9 g5 U$ ? }: @# C$ s9 m5 |/ J1 Xexit(1); S' R! w1 |% h3 C. b! U. S
} 
. \; _/ x" x1 T- W/* extract the word */ ' [) g: \, m1 s" H$ W* j& d
word = getw(fp);
 o4 [/ t+ O- D {* yif (ferror(fp))
* _4 n# h+ t; W6 {$ k ?: i" yprintf("Error reading file\n"); 8 W" [, ?5 [9 N; i x$ U; P
else , i! E6 r: @+ u8 I& z( Z2 f
printf("Successful read: word = %d\n", word); $ X) P; B" n x& s( m7 I M
/* clean up */ * Z- r7 I# \. l! ^! n
fclose(fp);
9 B8 n; I7 p3 Runlink(FNAME); 
/ `5 r) B X5 |6 t' Jreturn 0;
) j: j! u7 l4 y+ `}