查看: 2780|回复: 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) " N) M. [. M! J" L
putc(msg[i++], stdout);
1 e+ p+ I9 j5 P. E7 o( H4 m! kreturn 0; - `2 _1 `, F4 |4 v) m
}
' P5 a6 p. u4 N& \, L! I: a( y, v
- I6 j: r9 g, h( e; B# J1 X1 s$ o6 W- [
函数名: putch * i4 e- d2 k3 M) A
功能: 输出字符到控制台 9 f+ G- b) A! t8 }1 \3 W3 P* ~
用法: int putch(int ch);
, I1 K1 W% |; d* A# l# Z2 `6 G程序例: : N- _% d% p! N
#include <STDIO.H>
) o" _ {" l. {% X4 ?$ V3 V. E#include <CONIO.H>
$ A3 e2 _3 G6 xint main(void) / T- y+ _; |$ |8 l6 {
{
1 D( w% e6 O; L3 gchar ch = 0; 
4 M5 o5 B! B7 ?printf("Input a string:"); 2 C3 _8 d$ {5 V! Q B+ J
while ((ch != '\r'))
! _. ^3 b' G( \7 c! h7 P% Z- d{
: k2 R: I# s8 |( d. Gch = getch(); D9 R" k8 e6 t* o& M# U1 P1 N
putch(ch);
( J6 Q d3 I7 F+ g}
3 G' v5 G# C: }6 preturn 0;
; ^9 c& b9 f7 e9 P- s} : n) y- s0 ^: e: |8 i$ o
* j9 y; O' Y; c4 y* ~0 m

, w6 X z* b* @" l函数名: putchar 8 X7 t. \, y8 A' u8 s" X9 x( u
功能: 在stdout上输出字符
" a! t+ ^7 |" z1 U4 @$ y0 m$ W* D3 h用法: int putchar(int ch); ' X: L/ k% l6 u; J$ ~% B
程序例: 
8 q6 ?' H1 H! o#include <STDIO.H>
" a. q" g3 }4 R3 [7 B; i5 Q8 D" Q* X/* define some box-drawing characters */
6 J/ z5 z) Y' l4 v#define LEFT_TOP 0xDA
5 ?$ B7 S- @5 C6 ?#define RIGHT_TOP 0xBF
0 K" N5 Y; v% w8 o* c1 P; }; Y! K#define HORIZ 0xC4 . [5 f% h; l, K+ f1 @0 L( ~* O2 L
#define VERT 0xB3 0 G) ^1 _; _5 c4 x' `6 L( o
#define LEFT_BOT 0xC0
6 G6 {( \# t& b! Z7 W#define RIGHT_BOT 0xD9 
% W- t& q, |; J S8 ?* oint main(void) 4 S) z# \5 u: c; c# t
{ # d: Z; ]& X) _# b
char i, j; 
9 N2 B3 A9 ]& @3 D9 M4 p9 m/* draw the top of the box */ 5 m* \; h. @! d6 ~0 n: g
putchar(LEFT_TOP);
' v4 Y3 r; q1 q0 h- Z0 Pfor (i=0; i<10; i++) 1 _% v8 h0 ?; p2 r6 c2 X
putchar(HORIZ);
" R% V7 Y% |* M& y$ O+ M! P( j7 k, pputchar(RIGHT_TOP); 7 [$ ?8 G: K% B( l) y: C
putchar('\n'); 
5 ^5 N# x/ ~, A3 z9 ?0 F/* draw the middle */ & F1 `4 A0 W& C G; F0 I
for (i=0; i<4; i++) ! Q2 C) z; t5 f7 r; [
{ + Y9 f& O6 i/ u( N. {' \# @$ D' E
putchar(VERT); ' `+ k- k# @9 V8 M% H
for (j=0; j<10; j++) 7 G6 K+ V) { Z4 F. e
putchar(' ');
* q3 c v& ]) j! g9 i( u* Fputchar(VERT); 4 H, k0 x* G9 k; c! X
putchar('\n');
4 k- K/ O0 H, e# Y+ H1 C# j0 r} 1 d' p' d# q' j" }1 a
/* draw the bottom */ ! Z. W4 x0 W" N8 m6 _
putchar(LEFT_BOT); ) x5 X% o7 k5 o I5 s( d0 t+ {
for (i=0; i<10; i++) 0 K9 X4 A; K) @0 B4 i+ X. ~
putchar(HORIZ);
8 B% x# {+ |" F8 d. h7 xputchar(RIGHT_BOT);
1 G7 N9 w5 ?3 m$ `3 _putchar('\n'); . k t. a% Y, T2 |& n! @& N% H
return 0; ' T& x+ S. H$ L1 k7 U
}
2 M( B6 V0 d. X. ]! O T0 z3 @9 d/ i6 c

# x4 E! f1 J7 V ?1 E# a- a( z函数名: putenv 5 n6 S( E, D; ?+ `( {. e2 u
功能: 把字符串加到当前环境中 2 w9 ?) _! _! \9 _' o: O
用法: int putenv(char *envvar);
" ]. f7 W1 x) c4 n程序例: 
- h( N/ `1 q, `6 j5 s) a r. X#include <STDIO.H>" L* |3 h- b$ q$ A* U h" @
#include <STDLIB.H>2 h7 K2 s1 p( j) Q2 ^
#include <ALLOC.H>2 L% n Z% {# b/ q3 {
#include <STRING.H>4 }. P+ p# K# i& B: \
#include <DOS.H>; E" T0 [: R2 \' O
int main(void) + W! C1 J/ [ M! O5 k) m$ H1 R
{
4 ]% \# g6 E2 |3 Kchar *path, *ptr; 5 ^/ W$ a8 c5 q$ s, y9 l
int i = 0; 7 X {$ K3 [% p( X/ r
/* get the current path environment */
# d$ g: I' [, ?* Mptr = getenv("PATH"); 6 K' }& W) c) y. W/ l
/* set up new path */ * [8 v$ ?9 H# f _6 b6 ^( \( N
path = malloc(strlen(ptr)+15); 6 W* b3 C4 f: Z+ S: R0 b* P% m
strcpy(path,"PATH=");
2 R: i" k: H; H/ o Cstrcat(path,ptr); # _) F4 _& b; B F/ d+ p, i
strcat(path,";c:\\temp"); 
! \# r. z- G9 |& p. f/* replace the current path and display current environment */ ( I* z; J, m5 g, Y+ e/ ^
putenv(path);
5 G, k z1 g& l0 A) E$ X5 ]while (environ)
* _& |8 ?" Q( L; M3 C( Zprintf("%s\n",environ[i++]); 
! I- P5 ?. `5 C. xreturn 0;
9 |) H7 z; T; T! h# ?9 [} ] L' L1 Z1 r% H4 b
, O2 x% k1 u" Q' ?6 G0 I& {
* ]$ f6 w G8 z: o5 T/ v
函数名: putimage
! A! s: R" V5 D' S0 `功能: 在屏幕上输出一个位图
用法: void far putimage(int x, int y, void far *bitmap, int op); ; b6 ]# i! N1 l& q# @7 |
程序例: 
) H! n/ E3 z8 [! C% z/ k6 `7 J, ]$ `& ?#include <GRAPHICS.H>
% Y9 L7 S7 m$ V2 d9 A, b5 F( o* G#include <STDLIB.H>6 l# J) [2 j6 L7 w$ F0 @2 ~# A e
#include <STDIO.H>3 ]9 v6 K3 L; L! E' S3 G: E
#include <CONIO.H>
2 a# J, {4 ?& c1 ~) N: r#define ARROW_SIZE 10 
; M5 h4 ]; |4 _8 ~0 q. J( @, p! Bvoid draw_arrow(int x, int y); + j$ I. F+ ]9 b
int main(void)
0 D X6 Q" T! d' d/ Y3 n) H3 m5 n1 g{ ( i" V! L- Z: ` u8 q4 U4 E
/* request autodetection */ 2 }- L' Z9 h- I4 D# P) B" W" d
int gdriver = DETECT, gmode, errorcode;
6 K" s Y$ q7 d2 f* X# f% |2 ]* Lvoid *arrow; & C# n! r# t+ j7 N8 ?
int x, y, maxx;
6 u8 T% F9 g6 @# Junsigned int size; 
" m5 n' T8 h: g- a2 O1 z# P/* initialize graphics and local variables */
/ K/ Z. ~- O8 u7 k, {initgraph(&gdriver, &gmode, ""); 
. f P. H0 ]+ e. v# s3 w/* read result of initialization */
; w& E% F' H8 g- ~( q7 W" ~errorcode = graphresult(); ! b* C2 [) {8 j( k f. v
if (errorcode != grOk) /* an error occurred */
- N! s; G A1 I' w# k4 c0 _{
& M V# }6 E# a( ?. R- Kprintf("Graphics error: %s\n", grapherrormsg(errorcode)); ( X9 A' @7 \1 \& `5 b+ [
printf("Press any key to halt:"); # r+ x$ ^& E3 K' @# Q5 |' j6 ~, e0 }
getch(); $ i y+ w) I+ S# R' Z: C, Z1 L+ ~
exit(1); /* terminate with an error code */ ! u3 N. _- B& d8 H: P- [
} 
" b1 F, c/ @8 u+ t1 Cmaxx = getmaxx();
% D+ V2 N7 S8 n2 Gx = 0;
% F$ ?# e3 v8 t6 `" p- by = getmaxy() / 2; 9 Y. j' X. Y$ q1 Y; a
/* draw the image to be grabbed */
; t! P4 Y6 W+ T4 zdraw_arrow(x, y); u0 L0 g9 t2 U" t+ j0 @/ D' Z
/* calculate the size of the image */ 1 t7 Y r/ L, Q; V* q
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 8 C* F5 o# @, H$ o1 r2 T3 o% R( ?: g
/* allocate memory to hold the image */ ; S, T: U, m! i4 B$ _# @, K
arrow = malloc(size); 
' l7 {6 {0 d8 H6 ^& c3 J( t/* grab the image */
$ f5 M1 q2 J& S+ Qgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); 
" i- j( j0 N! g( L: \/* repeat until a key is pressed */ . ]( F" p t6 c! b+ E5 Q' X0 H' ]
while (!kbhit()) % V5 t9 J; I/ k+ F
{ $ r- T* `2 z8 M4 N) z7 }* D- y! n
/* erase old image */ 9 z, B/ d6 J1 I- Q
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT); . W8 k3 ?8 w: x2 J9 l* W
x += ARROW_SIZE;
# h1 P& t+ C( B: `if (x >= maxx) $ ]9 C" N6 O$ c# |4 u
x = 0; 1 O4 `. n- q5 b+ F9 n+ c. \
/* plot new image */ ; L7 J2 v% _' p3 s
putimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
9 U. @! u- N& v* G* ^} 
- V5 E3 a ~6 ^4 }, m- ?/* clean up */
* d# v8 N% w4 s, M8 kfree(arrow); & I0 ]5 K* y) s; D4 j
closegraph();
 H) V5 i& W6 ^7 w. ?/ |return 0; 6 H( w% l, i2 G7 C- _, |- g
} 
8 b5 T; d8 i( ?% Pvoid draw_arrow(int x, int y)
& y, A9 n3 d8 v: F2 W$ N{
$ E5 \" P; a, b5 j% W% S/* draw an arrow on the screen */ + f: s8 E( p9 B* z/ Y
moveto(x, y); " f* d: v4 ^8 r: c5 F* w- S
linerel(4*ARROW_SIZE, 0);
 H3 m, R6 b& ^4 \: L2 Wlinerel(-2*ARROW_SIZE, -1*ARROW_SIZE); . p9 d2 O: ^: T8 c% X# U
linerel(0, 2*ARROW_SIZE);
! S6 a1 o: ~, D. f5 V% G! z/ Clinerel(2*ARROW_SIZE, -1*ARROW_SIZE); ( C: V( U5 B' S/ Q6 x, H0 ]1 S
} # A/ @" }/ C0 [8 j3 | Q
' ~8 n3 q& _, q8 ? o% `& V7 V
+ w h1 u" A# Z7 w2 A
函数名: putpixel 
8 L1 ]: z z! ^8 y功能: 在指定位置画一像素
; @- Z8 z" y: A% @, \用法: void far putpixel (int x, int y, int pixelcolor); - b1 P$ m6 K; }
程序例: 5 m) s H* Y9 T! _3 p b" J$ |8 R
#include <GRAPHICS.H>
+ [! D# _2 K) ]+ U) l! r/ [' M#include <STDLIB.H>$ ~5 K; c8 N$ L" q a* ]8 l
#include <STDIO.H>
7 r- D: V; z6 ^3 s#include <CONIO.H>0 l* { R; L% B: R8 ~2 [; L9 ~" U
#include <DOS.H>
7 f7 _% }6 F z/ q" {#define PIXEL_COUNT 1000
$ q! }3 r. V! c* F#define DELAY_TIME 100 /* in milliseconds */ 
, M. V+ W `" c q- G( a% iint main(void)
5 \7 n2 x& H( M+ H; ?{ & P9 Z% ?* y9 o" s3 ?# X: j
/* request autodetection */ h8 ]; g# z8 ]3 l4 O: \/ o
int gdriver = DETECT, gmode, errorcode;
6 i$ M4 E) h2 b, o7 c- Bint i, x, y, color, maxx, maxy, maxcolor, seed; $ y" Z: T$ j6 ^ F- J) P! U8 }" t
/* initialize graphics and local variables */
0 B9 L6 S: a8 X( w/ Y. `initgraph(&gdriver, &gmode, ""); 
* \* }$ |1 J3 d3 l/* read result of initialization */ , Z' [4 M' W0 j9 V* q' F
errorcode = graphresult(); 4 _) J) G( N8 ]; ]! E0 W
if (errorcode != grOk) /* an error occurred */ % Z6 V7 `" e/ w7 e" G# I1 Y2 Z' e; k
{
2 q# h7 {, W3 N) u$ o3 U- ~printf("Graphics error: %s\n", grapherrormsg(errorcode)); 4 C' Y- X! i. j7 o$ _: m
printf("Press any key to halt:");
4 e) O/ ]/ r) o) J2 O, S/ q: sgetch(); 1 E* S% Q8 c$ x2 J5 E% d, l
exit(1); /* terminate with an error code */ ! U& ?' l) a/ p8 w& ]6 s# s
} 5 H7 E6 V0 }, c+ S' a# ^3 p
maxx = getmaxx() + 1; ' E# x4 A( V7 Q6 Z, U v# ~4 z
maxy = getmaxy() + 1;
4 @# h2 [6 n7 n' h2 Y: bmaxcolor = getmaxcolor() + 1; * F H2 \- l7 n. t7 g# f
while (!kbhit()) 8 |4 d( t) Z. h
{ 0 J4 ~0 y2 r5 l0 r& `/ O
/* seed the random number generator */
2 J+ e T9 ?. x& B( kseed = random(32767); ; `- l8 K7 n: [: A
srand(seed); * T2 c/ r- o2 j0 ?
for (i=0; i<PIXEL_COUNT; {
$ e5 s$ d5 C& B- B: k& q4 m1 g5 Z# X! ~x = random(maxx);
- {" P, [; R; u) k2 n4 xy = random(maxy); 7 P$ h3 h: b6 d7 A9 b1 t: T
color = random(maxcolor);
/ w# ~* Q* y: G% P" U( Gputpixel(x, y, color);
} 
6 W I& S2 F6 I% M/ }delay(DELAY_TIME);
* F7 ~& `7 A6 P& R7 [) R2 {* Msrand(seed); ; h- S( o" f E2 R# ~+ x$ O, |
for (i=0; i<PIXEL_COUNT; { 0 M/ J; X, E- W6 r
x = random(maxx); ' r' T% v x- d6 _3 Q: F
y = random(maxy); 9 Z# s! u+ p* \! ?4 B2 p" a
color = random(maxcolor);
/ Q( Q$ E' y/ Z1 o8 o( }! cif (color == getpixel(x, y))
! m \! y. _/ |& ?. Bputpixel(x, y, 0); % u. u8 l1 }3 M2 r$ P$ y! f
}
1 @* l, W6 [ ^1 I1 F} ( r! |: o; U# J* j4 f
/* clean up */ : t. L+ [. P/ B' Q
getch();
7 F, K( o! P+ K3 t( ?closegraph(); `( \. j$ t* @3 `) y# G
return 0; 3 Z, H$ G4 ] \: z
} - a$ @6 D, I& A4 K

( K3 R' ?9 Y+ I- l$ `# L! U% H
1 u0 H7 n1 p+ U1 ^8 T' e0 ?: O3 Y; f函数名: puts Y1 [& I( A4 W. B Y
功能: 送一字符串到流中 - x% U4 Z* a$ X2 r
用法: int puts(char *string); K' G/ L( _" G: [' j+ \/ i
程序例: 
& w- ]* z8 [6 |' N. S& s#include <STDIO.H>
7 y* F& t, {, T1 u; W! H G* Kint main(void)
# @* |0 V, o2 T+ w{ ) @3 ^: ^: L) \, s) o2 z/ E& J" @
char string[] = "This is an example output string\n"; + Z! l# H. C$ N& ?5 _9 a
puts(string);
1 y% p. q9 P, {9 p$ p; yreturn 0; # X* z2 u- h6 R
} % ~6 |" C4 C# g

4 C' _. l+ P; p$ S
2 o8 d' _4 I& s& p# n函数名: puttext 
2 B5 g8 x4 a: i9 C; k功能: 将文本从存储区拷贝到屏幕 % Z1 |4 o& |! Z
用法: int puttext(int left, int top, int right, int bottom, void *source);
: U' n, W5 _* M6 l# m程序例: 
) }, S* h3 e$ o+ U$ d#include <CONIO.H>& _- L+ [: a: U# h' O
int main(void)
2 o* B" f! y7 }/ q. }6 D3 d' x{ & ^5 T0 j1 F {! S
char buffer[512]; 
& P# y; b" L, n( C& V/ R! X/* put some text to the console */
* X& f7 V% p( K* |/ W& Dclrscr(); ! }' y* x+ w; m+ v! \' H) Q6 f, j9 V
gotoxy(20, 12);
0 |( f; P$ V4 h% a: H8 D& Hcprintf("This is a test. Press any key to continue ...");
% a8 x& O' i' f' Y4 [getch(); 8 I3 ^: y5 K$ t* U6 A
/* grab screen contents */ - C% d' F4 j7 y. \6 o5 w9 A
gettext(20, 12, 36, 21,buffer); 2 B9 Y6 x' j3 B1 N
clrscr(); . a) N8 M G) o9 }, H" q7 J' s
/* put selected characters back to the screen */ 0 J+ h0 T: V8 b8 h! r4 Z
gotoxy(20, 12); 2 j' a9 k/ U: ^; {3 y& Z+ b! a
puttext(20, 12, 36, 21, buffer); " [' G/ H; z2 A, V* j" l$ K
getch(); 
2 H9 L7 M# L1 }4 m6 Yreturn 0;
; }" i& j6 q2 o9 c$ ^3 G8 v5 G& V5 _- D}
, K7 U% e7 {# \1 ~- }; k" A
+ n h- a* R4 i5 J; C4 ~9 f' p3 y/ P5 {# S4 M
函数名: putw 
, Q$ ^: \. x9 b. |功能: 把一字符或字送到流中
; q. s$ t/ ]+ j用法: int putw(int w, FILE *stream); B# D" ?0 N1 C5 g- `
程序例: 
. k+ a! t% n; `! s% {- X7 V8 ~# C; I#include <STDIO.H>
9 u5 y. Q, A4 `* k |#include <STDLIB.H>! X: s1 B6 r$ ?9 T& ^3 Z( h% ]1 q
#define FNAME "test.$$$" 
' N$ ~4 {6 o, `/ i6 B Yint main(void) 3 b) y* U% f5 t' k% z# \4 ]* ?
{ $ B" ` X: {( O3 z
FILE *fp; , @- w0 U8 n/ ~; m. Q
int word; 
3 D) P% @, y0 P6 I/* place the word in a file */ 2 h* ?3 J% C0 z' L. z' Y
fp = fopen(FNAME, "wb"); # d; u8 Y+ E+ F. l: ]
if (fp == NULL) ' ~ l1 j4 A5 ]0 N8 b3 @
{ 5 M, u+ w- d. Z# |% W U
printf("Error opening file %s\n", FNAME);
( \ ~# i9 g! v. _exit(1); - ^% n/ K$ Z4 @3 W; X) a
} / l/ x/ t% P8 \- K
word = 94;
: ^1 R% m3 q) t7 Pputw(word,fp); + O6 d' X/ E% U
if (ferror(fp)) - V) Y- ~1 d1 F4 R/ x% n2 ^4 V
printf("Error writing to file\n"); 3 M" W! h0 W9 T- }7 j
else : i/ S& E- j1 V/ X" V1 G* R1 w, K
printf("Successful write\n");
2 c, q- B( _) U1 Q8 g' [fclose(fp); 
$ o1 i t2 b, W+ S/* reopen the file */ % U: ^8 Y7 z& ~8 i
fp = fopen(FNAME, "rb");
' R- c2 l& d1 A6 _8 }if (fp == NULL) 2 c: n( o8 M! x) m4 p Y/ Y
{
. r, T2 Z: A* E% c. L2 m/ O# X" o7 J' Mprintf("Error opening file %s\n", FNAME);
# q; ~5 a7 W. |3 R, [7 ~exit(1); ; e% U% c% F& Q& b# ^0 _7 i
} 
" y8 [- C- P, m1 B/* extract the word */ 4 b" \4 q3 l% l; o3 ]( {
word = getw(fp); 3 F- b" j: }' f4 Q1 [
if (ferror(fp)) g7 d3 I- e& T, y& K8 x9 h) ?
printf("Error reading file\n");
9 t2 J' O0 u6 o4 xelse 1 n) b, ~! m3 I: a+ R( S8 x# [) J* [5 j
printf("Successful read: word = %d\n", word); 2 ^/ K& `% `4 G, p2 M* X4 J
/* clean up */ 4 n8 o) \* ?9 g! D! n
fclose(fp); 0 e: N# z3 x4 y' \" E
unlink(FNAME); 1 w0 K- X T# {, w0 c, V X6 m
return 0;
2 I/ A R+ r" ]( z- Q}