- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
< ><FONT color=#ff0000>函数名: labs </FONT>
- \* g8 _ a) w" g+ w }用 法: long labs(long n);
8 Y7 C9 b7 q b. x+ x程序例: </P>
6 ^) t( ~) G! e( R5 w( p/ g< ><FONT color=#0000ff>#include <STDIO.H>
5 o; n: ]; ~( d2 a9 W#include <MATH.H></FONT></P>1 s; m3 F& [- ^# K7 L5 ~- E, `
< ><FONT color=#0000ff>int main(void) " P J9 w% V( Y
{ - h+ S" l E, H$ D T; o
long result; 4 r ^! f+ g d; I
long x = -12345678L; </FONT></P>
; P3 q/ S, @8 c. T: f5 C< ><FONT color=#0000ff>result= labs(x); : [( y( A: U4 A4 R8 t, A
printf("number: %ld abs value: %ld\n", / p. O+ f4 Y; S! O4 {
x, result); </FONT></P>
" X& u) n0 J6 v8 x( ^7 O% H< ><FONT color=#0000ff>return 0; 2 ]. n6 D& G; |/ g+ k4 Q' p( ]
}
) c: k/ m1 ~, c: U</FONT>; t# g/ B- C$ e& h; F
+ I S q$ d( a! s: K
</P>
) r* o9 N! H& C5 p; ^# y+ q< ><FONT color=#ff0000>函数名: ldexp </FONT>) D. d' H+ S2 \/ ]! C$ i! [
功 能: 计算value*2的幂 ' S$ N8 H$ F) s0 J9 B2 H) L
用 法: double ldexp(double value, int exp);
- c3 @( H% k C# z% I程序例: </P> l' N. I- z2 F
< ><FONT color=#0000ff>#include <STDIO.H>
1 V* p8 x+ i r. W#include <MATH.H></FONT></P>
) N3 e8 g+ N1 B3 M: U6 s< ><FONT color=#0000ff>int main(void) $ D* J4 j" M1 e+ h; M7 y$ c; b) C
{
^% A) v& u% D& \9 t. u hdouble value; $ q2 H) `8 C/ t+ X3 I- h
double x = 2; </FONT></P>: {8 Y1 q a' P( {8 v9 N3 x
< ><FONT color=#0000ff>/* ldexp raises 2 by a power of 3 ; k }# i2 S" z/ f
then multiplies the result by 2 */
6 ^- y* ^- L" W+ \5 r* c' l1 Wvalue = ldexp(x,3); ) {; E% s: c% r
printf("The ldexp value is: %lf\n",
' d: @8 f% c# nvalue); </FONT></P>
6 I1 S4 u1 N& Q" K< ><FONT color=#0000ff>return 0;
9 R3 U7 G \9 G( Z. {( z8 `}
# ]2 \; J* ^. U+ A" Y
( e- m& y) m6 {</FONT></P>" ]2 x C4 @: Q9 b
< ><FONT color=#ff0000>函数名: ldiv </FONT>' I3 m' `) u4 W* i
功 能: 两个长整型数相除, 返回商和余数
- x9 f6 V8 @" g5 L! K& ]+ b/ i8 }用 法: ldiv_t ldiv(long lnumer, long ldenom); * V, Z$ f" D6 B6 j- a, B
程序例: </P>
/ M! U. d) j$ m/ J: k< ><FONT color=#0000ff>/* ldiv example */ </FONT></P>
, q- @( ^( N" e& L< ><FONT color=#0000ff>#include <STDLIB.H>
" F' p7 F8 O5 `: E8 i" y#include <STDIO.H></FONT></P>/ K; ^* l* _( g4 V
< ><FONT color=#0000ff>int main(void)
( I7 D# l0 J" D/ S{
( [3 ] ?0 h) @+ j# R( L2 b1 sldiv_t lx; </FONT></P>4 O! R9 S+ `; K- `8 c' A
< ><FONT color=#0000ff>lx = ldiv(100000L, 30000L); 2 L8 K- P) f4 b$ t8 b' V
printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem); 3 L/ @% l0 z6 n2 V
return 0; </FONT>
5 Z. R7 J! M+ D$ _. t<FONT color=#0000ff>} </FONT>
- p. o1 D E! u: Z+ e</P>
( i2 @2 a6 t/ s3 T% F+ b6 X< ><FONT color=#ff0000>函数名: lfind </FONT>2 w; m' ^* ]. H% M" N
功 能: 执行线性搜索
: @3 y5 H: `7 n: J0 ]% v用 法: void *lfind(void *key, void *base, int *nelem, int width,
+ a% J+ P1 X$ Tint (*fcmp)()); 8 X8 B( i% a3 c, Y8 _, h
程序例: </P>
1 c! s' W! i9 x) V< ><FONT color=#0000ff>#include <STDIO.H>
6 h. ~* |# i1 D#include <STDLIB.H></FONT></P>
, e$ Z# B& s7 J& m3 ^< ><FONT color=#0000ff>int compare(int *x, int *y)
9 {4 _; l4 i0 k; `4 O3 r{ 2 t: `. k ^6 m) t3 Y3 J& \; H6 X, R4 f
return( *x - *y ); / D+ v. v, R4 [9 a, B
} </FONT></P>8 i8 B/ o# S7 g8 b2 @
< ><FONT color=#0000ff>int main(void) ; ~7 _( P5 S j
{ % T' ^. y- Z4 [- p; k7 x/ ^
int array[5] = {35, 87, 46, 99, 12};
% C5 m8 T: a4 x9 Msize_t nelem = 5;
3 n7 o2 \! m: jint key;
% K: O$ p8 M5 g6 ?( Dint *result; </FONT></P>
% F2 Y# {( j6 d& _, n* C9 j< ><FONT color=#0000ff>key = 99;
6 u& X. b% e9 Iresult = lfind(&key, array, &nelem, # q: k7 t- x, e& b; r
sizeof(int), (int(*)(const void *,const void *))compare); / a" g2 {& G @& g
if (result) & O1 J+ c, @" W: B0 k. H: m- l, O; p
printf("Number %d found\n",key); j/ A4 D3 G0 E- u4 Y7 c5 N
else . S8 X9 O1 W b& }% b' x4 P; U' E, o
printf("Number %d not found\n",key); </FONT></P># G* N. D4 T, A: j9 w! e4 V1 p
< ><FONT color=#0000ff>return 0; * c5 g7 i7 \' t
} </FONT>, c2 Q( @( T. z3 ~
7 T3 j5 b. U- T! G</P>& l! z7 N. {* J% \1 z( @
< ><FONT color=#ff0000>函数名: line </FONT>9 j9 G% Z- N) q) G7 d) U0 n
功 能: 在指定两点间画一直线
0 T1 _ X* S9 t8 A3 i用 法: void far line(int x0, int y0, int x1, int y1); $ {6 g( e0 s/ D. f! d# P' g+ @; ? S7 m
程序例: </P>
& r/ i9 k# c+ x( @2 L, C* k8 j3 _< ><FONT color=#0000ff>#include <GRAPHICS.H>6 {+ ~4 n' b- x1 A
#include <STDLIB.H>
, S0 ?" S1 y0 o7 s! A# H#include <STDIO.H>
* U2 R1 {; R# e, v#include <CONIO.H></FONT></P>
1 f5 f% k, V1 O% m/ F$ D F! V< ><FONT color=#0000ff>int main(void) % R; m8 D# N- P& \$ ~0 i
{ ! g& b8 P+ W, K4 ^; H) I
/* request auto detection */
8 L8 `2 W) x O# t m8 ^3 oint gdriver = DETECT, gmode, errorcode;
% m1 c4 ]& @- O' s% t' o2 `! `& eint xmax, ymax; </FONT></P>
. t: K0 V! a/ s9 u& M* e< ><FONT color=#0000ff>/* initialize graphics and local variables */ & O4 i7 t; b# P- C; @" s0 x
initgraph(&gdriver, &gmode, ""); </FONT></P>
- a1 }! L6 e$ N< ><FONT color=#0000ff>/* read result of initialization */ * w+ @0 m. r# A* D, D
errorcode = graphresult(); : Y, b9 q* q) H# N2 h
/* an error occurred */
0 {- w3 ~: a: E( K$ \: w; H+ f8 Dif (errorcode != grOk)
7 z* ^4 O* _6 B{
$ D T' X z3 ?printf("Graphics error: %s\n", * x. d4 P" Y; I* Z5 Q+ u2 c, x N
grapherrormsg(errorcode)); + r+ G0 ~4 y7 G8 C9 _* q. K1 K
printf(" ress any key to halt:");
; a; W+ S% r2 M+ G1 g: ]8 {8 ^2 _# rgetch();
! Z& P' ^ ~3 O1 W8 Yexit(1);
1 ^- I Z- R$ J5 _8 u V, g} </FONT></P>1 d9 T H0 b! K2 |
< ><FONT color=#0000ff>setcolor(getmaxcolor());
! p# q. ~. A y! K% P! @9 ?1 Xxmax = getmaxx(); 1 }3 @7 Y1 @; e2 V6 J# b9 g
ymax = getmaxy(); </FONT></P>
) h( k: L7 H- a7 y) r< ><FONT color=#0000ff>/* draw a diagonal line */
; l. ], Q$ k& v2 T8 K2 }) f. S) fline(0, 0, xmax, ymax); </FONT></P>% ~( o, E5 G1 A
< ><FONT color=#0000ff>/* clean up */
" x( t* _4 A# {% q0 ~% Igetch(); . }* R$ w( l/ x) T9 u G: T
closegraph();
( S, l2 w2 I7 V9 b8 Y$ \$ treturn 0;
0 Q1 X/ l1 q* N! {}
5 E$ |, j( Q8 @& W2 U</FONT>
, k( q$ ^& s1 _</P>! w! Z4 _. \$ T% S5 S
<P><FONT color=#ff0000>函数名: linerel </FONT>! X, U4 \ ~; l/ x
功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线 9 G, h1 @, ]" _0 w1 v/ ?6 h
用 法: void far linerel(int dx, int dy);
|" ^% V" B8 T4 r程序例: </P>
# M1 g+ Q8 X" [3 b A<P><FONT color=#0000ff>#include <GRAPHICS.H>8 Z# q8 r3 E, }
#include <STDLIB.H>+ [+ V N* x0 K4 V p. s7 A( g
#include <STDIO.H>
) m/ o3 f- O/ p8 t6 J5 `#include <CONIO.H></FONT></P>! Z( O) a) \( j2 _- \$ p
<P><FONT color=#0000ff>int main(void)
% Y# J+ x! w- w2 w5 W{
- ~: }0 z3 G3 Z& u6 P/* request auto detection */
?& u* q: ?. F! `+ iint gdriver = DETECT, gmode, errorcode;
9 k* h. b d/ l3 ^6 Achar msg[80]; </FONT></P>1 w8 |/ Q& K( l! v( T* e& d/ b6 Y
<P><FONT color=#0000ff>/* initialize graphics and local variables */ # l0 G. I- a# i7 k1 x( [/ A+ M( B
initgraph(&gdriver, &gmode, ""); </FONT></P>) S7 q$ C. k& A d
<P><FONT color=#0000ff>/* read result of initialization */ ( `% g( { g& l7 y
errorcode = graphresult(); ; b9 A u) z; O. B
if (errorcode != grOk)
0 w$ M- b3 }# V G6 ~; [{ 2 P6 I4 T, g* y6 e8 S
printf("Graphics error: %s\n", 6 x; M( y+ U8 l( {; J5 n
grapherrormsg(errorcode)); : f, V- R3 h, C6 V# T
printf("Press any key to halt:"); ' B# A) F* M7 ]% Y7 W! W1 h
getch(); 7 H/ v8 F. A* H9 o
exit(1);
+ Z! L7 _8 V/ K) S} </FONT></P>, z/ }' r! i0 {: s/ O; J9 e5 C3 o% o+ F
<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */
) r% d8 [4 @0 p- L# Amoveto(20, 30); </FONT></P>
9 z0 A7 l$ r/ g<P><FONT color=#0000ff>/* create and output a
$ s5 y0 X* }3 D* B7 Qmessage at (20, 30) */ 2 F3 R( X7 [ ^
sprintf(msg, " (%d, %d)", getx(), gety());
! G) B* r. W( p9 O) E3 aouttextxy(20, 30, msg); </FONT></P>
" P q- {0 f8 C! u<P><FONT color=#0000ff>/* draw a line to a point a relative & ^( b1 N. ^; L/ S8 j% d. O. V
distance away from the current
( w+ b& I1 C% ^( H! g4 ovalue of C.P. */
* {( j$ D' ^* d# a8 P) r) l4 M4 Glinerel(100, 100); </FONT></P>
9 G O4 a6 _6 z! d, L" a/ K' Y<P><FONT color=#0000ff>/* create and output a message at C.P. */
. _ R# g& D a osprintf(msg, " (%d, %d)", getx(), gety()); 4 }+ A+ N& x& e9 }( ]
outtext(msg); </FONT></P>
1 d+ Y2 a; s6 N& R/ S% s5 H<P><FONT color=#0000ff>/* clean up */ 2 g6 A; g, ~, V6 ^% N+ F B
getch(); 9 \6 j7 u1 ^; ? k, G8 r4 R) X3 t6 X
closegraph(); 1 x0 x g6 B$ q4 {) U
return 0;
* J% I S& N5 D$ Y* A% r+ }0 \} </FONT>7 q: k$ g: g% B3 v
</P>$ b+ E$ m2 r l/ @1 ]
<P><FONT color=#ff0000>函数名: localtime</FONT> ! V) D, D( Z9 O7 ^" M
功 能: 把日期和时间转变为结构
* @( y4 l7 n4 ]! {- T9 u+ n+ }用 法: struct tm *localtime(long *clock); . P& z% j5 D9 Z9 G) i
程序例: </P>
4 Z0 \- a" r# G<P><FONT color=#0000ff>#include <TIME.H>3 @4 R* N* ^4 |3 P5 n: p5 N. ~- V* M
#include <STDIO.H>
" Y) g+ R0 n; I1 y#include <DOS.H></FONT></P>( R5 S' S8 Y& {7 s4 h p+ d
<P><FONT color=#0000ff>int main(void)
4 v' z' L1 p1 g; J9 k$ R{ $ D' u: \ [9 ]# ~5 B5 X/ O% A
time_t timer;
: F: k4 F5 n1 E, c/ W3 Jstruct tm *tblock; </FONT></P>
# Q9 F( m) m+ S& G9 Z: j<P><FONT color=#0000ff>/* gets time of day */
& M+ r, ]+ R% x- q3 K4 j3 Z7 Ctimer = time(NULL); </FONT></P>
, U& Y# }' G! r+ S2 I7 X6 k<P><FONT color=#0000ff>/* converts date/time to a structure */
1 y% Y7 @: m# U7 E9 etblock = localtime(&timer); </FONT></P>
6 A9 _' x. C9 `<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>/ e6 g5 @3 I3 X( k; }% S. l2 S
<P><FONT color=#0000ff>return 0;
( a* M3 H# B6 n% C4 s; A l} ' L/ C5 J% Z _) T
- a9 L. y4 O1 a
* S5 U8 f) U* Y</FONT></P>
# I) r4 p8 l/ c3 c6 y<P><FONT color=#ff0000>函数名: lock </FONT>
3 f F( R5 x6 ?, A2 a功 能: 设置文件共享锁 5 d4 W9 o* ]0 ~5 ^ r) B4 e) Y- g
用 法: int lock(int handle, long offset, long length);
- x+ ~3 D4 R7 ?" W; y程序例: </P>
; S; R/ l5 a- [' h/ _ Y4 N<P><FONT color=#0000ff>#include <IO.H>2 J4 O3 c* `( ]( e0 b: j" j
#include <FCNTL.H>
+ o4 J: b1 S. X& k2 G. k#include <SYS\STAT.H>' V2 g" ?0 o# i; o
#include <PROCESS.H>% |9 s1 h+ e% T& X
#include <SHARE.H>% E1 J: t" b+ x; L% J6 B
#include <STDIO.H></FONT></P>
" f/ }( J2 k9 t<P><FONT color=#0000ff>int main(void)
* {1 r/ G2 e" r( s+ G' |! k, A{ : t) U8 j* c7 ?& [2 S0 |
int handle, status; N# n* k4 s# v. ~! F3 s6 G
long length; </FONT></P>
; v9 ~3 \4 ]) l3 q/ E<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */
0 d" z6 V4 _7 @0 o/* file locking to function properly */ </FONT></P>
" j: {$ ^+ S& }. d' W# U: K7 [- w<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat", , w" @2 O: J9 ?8 d6 G* ^
O_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>9 q% r0 ?* E0 i3 h7 _- }
<P><FONT color=#0000ff>if (handle < 0) 4 T+ {: g& V, X4 |: T3 m
{ : q! w. r7 T* g! [, r
printf("sopen failed\n");
]8 C/ c" m, n0 b- p7 ?exit(1); , n1 k' N. r# B l% L! k% J
} </FONT></P>" N1 X7 l& @, k7 R1 y, ~6 \
<P><FONT color=#0000ff>length = filelength(handle);
) g8 k# z, N! G! ~- Y6 n; E; zstatus = lock(handle,0L,length/2); </FONT></P>8 p# n; s9 K% K9 v- A
<P><FONT color=#0000ff>if (status == 0)
: X5 A. Q5 I9 p+ q* z! f8 wprintf("lock succeeded\n");
/ v0 K* C' e+ O2 Kelse
* S: t! L+ F0 h2 l- N/ x; ^4 lprintf("lock failed\n"); </FONT></P>; C r9 L, X0 p" F! n& [
<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>
2 K4 `+ B3 v7 T5 A( g) H<P><FONT color=#0000ff>if (status == 0) ; c" \* q, {, \' C" p. U
printf("unlock succeeded\n");
0 G/ B0 z4 a+ ~else ' @) t7 l. a k4 C9 }/ r3 D% N1 ?
printf("unlock failed\n"); </FONT></P>* l, e8 y! H C& d+ u) a- B: m
<P><FONT color=#0000ff>close(handle); 6 H, U) y/ R8 \- g7 i
return 0;
$ q: k( Q: N4 b} 8 N6 [9 B: J6 E5 Z0 n0 Z4 [$ M, g
</FONT>
' [9 ^: ~) x+ Z& ?</P>
( [, i0 ^& C% m<P><FONT color=#ff0000>函数名: log </FONT>0 V" j# X0 [9 L9 C2 \; }& r
功 能: 对数函数ln(x)
& N# T0 A; i& m5 L( B) I4 a用 法: double log(double x); / L$ n8 C6 b1 d
程序例: </P>
' O$ H: q' s" ^5 v<P><FONT color=#0000ff>#include <MATH.H>
: _; o1 D5 h4 B+ e! L. `#include <STDIO.H></FONT></P>$ g* x3 r1 J" f" K, H, h! B
<P><FONT color=#0000ff>int main(void) % M; ]" t# N$ o
{ ) o9 ?' ]) M1 \7 |2 k! \0 ~; L! K
double result;
1 B- {. u' `" S) K& Q8 Ldouble x = 8.6872; </FONT></P>
' E* [+ E3 k! `; n4 S<P><FONT color=#0000ff>result = log(x); & H3 M5 i8 m( w! s+ @
printf("The natural log of %lf is %lf\n", x, result); </FONT></P>: _4 j& A! {+ Q! X
<P><FONT color=#0000ff>return 0;
0 r; y8 q ]0 l7 P+ o6 M Q}
& c( \9 S# B3 B+ a$ G; }$ j# w* q! |* K, g. j
</FONT></P>
5 ?5 M7 r3 a. Y+ Z% P# N; q<P><FONT color=#ff0000>函数名: log10 </FONT>
( h4 P4 ~0 h3 X+ h& s) q2 N- K. f功 能: 对数函数log
. u, ~ C6 |9 _, E用 法: double log10(double x);
0 t5 @4 I( A0 ?$ d. Z+ G程序例: </P>
T) A& X" h9 h0 g8 w# @; g<P><FONT color=#0000ff>#include <MATH.H>; j e4 i" L2 q( b: B
#include <STDIO.H></FONT></P>
8 V. |/ e; A8 e* A<P><FONT color=#0000ff>int main(void)
! s& ~7 s6 K; C3 d( \& F# l5 Z+ M{
7 e( n" @0 w. \6 ^double result;
: @; \! e" C6 u9 }1 `; _double x = 800.6872; </FONT></P>
: g# ~+ b6 [' Z9 e<P><FONT color=#0000ff>result = log10(x);
6 r7 v( ~9 R0 T0 _% T) @printf("The common log of %lf is %lf\n", x, result); </FONT></P>( a$ U8 j) v, l/ V1 M9 y+ M6 l
<P><FONT color=#0000ff>return 0; % k4 Q0 [& i! W/ i% k- ^
} 8 u1 `. v$ N- c! R/ v0 H! B- M
, A# u: P1 m+ G7 }, v8 Z
</FONT>0 T& Z, I$ I' k2 C
</P>* b5 p8 T1 L/ k; s% a
<P><FONT color=#ff0000>函数名: longjump </FONT>
4 H8 a( @3 x7 N2 E: ?! h功 能: 执行非局部转移
' Q+ f/ v# x; t) V; q" M用 法: void longjump(jmp_buf env, int val); . f8 G6 Y# c0 w3 g" e
程序例: </P>7 m5 V$ o( B( ?, c
<P><FONT color=#0000ff>#include <STDIO.H>
' L0 |: p Z+ d! r* X, t6 |#include <SETJMP.H>
; p1 f3 |9 W( O+ X) o#include <STDLIB.H></FONT></P>% s% t* u# e' @2 M
<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>* N# X2 a0 Z4 |2 y( m
<P><FONT color=#0000ff>int main(void) $ S0 _8 ?/ K, J1 G; u
{ </FONT></P>' N8 d% _# m* y- b$ L. {# V1 E
<P><FONT color=#0000ff>int value; * b% M5 q1 X- q% L9 w& ~ g
jmp_buf jumper; </FONT></P># P, V: i9 G& o4 L5 v2 G
<P><FONT color=#0000ff>value = setjmp(jumper);
* e0 E; F5 M( J1 _4 U" yif (value != 0)
3 T7 j% c4 r& F) X{ * Z: k4 [. E4 m# ]8 B
printf("Longjmp with value %d\n", value); + R. ?; O' o. F3 W' ~+ i/ y
exit(value);
`4 z. f& @" K+ r} : X- s/ k& P. ~; W
printf("About to call subroutine ... \n");
! a* [0 w3 O" X) e9 f/ ?subroutine(jumper); </FONT></P>
3 T/ Y/ B; _/ g, N# y- ?- ^7 B<P><FONT color=#0000ff>return 0;
. C3 l# ?; g, j} </FONT></P>( r8 I3 G9 y8 ]* p3 Q
<P><FONT color=#0000ff>void subroutine(jmp_buf jumper) / ^1 s5 x! p1 @4 \
{
' b. o: F" `$ z5 |) C6 p- klongjmp(jumper,1); ! J- W$ r& l+ T
}
/ H5 [) u/ T- ^. o7 w
. j3 G: Q u$ n* P* [$ X</FONT>
: k. W& g) ~* E</P>0 x# N5 R, G. ~) g& G' ^' O
<P><FONT color=#ff0000>函数名: lowvideo</FONT> $ R* L' B+ U8 I. F
功 能: 选择低亮度字符 ' Q; _; Q% g) Y7 @% L( |2 d
用 法: void lowvideo(void);
8 o5 D, ~$ D5 c- `- {* ~程序例: </P>
, {7 W# H1 e2 M H0 o9 H<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>" I5 t+ ]4 A1 P7 [
<P><FONT color=#0000ff>int main(void) % @, u7 S2 f1 j
{
, g6 O9 q3 c8 z+ V% Hclrscr(); </FONT></P>
# w! H4 S5 w( L* \<P><FONT color=#0000ff>highvideo();
. S: F+ [* T0 z( G5 ^ c2 f( c6 R) Zcprintf("High Intesity Text\r\n");
: q3 N1 s' R8 r0 b4 m5 ^( I0 J; Elowvideo();
/ V, {: O" i. R/ vgotoxy(1,2); / O3 z1 j) r/ [) J" b" N4 n
cprintf("Low Intensity Text\r\n"); </FONT></P>: P [$ T; ?. L8 A" E9 P
<P><FONT color=#0000ff>return 0; $ ~( r) p% i6 F6 j, j
}
4 `; g" v5 t& o) o
! w1 G) Z' {1 k. V( w! w7 d</FONT>- O( I, k! U, k$ t! M1 b- y
</P>
) r0 |# Y# i8 v<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
/ l" Z; y7 S& x+ e功 能: 将无符号长整型数向左循环移位 ; o1 i/ z/ n) B. F8 p4 p
用 法: unsigned long lrotl(unsigned long lvalue, int count);
1 p! R {! p7 B$ D. ?2 Bunsigned long _lrotl(unsigned long lvalue, int count); 8 W; r* K0 j$ N$ i, s4 q
程序例: </P>
' m4 a* P; I P% `) N9 Z<P><FONT color=#0000ff>/* lrotl example */
& s1 P! D! ]: ?/ z! V5 F#include <STDLIB.H>
: K* K! R6 v2 q! W#include <STDIO.H></FONT></P>
7 b' C* M- m2 K! Q$ K [' h<P><FONT color=#0000ff>int main(void) % r: c' J+ n/ C2 U
{
7 \* K4 R* A0 q& \, ^6 Munsigned long result;
$ v5 B- a4 S' `unsigned long value = 100; </FONT></P>' ~6 I9 o. ?3 D+ y5 z
<P><FONT color=#0000ff>result = _lrotl(value,1); * I, e1 I' [& Y; {/ K
printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>4 X$ X' d$ i& P% q; a9 E
<P><FONT color=#0000ff>return 0; 8 d+ Y$ x- Z; T1 j( W' x
} 9 G$ U5 k8 e. k3 j8 ~
</FONT>
$ e8 Y }" N& }2 S& W3 v</P>4 k0 J0 q" V9 r; e1 {- N
<P><FONT color=#ff0000>函数名: lsearch </FONT>
+ `* x; t$ j. u& w/ p ^1 n) k功 能: 线性搜索 $ z: Y7 E3 `" W$ B8 j S1 Q! Q
用 法: void *lsearch(const void *key, void *base, size_t *nelem,
& }: X' d1 q; p, Dsize_t width, int (*fcmp)(const void *, const void *));
9 f$ E" S2 d$ R# x' v/ P) J$ R程序例: </P>7 M9 h( U8 ?) e3 M9 Y% P8 M( S
<P><FONT color=#0000ff>#include <STDIO.H>
( U$ g9 b6 K* E#include <STDLIB.H></FONT></P>. A# p7 G; H; F! j4 _8 D
<P><FONT color=#0000ff>int compare(int *x, int *y)
# s3 _! X3 _! Q- r& f{ ) K+ ^* [8 F( ^+ q5 J+ H
return( *x - *y );
2 a9 e4 p! d7 h' C} </FONT></P>
( b' S" v9 s0 U/ {$ N( o7 \<P><FONT color=#0000ff>int main(void)
8 h( e9 Y8 N$ u: \/ C9 c{ 9 n: e4 S0 d5 c
int array[5] = {35, 87, 46, 99, 12}; . Q$ Q# e% f* y
size_t nelem = 5; : R: x( r1 g, C& F
int key;
1 O2 s! _+ K: {- ^" N3 b1 Uint *result; </FONT></P>. r- H* Z% W9 X* m! l! c( {/ ?! R
<P><FONT color=#0000ff>key = 99;
0 O% M* l( y, Z6 ^8 ]' U Cresult = lfind(&key, array, &nelem,
% t0 n: s8 f% I; esizeof(int), (int(*)(const void *,const void *))compare);
. _0 d9 q ~' g# Z6 {9 `! Vif (result)
2 [1 b' A( Q6 F. A5 P6 dprintf("Number %d found\n",key);
6 x5 E2 t4 X u0 X: felse
/ A/ D Z7 D4 L1 N1 n5 Kprintf("Number %d not found\n",key); </FONT></P>
! N) g9 }' Y/ ?<P><FONT color=#0000ff>return 0; $ X. ~1 B C; m- Y! D9 T
}
! j3 y! p4 i" K7 S* v
$ S+ d) s7 v5 Q</FONT>
. k* f8 ?. M9 }6 \</P>
5 J9 u4 k, M* f9 e5 B<P><FONT color=#ff0000>函数名: lseek </FONT>7 ~( y5 S) `; u/ \7 p$ e9 |( m
功 能: 移动文件读/写指针
' A. K9 I- K2 R! ~: b7 I用 法: long lseek(int handle, long offset, int fromwhere);
8 n1 J3 l T. q: y& ^程序例: </P>" Q5 P8 ?5 w4 n8 B! X9 g
<P><FONT color=#0000ff>#include <SYS\STAT.H>
/ P) Z" H; c. a q% w8 w#include <STRING.H>
- J7 |& t* X& P/ a7 a, _, G6 F! c#include <STDIO.H>
* t+ y" O8 }3 F$ x( K#include <FCNTL.H>2 L9 i/ c X ~7 u m' c
#include <IO.H></FONT></P>) V6 x2 U' E4 D8 b7 p& e6 q
<P><FONT color=#0000ff>int main(void) 5 H( h6 w9 b( a4 s$ M
{ 6 d8 D" h- I5 R3 a
int handle; % d7 L+ ^- ~5 k7 I' ]" \
char msg[] = "This is a test"; & t1 Y1 }$ v5 S
char ch; </FONT></P>
( G' s2 ]3 E2 C% s<P><FONT color=#0000ff>/* create a file */ ; R0 X, @. V4 h! M5 m, ?
handle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
) u& b3 h# ?. [. |<P><FONT color=#0000ff>/* write some data to the file */
% ~2 y$ ]( [2 U& M. D4 f* xwrite(handle, msg, strlen(msg)); </FONT></P>/ Z8 O9 v9 W1 L
<P><FONT color=#0000ff>/* seek to the begining of the file */ 7 F3 o: a& u9 |8 ?( I
lseek(handle, 0L, SEEK_SET); </FONT></P>, b7 f2 F( O' V4 ?, J
<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */ 8 t: U2 a$ D/ I3 h: @& z" {. U- g2 D
do
6 A! {4 ~" K7 {* k1 K/ |5 e{ , } e. z3 w+ A; o6 y- J
read(handle, &ch, 1); 4 k+ w, Z# Y! L' m- v- v3 [* B3 X F
printf("%c", ch);
+ @! J% s% o5 j3 R5 m8 V3 j! f1 [} while (!eof(handle)); </FONT></P>
, z4 o6 Y$ `, O( @* u<P><FONT color=#0000ff>close(handle); - l& N3 [! j, ^% i* J
return 0; m! M3 [+ k r" \- E
}
6 [+ @4 h) f& i" J' l* p. C3 t</FONT></P>
# l" a1 H$ B" F8 h<P align=left><FONT color=#0000ff></FONT> </P> |
zan
|