查看: 2796|回复: 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)
' K& v+ v, A& H6 w, @) lputc(msg[i++], stdout);
* ~0 g* N) G& @' U3 [/ qreturn 0;
- A3 _# ^" A* | z} ; P8 A: g; b# `: p, A5 K

% J" U( z+ \( X+ W' F( A2 u; U$ [/ P. g
函数名: putch 
+ ?3 z* U& a* Y: Z* y( q功能: 输出字符到控制台 1 F+ Y* z. @9 H1 D# w8 s
用法: int putch(int ch);
& H9 T" j/ _6 g9 Q) D4 D程序例: 
& ~# m& w! |' z#include <STDIO.H>! z; A6 k' y {2 H9 s
#include <CONIO.H>
: {+ L/ z6 u! e7 Yint main(void)
! ~! k& D) Q0 U4 p# E{ * ]' x( _. @% g4 S) J( V6 N# h
char ch = 0; ; k; O4 f# i: D! l" f+ X
printf("Input a string:");
2 I/ \' j) `5 k# uwhile ((ch != '\r')) 0 |" D v! e6 p- q- m2 b: s6 v, F
{ 7 [3 ]9 c3 P5 N0 f% H5 S
ch = getch(); % U8 q6 i \: J: ?0 i8 q% p1 c9 |
putch(ch); # G. [3 S7 y- [0 ?8 O: b- |5 Y. [( z
}
% z* M- c% p' W# M% z# v' Preturn 0; 4 L, d+ o" u [' g2 Q) F7 Q
} 3 h! S3 D5 ~! ]$ ]4 p
" t6 N9 c! ]' I% t$ [

6 |9 ]8 t* @4 C" _5 p函数名: putchar 1 H5 Y6 D0 ^# P$ M2 C! M* ?
功能: 在stdout上输出字符
% C% o7 i* }* P: Y" _2 ?+ T用法: int putchar(int ch);
3 u1 _0 @8 F/ Z" l7 t+ H6 w程序例: 
2 K* _7 S, x% F! Q" _9 L#include <STDIO.H>, C: h! g: E. x) w( }
/* define some box-drawing characters */
$ k7 `6 V1 h) ?' Q6 G! K3 _#define LEFT_TOP 0xDA
1 \* [* F" J8 y3 `#define RIGHT_TOP 0xBF
' d, {4 D1 b) b D#define HORIZ 0xC4
6 k( ^! y) j. l: M, X#define VERT 0xB3 1 {& q7 T2 m$ F7 {9 T1 I3 q- G
#define LEFT_BOT 0xC0
5 @2 o2 q! p0 |5 ^# T1 k" _$ V#define RIGHT_BOT 0xD9 ! r" a: x! s/ Z+ P2 F
int main(void)
# k/ L5 @( n; w& G% N{ 7 d/ ^9 K4 i- b2 y& [
char i, j; 2 [+ x+ b w' l
/* draw the top of the box */ % c+ c; F- d9 L: r6 m+ D! ]1 @
putchar(LEFT_TOP); ' N- X7 ^* Q. ?
for (i=0; i<10; i++)
. j4 d7 A3 Z) X. M6 _putchar(HORIZ);
, f ^ g: L' ~) {% E( Q) \putchar(RIGHT_TOP);
/ ]' E' I- p$ B# N$ U. H6 U8 M' Eputchar('\n'); `. M6 K6 e) W
/* draw the middle */ * }- \: u" z4 X( k, M
for (i=0; i<4; i++) & \' ?1 S/ G7 s: C0 C8 t& ?
{
! z$ G+ K8 _; I) `' c% n9 xputchar(VERT);
6 h; B6 f0 U5 Y0 y. d3 @5 m1 Sfor (j=0; j<10; j++) 7 G% J. v! p# D! \' ]
putchar(' ');
+ U# p% L$ U5 E6 o+ R/ \& {putchar(VERT); % z6 R! t3 }6 f s ~9 G3 r+ |
putchar('\n'); * a2 i: l; H. \ X
} 8 _; L: ? |7 a: Q! Z, J! [; S
/* draw the bottom */ # @- e4 `5 Z. Q3 `4 j/ M% k! A
putchar(LEFT_BOT); ' U0 E5 j, |8 {$ {& n, B0 P
for (i=0; i<10; i++)
! {2 r9 w' M" l. fputchar(HORIZ);
8 A+ w. [2 N' Uputchar(RIGHT_BOT);
$ m- q" B7 W3 {5 m6 R' X( Eputchar('\n'); 9 N, Y9 ^- {# f& F, g) V
return 0;
, }$ ]$ o: w a}
' v6 p. O# y+ A- d- V7 [9 l" p! H) ~/ X3 s3 v' p0 D

$ s- [; m# J! t" z ~7 S函数名: putenv 
( V4 v3 E. ~3 T' q功能: 把字符串加到当前环境中
- s, @7 l4 a& c& q/ X9 v用法: int putenv(char *envvar); ( y' d: k1 m9 V% g, n5 l+ T
程序例: 
7 Q: q3 ^' N* Z: ~#include <STDIO.H>2 Y8 F1 Q1 V) `7 T4 N5 n, A7 T
#include <STDLIB.H>% e% p- p( f1 `0 h
#include <ALLOC.H>- p: z1 h( w; i& g9 w+ o: D6 O2 U
#include <STRING.H>3 M' w! @: [ s/ U: L8 a$ L
#include <DOS.H>- P* ~8 B. m) @- K# Y" u
int main(void)
, X; B- r" Q) e{ - z* ~0 l* W/ \9 Z
char *path, *ptr; / g7 y% @, N- k* U) V
int i = 0; # d& B( P% J7 o3 z" @
/* get the current path environment */
+ z' T7 Z5 }# ^ptr = getenv("PATH"); 
8 c) C- Z8 l9 _+ `; X f/* set up new path */
* a% Q1 L1 f: Y: |, dpath = malloc(strlen(ptr)+15);
3 G z2 D# F; m" c7 o+ G! astrcpy(path,"PATH="); $ B2 Q- u0 x- e8 ~* u+ O. j
strcat(path,ptr); # P1 q* s) a+ H: D) d
strcat(path,";c:\\temp"); . b; A$ Y9 [, N( u4 f) C
/* replace the current path and display current environment */
# r7 k/ l9 H% `putenv(path); : X0 ]+ w& }1 z
while (environ)
3 X4 a4 c+ T/ Y2 c. Fprintf("%s\n",environ[i++]); 1 T, [9 V9 U3 v
return 0;
 k2 f3 t, p2 r" Q. E( b} % J3 q( U' C; P) B) A" q* u
& E/ T; c# ]2 i1 F* W# {
9 J' n) c. e# [5 C
函数名: putimage
! G5 ^. C: ^: v3 J6 k$ S3 W, H) P功能: 在屏幕上输出一个位图
: K6 i3 f6 z! F' N. x, j% g0 y4 I用法: void far putimage(int x, int y, void far *bitmap, int op); 1 j: w1 o- j5 j# h7 Q6 P( ~- J
程序例: 
0 m% {3 t8 U3 v2 ? S#include <GRAPHICS.H>
: k2 O a/ w6 j2 X! x#include <STDLIB.H>
2 {9 f8 e: U7 j- s2 S4 k+ k#include <STDIO.H>/ G1 q6 h# z1 Y3 y+ q0 {
#include <CONIO.H>4 m5 ?1 y: w. P* m3 Y5 C4 w
#define ARROW_SIZE 10 
4 V' ^" X% U3 N8 c q3 yvoid draw_arrow(int x, int y); # S ~# S Z% l4 Y( S/ c
int main(void)
* a3 Q" x/ r6 P. ]: k{ # S3 c' c5 X; W' R( ^$ ] C+ K
/* request autodetection */ 0 p1 Y% j2 O; _2 p2 r0 n+ j& }$ t" n
int gdriver = DETECT, gmode, errorcode; 9 C0 `% l: g9 A1 N# U
void *arrow; . |5 e# b/ C& ?' p& w
int x, y, maxx; ; J" T) r# x3 y4 M
unsigned int size; ) i( o9 ^" `0 l5 h# |
/* initialize graphics and local variables */
5 T6 m7 Z5 |6 J2 ^initgraph(&gdriver, &gmode, ""); 
3 @: n) t7 _$ e: x/* read result of initialization */
9 K8 ?& T# S1 ~errorcode = graphresult();
; Y# A; E' r7 E4 Xif (errorcode != grOk) /* an error occurred */
5 p: B8 m& r5 `{
- J5 l0 \- x$ hprintf("Graphics error: %s\n", grapherrormsg(errorcode)); - X+ P" D! b& I4 w9 R' W
printf("Press any key to halt:");
" h& T3 {7 d4 [+ H) G* lgetch();
; A! d: z0 s8 r4 x( U0 W) c6 pexit(1); /* terminate with an error code */ ; y4 @% p/ {. `! M. \* z0 R) z
} 8 }$ i! b. a% ?- b( s* ]: \9 q( x
maxx = getmaxx();
* I1 a" s; \6 c) h x2 \5 Fx = 0;
6 s4 K) Z( y! f$ @y = getmaxy() / 2; 
. }/ P [7 O. C4 b0 [, P+ [/* draw the image to be grabbed */
, A3 p/ J2 f1 `( H' t; ndraw_arrow(x, y); 
' ]+ W5 Y# i/ Z( g' R/* calculate the size of the image */
7 e% X% ~7 n' m* ` F9 y! k# `size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
0 \3 \2 j. ]. A9 g* Z; D0 W3 r/* allocate memory to hold the image */ 4 u; O5 a0 v+ m
arrow = malloc(size); ; w8 c& ]% J# }' W ?5 n8 a6 }
/* grab the image */
. m0 g! g; p- {: A kgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); * |) j5 t) e( r) z l
/* repeat until a key is pressed */
1 v0 B$ \7 D! f4 Cwhile (!kbhit())
+ l# D! F0 { t6 r{ 9 f) D5 f: U9 s4 e
/* erase old image */
, Y* Y% ]3 \9 j1 x* x# x5 ]& u9 Dputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
 M" ?/ ]2 {+ Jx += ARROW_SIZE; $ T! g; e3 }4 f6 m6 W; d! F
if (x >= maxx) + }$ d" L, w$ P) h( q# ?
x = 0; 8 A ~& X& U" o6 n! y
/* plot new image */
2 W& v- M$ j" o, ]. Nputimage(x, y-ARROW_SIZE, arrow, XOR_PUT);
2 ^" _" c% g7 b3 e3 ` h} , a3 U# B7 x1 b! T' p, y( v
/* clean up */
) k8 N4 B) @$ J( I' J) o& n: P- Yfree(arrow);
2 {0 ~4 M* E/ ~4 F: U! t) l* p3 h. Pclosegraph(); ) m# [1 i9 b S( v$ W$ l
return 0;
8 D0 L7 |7 Q- f8 j5 {4 k2 j} ( ^1 D. Z! V j, }7 X
void draw_arrow(int x, int y)
6 m2 X* F, I; V# z3 p r1 H{ ( x6 g* x) Q$ N: r' ^1 u
/* draw an arrow on the screen */ 7 \ P* J' d1 l3 K! L- e! p+ ?* x
moveto(x, y);
 H7 m' J# j- I: W7 S+ L) }0 R: f, glinerel(4*ARROW_SIZE, 0);
0 _5 i1 F( t# x% Ulinerel(-2*ARROW_SIZE, -1*ARROW_SIZE);
/ T1 x* i; z$ i* ilinerel(0, 2*ARROW_SIZE);
) V6 ^7 Q3 C- t* @linerel(2*ARROW_SIZE, -1*ARROW_SIZE); 8 `0 v% e7 r8 ^
}
5 [' a* O% P9 }+ M$ m
4 A' `- A' q% k1 c- z4 u
' Z' q" P' k- [, @函数名: putpixel # ^; a& \' {* @5 |: P: X
功能: 在指定位置画一像素
 d m/ o6 D* J$ z6 c( t9 p3 k4 m用法: void far putpixel (int x, int y, int pixelcolor); 1 f/ L8 ?7 A2 a, Z; F) G# i
程序例: * a3 S- `/ l7 R( s
#include <GRAPHICS.H>
( }. l5 T. t8 A3 g) Y: {9 d#include <STDLIB.H>! O, v7 L) X& c* J' J" Z5 u
#include <STDIO.H>$ l. a% x1 b6 h, ^( I
#include <CONIO.H>0 `) M* ?3 e5 f/ s+ P
#include <DOS.H>
9 x/ b& K8 F) v1 o8 w% o$ I#define PIXEL_COUNT 1000 ( @9 j5 c* |2 D- P
#define DELAY_TIME 100 /* in milliseconds */ 1 `" t0 ^$ D2 s& H
int main(void)
4 U. o1 Q/ G; b% S: m/ X{
0 ^/ Q: D$ x- O, g; y, E& [/* request autodetection */ 0 L6 c3 n, u! q# K& B* H# C( L
int gdriver = DETECT, gmode, errorcode;
3 e' b2 c3 H8 E8 j1 w3 Kint i, x, y, color, maxx, maxy, maxcolor, seed; 
* M& Z) G0 G$ _" s/* initialize graphics and local variables */ 2 Y& I; Z8 }, H) W/ O
initgraph(&gdriver, &gmode, ""); 
' M8 @3 ^2 l* d6 ]- R6 k+ t/* read result of initialization */ 3 g4 s: \* ^& @- q6 {
errorcode = graphresult(); , f# K5 R0 y0 K1 }' m& h5 y6 `
if (errorcode != grOk) /* an error occurred */ ) g0 L6 }* W2 c$ m( p, {/ g: O
{
5 X# {7 T$ U, E; rprintf("Graphics error: %s\n", grapherrormsg(errorcode)); & }, ^+ x* B, ~9 L* F. ]9 s, a
printf("Press any key to halt:");
6 f" h. K2 W$ e, i4 a; Z6 Dgetch(); & A; E: i* l% A2 L7 i: o L
exit(1); /* terminate with an error code */ 1 l% Y# D7 s$ b8 |! b- F# n& |! b
} 
# F- J* n" ?: t+ P% g; r6 K4 i" Lmaxx = getmaxx() + 1; ' L( e2 W: ]5 X2 Y% Q5 R
maxy = getmaxy() + 1; * x N. e% v% s s& L- X9 r7 G8 e
maxcolor = getmaxcolor() + 1; 2 m+ n5 g% _+ @. Z4 z
while (!kbhit()) : R0 K0 S) z& f6 @$ i: k5 M/ \
{ * y- n" L5 n7 {4 T1 J
/* seed the random number generator */
5 K* c0 A/ J$ U3 Q6 V- z3 m9 W, Fseed = random(32767); - G2 O% ?9 ~. g) o
srand(seed); % n* w, ~3 T3 I( e% V6 \
for (i=0; i<PIXEL_COUNT; { 3 A' |' u+ O0 j. }6 v0 d1 `: Z; ?
x = random(maxx);
. f' l3 M' p W Gy = random(maxy); ; E0 a8 @8 q7 A1 M, a7 s) g0 S
color = random(maxcolor);
: H- Y4 z& w( |9 z; W( hputpixel(x, y, color);
* }. K' o" u( t& \& L. ]$ Q% f} 
: Y; ` m" T5 @delay(DELAY_TIME);
/ L0 [2 t5 X% p) Jsrand(seed); ' n6 z1 C2 i3 k: } |
for (i=0; i<PIXEL_COUNT; { & b( ]9 s. L5 u/ q1 \1 c9 }
x = random(maxx); 2 u2 W1 l2 W' I# n% ~$ k
y = random(maxy); 8 q+ r6 I" F5 L0 \4 y+ `/ M
color = random(maxcolor);
. }8 ]; ^6 v7 A0 O% ^4 N% \, Cif (color == getpixel(x, y)) 9 J, p+ \# r( X' r$ D
putpixel(x, y, 0);
8 {$ r/ D; Q% g2 F* T# d}
( x( F2 W5 g' D* R# J, P! q} 
: ] h @4 a7 S' V/* clean up */
/ W: R7 A+ }" Dgetch();
6 f* d# u8 D$ P, ~; rclosegraph(); 5 g0 h' H- p+ j. W) Q; J- T
return 0; & E9 P6 @0 b3 k" s
} 2 U1 B6 v! M- C. K* }2 Q
8 x& Z0 b" V3 n
1 v* C0 ~) w0 \" d) t6 k, q8 `6 g
函数名: puts 8 }3 E6 d* ^. z8 a9 ?, N
功能: 送一字符串到流中
, ]" F: f$ _+ l' J4 y& V# c6 T5 @用法: int puts(char *string); ' i+ Q: W j6 K7 @( g4 q
程序例: 
1 }+ G$ ~5 M- |( o' C3 ^. M; ~#include <STDIO.H>6 z) C1 B0 g' u- ~7 s) s3 H
int main(void)
% _$ p# P5 @/ H2 Z{
: M' M6 u& N7 Gchar string[] = "This is an example output string\n"; ! F5 |% ]* L7 J- U2 v- h6 I: x
puts(string);
! d, V* [" z' ~# ?# ?: jreturn 0; 3 w% n- V+ q( `; l
} , E6 p* f0 i s! E5 r
& ]! V: [, T H+ h
" ]. B @) V6 r' W) {
函数名: puttext 
2 j1 Y8 V% c$ Z0 V# d* T( y功能: 将文本从存储区拷贝到屏幕 ! Q2 s. T5 H+ H
用法: int puttext(int left, int top, int right, int bottom, void *source); 4 h o) i+ x* i0 G, I+ A
程序例: 6 y, r- y# |0 Z g, n# U
#include <CONIO.H>
1 b7 w. e. {9 ^. ~. A& s, jint main(void)
5 B1 a- `: d( q6 R, E{
/ m4 y- K/ U2 z% j% I+ Ychar buffer[512]; % Q# V$ X, {/ v ]
/* put some text to the console */
# t' n+ \6 N; {+ jclrscr();
! s3 ^; S L9 |# Agotoxy(20, 12);
+ b; m D+ w4 c% Icprintf("This is a test. Press any key to continue ..."); / g3 j1 l+ K4 v0 x+ c+ l
getch(); 6 B; r8 V H' i. I) T+ ]8 U* k
/* grab screen contents */
! r+ }. {3 V6 z% L/ [9 ogettext(20, 12, 36, 21,buffer);
; q5 z. l, Q# Q+ i7 x Z: Hclrscr(); r9 V W& J( b3 B. L! D
/* put selected characters back to the screen */
# r' S4 U4 x* u: i# g# Wgotoxy(20, 12); + Y8 Y [! h) s3 h7 M
puttext(20, 12, 36, 21, buffer); ) `# X1 ]6 L1 F4 P2 c" ?
getch(); ' k, Q9 D4 i/ e
return 0;
$ C, w8 g# d$ s$ D0 z" ?& h7 ]3 j2 t}
* r+ D9 K8 e5 n4 O; j. \2 e5 R q5 u* g% K0 u s' W

$ ~ W+ X; I6 z. ]( \函数名: putw ! e% x0 a2 a6 k7 ~% T7 c
功能: 把一字符或字送到流中 3 T; _1 \' R. K6 ?" n% p; ^
用法: int putw(int w, FILE *stream); 8 N& T0 P3 L( n/ P
程序例: $ Z( v0 t/ o/ }' V& t
#include <STDIO.H>! Z( E, [" t0 M: g" c; G
#include <STDLIB.H>
& _/ n& v7 b) y1 l) y5 {* c#define FNAME "test.$$$" 
. E* |1 P) H: u! ^3 ?) Kint main(void)
- o6 _' a' u5 `; {; t0 h; N4 V{
) j* b! i; ~. B" D9 _) |- uFILE *fp;
/ s6 L7 @+ ^' O" n' c; i$ F% L# qint word; 
+ _" ?' B9 U: d% z( j5 b5 z/* place the word in a file */ 9 d3 ~' @/ {( S, z% E
fp = fopen(FNAME, "wb");
8 m5 k" O: f2 a. D6 ~if (fp == NULL)
3 T9 ?- F7 ?* |# M{ ' h: U+ y( U+ U6 B+ w$ s+ x
printf("Error opening file %s\n", FNAME);
) O+ L+ R$ ~ p& [exit(1); % _; r5 e5 ~& N8 W
} 
+ g' f1 m; r/ N% X* Qword = 94;
. h6 H0 c- Q( c- [+ `% H8 Nputw(word,fp); $ Z) w9 }* M% [* Z% n
if (ferror(fp))
9 E- ^' k* u1 @( _' Z: K& |, |printf("Error writing to file\n"); : f8 c' f# w$ F H0 D2 ^
else
0 h! K9 t# L/ z0 ?4 L" E7 b8 m. cprintf("Successful write\n"); 2 C3 @; J2 T" ]& B( P
fclose(fp); 
9 F! P/ Q Y+ j' F/* reopen the file */ ( \ a+ ]: k9 _+ M
fp = fopen(FNAME, "rb"); : T. ] Y0 u& j: Q
if (fp == NULL)
6 W% Z9 K- H# [8 r1 Q6 d/ h{
# W/ v+ ^# Z6 D. V8 N" _printf("Error opening file %s\n", FNAME);
7 Y9 U4 z) I& T5 ^; k! c0 s8 {! U1 Yexit(1);
2 p& Q& Z8 W+ `& o$ o8 \2 b" k} 
" B0 }2 u& O5 s/* extract the word */ 5 \! X# ~0 b% y' R4 i
word = getw(fp);
: X; p7 h, T- m6 T4 ?& |if (ferror(fp)) & ] @4 ^6 V7 }7 A9 v( Z x% `
printf("Error reading file\n"); - T6 F2 A. f0 d& F, X3 C# u
else ' G5 ^+ r3 m. k& Y
printf("Successful read: word = %d\n", word); 
6 c! E/ W0 E% `/* clean up */
! n7 q) a( J- r3 Pfclose(fp); ) V: ?# b8 r4 e4 W7 g- U! i
unlink(FNAME); % T/ |- O8 v* `9 {) g
return 0; ; k- f! i- d8 R' N7 X3 N
}