查看: 2787|回复: 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)
" e$ o- f4 w2 N5 e6 ^putc(msg[i++], stdout); 7 ^: _: {# _( ^$ l: d+ n3 C" K
return 0;
2 `+ R" q, x# _/ R} ( C- m; |1 d; O

- Z4 ?' y) @4 n, c& P* C/ ~1 K
" u8 ]. X: I5 G' d0 q% Y: m函数名: putch 
 H* [$ V* D; X P功能: 输出字符到控制台 7 E9 x/ N8 s7 q4 u* ^" v! G
用法: int putch(int ch);
" {- h6 w* e' Z7 c程序例: 
) P5 N4 g0 N; ]9 }7 U#include <STDIO.H>) u+ T. x! G" N( Q1 {* j0 p" P
#include <CONIO.H>* w7 j6 Y4 s# |% D4 G7 f
int main(void)
9 G8 |, h3 z1 H# z- d" M% L{ 0 Y$ G9 }/ \3 _3 d, b- o0 ~1 I, |# R* E
char ch = 0; 
* Z2 j1 V O, y; ]printf("Input a string:");
. m ?7 P0 N Y! t+ o$ W% awhile ((ch != '\r'))
6 \$ T; d3 C7 B4 D: n" ]& ]8 o5 Q- Y{ # R" Y( N- M" V* J L
ch = getch(); R& D/ l+ T" R7 Z: `
putch(ch); I9 G _- @/ U9 Q
} ( {5 t7 q+ K, F% m( P
return 0;
) c% b! h2 `8 q4 q4 ?. Q}
( V+ P. d" g4 n; L1 f$ \
6 s u+ D( H1 p7 k
- ^+ B$ N7 D3 h+ b; R2 {函数名: putchar l8 c! ]. S* f3 Q
功能: 在stdout上输出字符 4 a- L! L' t: G4 r. K/ w8 G" |
用法: int putchar(int ch); # g; `( m9 K# H0 O) \
程序例: 4 ~( @# w3 q7 E2 F- `6 f/ c* r1 d
#include <STDIO.H>
$ S) M' O! h4 ?, |- R% _3 N/ }/* define some box-drawing characters */ ' t( K5 v* X' t& o, `
#define LEFT_TOP 0xDA
( f) o3 u9 G1 I: v/ }#define RIGHT_TOP 0xBF
/ l- t/ @. V; H \$ G1 @#define HORIZ 0xC4 * G6 p: c x2 c+ w
#define VERT 0xB3 : Z: P( W, v$ w: }0 K0 B
#define LEFT_BOT 0xC0 7 Z0 `1 _4 e( ^2 R$ K
#define RIGHT_BOT 0xD9 
. i: w' P D1 y% pint main(void)
, Q4 X7 w0 a' }{
' Y/ G( g) ], Z$ w# F" k5 qchar i, j; 
4 h4 n8 \9 F# y: S# l/* draw the top of the box */
' G. w$ Y2 Z0 y1 r8 _$ W- ?$ q2 u* fputchar(LEFT_TOP); & `, s1 {$ S: v4 G$ C' K
for (i=0; i<10; i++)
, |4 |. X- H$ | V$ t) n7 xputchar(HORIZ);
# L7 |; }8 @9 ~# H" g3 Cputchar(RIGHT_TOP);
* O8 ?# O2 Z; H( P( n8 @putchar('\n'); 7 H: H3 L) I# z$ G$ p/ U
/* draw the middle */
+ H, i0 \5 {; Zfor (i=0; i<4; i++)
3 c* w$ u; E" g+ R{ , o2 J( g) U0 {4 o
putchar(VERT);
+ Z3 a! r' R- Afor (j=0; j<10; j++)
8 R3 n) W- Z) h1 ?* T" K. N1 Vputchar(' '); 2 V0 o( T: ~/ Q0 y6 Z! E2 v
putchar(VERT); - ~' e% k8 d) I% E
putchar('\n');
2 ^& A. e% R/ F C7 {# |/ a} 
7 L$ G3 h3 ?/ N/ t/* draw the bottom */
9 {. y% L& W* x* A/ eputchar(LEFT_BOT); 0 K& U- }/ T( p; j9 T
for (i=0; i<10; i++)
% Y2 X3 ^& I; p( uputchar(HORIZ); 4 i" w: I/ e: m& K; U
putchar(RIGHT_BOT);
$ B8 y0 A# T1 I( \$ lputchar('\n'); 
$ u6 ~! J. S {% dreturn 0; ) Y" ~8 D0 Z) K6 S
}
5 [9 e* k# Y$ B' c/ g
0 s( l P6 Z& n0 Q9 ?. H7 z/ y+ h! `8 D$ ?2 x" X
函数名: putenv $ {7 D s' v, k4 p. n# _4 C' r
功能: 把字符串加到当前环境中
 a# K7 n; ?7 j" c& U+ S用法: int putenv(char *envvar); / H( h- Z1 v9 O. V$ F7 l8 J# L8 g
程序例: 
* b, y+ B& P/ w" X#include <STDIO.H>
# A0 g: u1 K9 b+ e3 O3 Z#include <STDLIB.H>
$ d+ A7 n/ C7 n7 s6 F( u#include <ALLOC.H>
 x; J- }7 K G) C- s9 G4 j#include <STRING.H>
5 Y7 _/ q4 j7 C, s3 d#include <DOS.H>! D' ~9 S* Y6 y& X9 `
int main(void) 9 ?( M0 w( P8 B- V% U
{ * s6 T& M% l: Z) l% e
char *path, *ptr; 5 {, |3 s0 K9 U( ?; Z
int i = 0; % A$ g, U T; x" v! W+ [
/* get the current path environment */
( F$ j( C6 N; g' G1 A# ^ptr = getenv("PATH"); 
 S* y& [2 F( G' Y/* set up new path */
5 [) Q8 p$ x- C5 n; _path = malloc(strlen(ptr)+15); ' A9 X, h8 u6 o
strcpy(path,"PATH="); 7 H# K" l/ W( r
strcat(path,ptr); / G$ x: {' J+ \
strcat(path,";c:\\temp"); 1 m3 ~) t$ o0 y" W% q
/* replace the current path and display current environment */ q4 G) y4 r: i
putenv(path); 9 v) Z6 p& D2 F3 p: {! R( b
while (environ)
, z7 t" |5 N# b" P, Eprintf("%s\n",environ[i++]); ! R3 y, V `" _2 k: E) T
return 0; 3 k+ c K7 ^" N! {9 H* f) n
}
; s o7 J3 X8 _% O$ _0 \/ q- ?# a. o5 W/ I% _+ w) g

1 B2 w8 J. _/ ^1 {. g& u函数名: putimage
; f" r2 X: _( _8 Z) @+ j( h功能: 在屏幕上输出一个位图 g& i, C+ t" V0 X) H
用法: void far putimage(int x, int y, void far *bitmap, int op);
* {: x7 J- ?7 v. l5 J8 p程序例: + I: n% r2 B( p5 N- s
#include <GRAPHICS.H>
( o1 ~: ]8 T2 N, x5 _) m#include <STDLIB.H>
9 J/ `+ O( I& F* l/ ~* S#include <STDIO.H>
) \4 N& R& s7 W% [3 R#include <CONIO.H>
8 G( y H9 y& E) G. m( g0 h" `! t#define ARROW_SIZE 10 / k7 h1 x7 b% O* [% c
void draw_arrow(int x, int y); 2 U! E7 {; p6 J- X
int main(void) ; P* `* k* U+ r. }- z- ~
{
' U. Y$ K1 w9 A* n, O' A& e- c0 ^/* request autodetection */ # n# r0 }) M& g6 J
int gdriver = DETECT, gmode, errorcode;
: j, s# @, R5 b7 u# [8 T6 i5 _void *arrow; 4 a/ L3 X* p1 _; Q$ f) Q
int x, y, maxx;
0 [7 @ ]- e, Eunsigned int size; 
; y* t4 o/ {3 ?, Q, C7 e/* initialize graphics and local variables */ 8 i/ H* q5 |: W/ S
initgraph(&gdriver, &gmode, ""); v9 G' V& ^2 F/ t
/* read result of initialization */ : j) Q9 i: V# _2 O7 i8 P3 `; P: v
errorcode = graphresult();
7 D* y- F6 j9 z; G% \5 Kif (errorcode != grOk) /* an error occurred */
) x( I- T; n) L# m) I3 l{
; ~. |& O0 u% q& m; X8 ?# Mprintf("Graphics error: %s\n", grapherrormsg(errorcode));
: @/ F8 d9 U9 n* X+ p0 `, x' hprintf("Press any key to halt:");
" d2 w; j' L7 o1 J( `getch(); / C" b$ E% z! ~7 H( I) `
exit(1); /* terminate with an error code */ % C4 W* \7 n5 V; p( N9 Y7 z) b& V- d: w
} 
; w5 ~) I/ R$ e6 cmaxx = getmaxx();
, M' s# a1 k* k- ~* _8 I/ J3 dx = 0;
* m* n3 D0 K2 z* x' k9 j) ay = getmaxy() / 2; 
# r$ g7 _2 o4 C- R& }- t2 {- ~/* draw the image to be grabbed */ ) b/ e( Y1 ?, x& t7 e9 V3 t8 H
draw_arrow(x, y); 7 }) A. E0 @! L9 S6 P; f% V% N3 r
/* calculate the size of the image */ 7 q9 P1 j& _+ o( w+ X
size = imagesize(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE); 
/* allocate memory to hold the image */ ; r$ T1 r9 J# [% n# G& f+ E
arrow = malloc(size); . m2 h. a) N- ?7 n
/* grab the image */
- A' U, u! x \' cgetimage(x, y-ARROW_SIZE, x+(4*ARROW_SIZE), y+ARROW_SIZE, arrow); ; [ e: j% l% ?
/* repeat until a key is pressed */
- N2 y$ x3 Q/ u& q) p3 z# _6 zwhile (!kbhit())
0 ?0 C5 i. K& i4 a9 D2 I{ , k3 a( r% _( z9 F5 u" ^
/* erase old image */
0 Z) L r, Q- P4 @* Bputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); 
2 n" T# ~% ?* |2 D& w! T5 tx += ARROW_SIZE; % A. M. k: s7 U: D
if (x >= maxx)
) I/ r+ p$ |( n" _# jx = 0; * B; x$ C$ Y5 z3 L. [# S, @
/* plot new image */
( v& C! P3 ~3 l( B1 Oputimage(x, y-ARROW_SIZE, arrow, XOR_PUT); ( X6 z( u- K+ G: k
} 
7 o0 ^9 U) l, t2 |) |9 X- J/* clean up */
* d0 C1 |' U; ]" R& l+ v7 P2 tfree(arrow); 4 }( [) H+ o- v0 R9 X8 w
closegraph();
& L- N. t0 S6 e0 breturn 0; - g0 W! y. G/ Z! X* h
} 3 ]8 h5 N2 c7 b5 Y! B% H0 ?: |
void draw_arrow(int x, int y) ! ]3 O. f b) x5 g6 K3 N
{
 Q: k' f& g5 G V& U/* draw an arrow on the screen */ " O, ]0 ~7 X9 Q: m1 i/ a
moveto(x, y); h9 S# S k, h" H) J
linerel(4*ARROW_SIZE, 0); / n( u2 ]' v% X8 L
linerel(-2*ARROW_SIZE, -1*ARROW_SIZE); : \- T1 i) O2 m( J
linerel(0, 2*ARROW_SIZE); ; m. o, m- U; g4 Q1 b6 e
linerel(2*ARROW_SIZE, -1*ARROW_SIZE);
# _( |0 D, _9 X' E} % p" G" Z9 T* n, C
) l) ]$ o9 C7 w& x' W

: M0 i/ l* Z3 V) R3 s* f" D, L" z函数名: putpixel 
! A1 Q' n. D* T5 p功能: 在指定位置画一像素
7 B; v& o% Y' Z+ C用法: void far putpixel (int x, int y, int pixelcolor);
' }2 A4 p W) P4 S程序例: ]- |: f9 t$ w9 h t1 [
#include <GRAPHICS.H>
; }& l. J* |9 B" w#include <STDLIB.H>
: e- I- r8 L9 o2 ^, @4 A0 k3 D! t#include <STDIO.H>, U; S3 A/ g$ k4 K- q' g
#include <CONIO.H># j) M# `9 p7 }
#include <DOS.H>
1 F0 r+ ^$ c* f#define PIXEL_COUNT 1000 3 a2 { S$ w& \% ^% e6 `* q
#define DELAY_TIME 100 /* in milliseconds */ 
+ B" D" R" ]) I9 [* L \int main(void)
4 u( S" }6 M0 F% R4 ^: ?7 L' h{
. H) l6 t. y# a/* request autodetection */
int gdriver = DETECT, gmode, errorcode;
" ?2 F# T& L9 t* |: lint i, x, y, color, maxx, maxy, maxcolor, seed; 
6 D, r0 p* s* x H, m% }/* initialize graphics and local variables */
' P, s$ a7 o, k; N" Ainitgraph(&gdriver, &gmode, ""); 0 `8 g) y6 Q* w6 i5 q" P
/* read result of initialization */ ) ?9 b% b0 ^) [0 q) C& T$ b
errorcode = graphresult(); i a# @% U1 e" C' J
if (errorcode != grOk) /* an error occurred */
% U! I3 \# _5 j+ P! K0 r& i0 O8 D{ % Z8 {& u) I6 F u' B: P( J
printf("Graphics error: %s\n", grapherrormsg(errorcode)); , g2 m# l. |, @; y; B. Y
printf("Press any key to halt:"); 9 E7 Y& E4 I0 u3 z4 F" Z, i3 z6 S
getch();
" {. r# g: q7 c" p7 Oexit(1); /* terminate with an error code */
 ~6 E& B$ w0 j( F' p} 
/ Y4 z& ]+ K# lmaxx = getmaxx() + 1;
; ~$ I3 p3 h( Smaxy = getmaxy() + 1;
5 Y5 e8 m, b' w% v- t! |maxcolor = getmaxcolor() + 1; 
5 ]* e, Q+ L- M% ~) Awhile (!kbhit())
% l. u/ x( f6 j2 H/ f{ : o+ U" |* y, d1 a- x2 b' G1 |
/* seed the random number generator */ ! @& q4 T, A5 s d2 a8 p2 O
seed = random(32767); # p; u: r1 F# e) [0 i J) v
srand(seed);
) u$ V2 g0 V; W) qfor (i=0; i<PIXEL_COUNT; { 4 Z; p4 m+ V) }- s- n5 b$ N
x = random(maxx); $ K+ m+ Y( q4 G$ k, Y
y = random(maxy); & ~7 L7 t/ z1 S" o( ?$ O- j, A6 `; Y! T
color = random(maxcolor); 8 V6 v" D: {( Q3 X( ~) s& _! l1 V E# w3 i/ X
putpixel(x, y, color);
5 M7 \+ z" D& }, C} 
6 I8 o4 F F. V4 D9 L: {* ~( u+ \$ zdelay(DELAY_TIME); 5 q& S+ `6 n/ H* z6 m9 l8 y2 ?
srand(seed);
& h9 z" |: D8 S7 A1 I. I: t4 f9 hfor (i=0; i<PIXEL_COUNT; {
1 |& n+ n3 v$ s0 h1 wx = random(maxx); # X( d) z2 g5 N3 z0 H
y = random(maxy); " e# ~$ W+ M, Z/ r7 {9 d- O
color = random(maxcolor);
* E- e% N1 k1 q, U& z' dif (color == getpixel(x, y)) ; G" }! ^+ N' {5 v4 Q8 _* \
putpixel(x, y, 0); $ s; M0 w. e' M9 k6 M V& _
} 6 q7 \; @% R: @
} . H- N: \2 F6 P! U
/* clean up */ 1 G! \3 z* k; ~6 m
getch(); 5 e' V! y; P6 s% V& v. J1 ]+ U( x
closegraph(); 2 t# b1 U/ @: i1 x [! P" _ R! X
return 0; $ \; E$ F( W6 j$ ~! K5 y
}
" |. S$ N7 p7 m/ a, _! L! G! I0 `+ m* J( Z! L0 q- L$ Y

* N! D6 d' j% ^: q' u% g! ^函数名: puts 
8 S" m# p1 O2 v' K功能: 送一字符串到流中 2 `5 A4 b) b, o' K5 s
用法: int puts(char *string);
) G- E- _5 S \7 v/ i程序例: 
' s$ j, ^- {+ R8 P7 D#include <STDIO.H>
: D* u, s+ M: K+ R& X, ~* gint main(void)
2 ]2 z3 Z' t! S* G3 {{ 7 b5 [- g8 x4 a. o. S% [8 u
char string[] = "This is an example output string\n"; 
- b5 M/ t6 Z9 k% h6 D( t8 v" l6 D% Qputs(string); ( I0 b* |% c% ~$ `6 S
return 0; ; n+ |" S! x; w4 R$ w* |
} , X& b5 I" K+ d& D& D8 ?
* }4 O* J7 S9 R2 a: a! [
8 T9 t x7 B0 c& r$ Q
函数名: puttext - g; F! Y* ?# Q9 r8 O) t
功能: 将文本从存储区拷贝到屏幕
( i4 \7 B. G* I# Q! E用法: int puttext(int left, int top, int right, int bottom, void *source); * ?3 ?9 H. f: `) f7 Q" {
程序例: 
! q% y: N+ t O#include <CONIO.H>5 A" R/ U9 s6 j7 J: I1 {5 [
int main(void) + p6 P3 o+ K4 r+ _* e: j
{
% L1 J1 a1 R/ L+ b& Q$ @4 _char buffer[512]; 
, i3 x, K) ]5 v$ g/* put some text to the console */
. Q7 s+ k/ F' } [clrscr();
! j2 T* g1 s+ g$ g4 m" L ? @gotoxy(20, 12); # s& ?* j& m$ k3 `7 b- [! Q8 u
cprintf("This is a test. Press any key to continue ...");
( g6 K' r9 s! ?2 o# `0 Q! ogetch(); 3 P! t8 B/ ~* \3 R
/* grab screen contents */ _& \# X& q( y1 M$ f8 W" t* U7 ?
gettext(20, 12, 36, 21,buffer); 2 e. n- ~$ h' i3 o
clrscr(); 
% s: v* _4 {- A/* put selected characters back to the screen */
# T7 L a- ^2 S7 L# \6 w, K2 {: o6 @gotoxy(20, 12); ( P9 E0 N: g2 p: g, A" B
puttext(20, 12, 36, 21, buffer); 2 r6 r/ }/ p* c
getch(); 
' V% m) h9 k z- P/ Preturn 0;
, x. Z. ?! p1 q. b, S} $ ^6 i& J6 s! A/ p# L' w; S
9 q6 r7 s! q$ T
# ?+ F) e# C, e2 G \
函数名: putw 
# v- Q4 D1 _4 O0 n功能: 把一字符或字送到流中
3 k8 x4 _ S7 ^9 j2 ^用法: int putw(int w, FILE *stream); $ G! h1 y+ M; n! \% e- L
程序例: 
: ~4 p8 H0 I H. |( }" \#include <STDIO.H>- M6 [- `5 v5 B
#include <STDLIB.H>% v' p$ |: D+ ?! M
#define FNAME "test.$$$" - ?( E n& P, ]
int main(void) / A8 R2 O& \/ l$ K9 N* X
{
( M: d2 j8 V) W0 a8 p- k* }+ dFILE *fp;
 ~; b- `3 J! b" j; w# Qint word; 
% ?4 z9 N1 l6 W6 a6 F' M+ d0 C0 X' `/* place the word in a file */ & q( M2 f9 r/ K
fp = fopen(FNAME, "wb"); F- y0 T* f, r) o
if (fp == NULL) 3 j1 \0 ?2 k: R. E
{ : [. x3 N! r9 C Y) w
printf("Error opening file %s\n", FNAME);
0 Y! R' a( Q9 n6 Z# N7 ?. o* xexit(1);
$ S, P* {5 J3 N" A} 9 c: P* H+ R, A/ Z1 @7 t$ ~
word = 94;
putw(word,fp);
# ~5 e4 N& {! f' a8 Qif (ferror(fp)) & V) O: c$ c* g# C3 ]" v+ a$ _
printf("Error writing to file\n"); . d/ p1 o, C+ {- c
else
5 c8 N0 @* B$ P, B" @printf("Successful write\n"); - F% z* |0 }! T( ^: i( x
fclose(fp); ) U; c1 O% }/ k8 q5 Z+ P
/* reopen the file */ / H% @6 \! t- E$ L: m! W
fp = fopen(FNAME, "rb");
# B# t: `, u2 `# B& M2 A7 ], pif (fp == NULL) 9 Q8 E( x0 ]9 l" M4 A7 e
{
$ v9 K G3 }' Tprintf("Error opening file %s\n", FNAME);
3 |( }3 ]# ]% w" k: E, Xexit(1); ; I( T% Y9 y8 y- _% S2 x2 t, J) N
} / Q; X' a* A! e) m) d+ T6 V9 `
/* extract the word */
8 `/ ]+ _4 K P5 Pword = getw(fp); . Q) G$ B0 V$ Q3 M' m+ J
if (ferror(fp))
1 e3 n5 r. b3 `0 ?+ l& b8 X0 [, fprintf("Error reading file\n");
6 r. _* d0 \' }( c( w! H2 V7 l' zelse . f' Y) m0 z! C$ c. n) U1 x
printf("Successful read: word = %d\n", word); 
9 E* B( n1 f# v( z- x/* clean up */ , @5 @( w2 C: L; I& X) h
fclose(fp); 9 d* ~3 [* `, C4 J8 D$ y+ s
unlink(FNAME); 
0 O. Q0 ~/ i$ Treturn 0; ) x! G# _4 y, r6 `
}