- 在线时间
- 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>% R* c7 o: f. m+ S# x( E
用 法: long labs(long n);
# Q/ H3 W# f* p+ P, s: Y程序例: </P>% O9 E: w5 {5 G7 \
< ><FONT color=#0000ff>#include <STDIO.H>+ s8 U$ |1 A/ ^: g
#include <MATH.H></FONT></P>
/ X6 o4 E& h% w) \8 A+ q< ><FONT color=#0000ff>int main(void)
6 g& ]& ?$ L+ D/ _ u{
$ c9 x6 |) l% B! X8 w5 Zlong result; 3 B8 d9 u. @* ?3 z% I3 Y) X8 z
long x = -12345678L; </FONT></P>1 p( |+ y* @% f( |) f& S3 |
< ><FONT color=#0000ff>result= labs(x);
5 N& V; s& N+ _6 f" ~' E. d9 k* S6 w8 ~printf("number: %ld abs value: %ld\n", : p& U/ R& a+ _
x, result); </FONT></P>
: }3 |! u% m2 l5 d* Y9 R$ y< ><FONT color=#0000ff>return 0;
& x! o1 j* p9 k+ H}
; O4 ^$ O# t5 B3 H</FONT>
5 Z6 ?+ n! `. L; m
( Q# H1 V" R& J0 s5 \, ?$ A+ [</P>* A! @! ~) c& N. q2 A
< ><FONT color=#ff0000>函数名: ldexp </FONT>
+ ^' G$ s0 w9 `. p功 能: 计算value*2的幂
% Z! L. y! r8 P4 D用 法: double ldexp(double value, int exp);
0 t J% k5 S! E+ \/ p: M' L' t程序例: </P>6 n" Y5 v/ T$ D) A4 Y
< ><FONT color=#0000ff>#include <STDIO.H>% N! m B" u0 n/ J: `" q1 g! ~
#include <MATH.H></FONT></P>' ?+ V! }* u$ h( j
< ><FONT color=#0000ff>int main(void)
& {7 u0 K! I: k" P3 I2 T{
2 X2 `3 ]4 t1 i4 S" Z: z* I( kdouble value; 6 g# Y9 D0 `6 Q8 u5 |% \8 K
double x = 2; </FONT></P>
, [. P$ o4 B. K v< ><FONT color=#0000ff>/* ldexp raises 2 by a power of 3 9 c. N: l- h% H% K; ^8 r
then multiplies the result by 2 */
+ r+ M: F$ M9 X+ X1 V7 {8 Wvalue = ldexp(x,3);
6 O& l' W1 C7 N. k& o! Z1 pprintf("The ldexp value is: %lf\n",
# K8 W% w. G" ]& `value); </FONT></P>
0 ?5 T F7 ^) j, e' @< ><FONT color=#0000ff>return 0;
" U( q: \) \3 A1 h% H9 W* H}
, X* u0 `/ U( W, W
9 E) i0 Z: ^7 @</FONT></P>
, m6 t& k D1 H) j# V< ><FONT color=#ff0000>函数名: ldiv </FONT>
0 D+ j# r# V4 \1 M; J6 ~( ?功 能: 两个长整型数相除, 返回商和余数 $ X1 `0 C+ W9 I* D1 Y$ [
用 法: ldiv_t ldiv(long lnumer, long ldenom); 7 N) ]1 G1 z0 Y
程序例: </P>
' `5 J+ G$ K2 r& l }. w8 K< ><FONT color=#0000ff>/* ldiv example */ </FONT></P>/ U4 X9 { @7 T) l+ J8 w6 F* T# g
< ><FONT color=#0000ff>#include <STDLIB.H>, k& H; t: |4 \6 e
#include <STDIO.H></FONT></P>& i: [1 \$ [1 S2 k1 J; R
< ><FONT color=#0000ff>int main(void) P4 H7 i& k" {9 l+ a, |% a
{
/ P7 T9 g e$ g5 O+ W& x( ildiv_t lx; </FONT></P>& s/ s: o5 Z, V0 @- y3 L) \
< ><FONT color=#0000ff>lx = ldiv(100000L, 30000L);
# W0 K" z. \9 M* {7 O9 U# iprintf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem);
4 W# o# |$ A, S. m) H e' {return 0; </FONT>2 g/ H( n6 g; R: _' }) z
<FONT color=#0000ff>} </FONT>% L2 s. V- s9 n$ K3 G
</P>3 W# p, [6 V" B- n( y6 a" L3 D
< ><FONT color=#ff0000>函数名: lfind </FONT>% w6 V+ ^8 U) [' ~/ |8 D
功 能: 执行线性搜索 3 C: _9 a4 ]; o
用 法: void *lfind(void *key, void *base, int *nelem, int width,
( a k9 {9 q6 mint (*fcmp)());
* X" P3 k2 Z( w& Z3 \: s: t程序例: </P>6 |8 Q9 v1 v( E+ Y3 Q* r
< ><FONT color=#0000ff>#include <STDIO.H>
7 b' x9 V. W! K2 v$ Y+ C#include <STDLIB.H></FONT></P>! P- U- d- M7 K1 D
< ><FONT color=#0000ff>int compare(int *x, int *y)
9 t: k4 Q5 n0 \% \* ^+ k; ~# \{ z2 ]6 c: X6 O8 i
return( *x - *y );
& o, H2 J# m" v& {' h' ?: E} </FONT></P>
8 O$ D$ }/ v( a1 |< ><FONT color=#0000ff>int main(void) : P0 J2 Y, C5 z) y2 W$ [3 P
{ ! j1 [+ h5 P$ D% v$ D8 h( Y
int array[5] = {35, 87, 46, 99, 12};
% r( |6 _1 M2 F% E1 T) r5 W5 asize_t nelem = 5; + u1 m/ v. E) t' j4 {/ b) I- G
int key; 4 N$ ^+ x, @1 }
int *result; </FONT></P>
- s$ ^0 D+ f+ A, @1 ^< ><FONT color=#0000ff>key = 99; 6 o. s% N( ]! [& o1 F
result = lfind(&key, array, &nelem,
5 K" _( p' G1 {0 F7 O0 W; n. rsizeof(int), (int(*)(const void *,const void *))compare); $ U4 Z5 i! ]5 J' o6 W
if (result)
! ^+ _. P+ e5 {& z' jprintf("Number %d found\n",key);
3 ?6 u! L3 @2 z3 c9 nelse & Y2 q* k- R! q7 ~
printf("Number %d not found\n",key); </FONT></P>
- ~; [9 z3 G q; u< ><FONT color=#0000ff>return 0;
6 ?0 g0 d$ N. ?" {4 Z9 Z. c} </FONT>
8 I A3 P8 {/ v# e4 c$ `% H
- A9 o1 t2 d$ J4 q</P>
" n5 Z! e5 g; G7 t< ><FONT color=#ff0000>函数名: line </FONT>: A5 q P4 K3 L* e0 f( f% _- h
功 能: 在指定两点间画一直线
# x* B0 O- }. ?' L) s4 s用 法: void far line(int x0, int y0, int x1, int y1); & p; ]9 \; a7 }& d4 t' T) t" _
程序例: </P>
4 q/ K* J6 W8 I' J4 m$ v+ K$ R< ><FONT color=#0000ff>#include <GRAPHICS.H>5 S. l/ D( I( e5 \1 _( X: C( u
#include <STDLIB.H>% T7 x) Q- j! G M8 i: _, G
#include <STDIO.H># H. d/ \/ D8 A+ b
#include <CONIO.H></FONT></P>
n6 ]9 B& q( Z# Z* Y6 }3 t1 q; Z< ><FONT color=#0000ff>int main(void)
5 u d' Y- }' q9 Q% b' z3 [2 y{ 0 l' _# B, m5 D: r/ e! p% _9 M
/* request auto detection */ 9 h+ i# Y5 `9 @5 W
int gdriver = DETECT, gmode, errorcode; , Q9 D' c, {* M
int xmax, ymax; </FONT></P>
9 B2 }3 p1 q' C( {5 z; ~< ><FONT color=#0000ff>/* initialize graphics and local variables */
7 P- [" _+ m# \5 winitgraph(&gdriver, &gmode, ""); </FONT></P>6 X/ V. b* u+ |$ ^0 f! ` g0 R5 i4 Z
< ><FONT color=#0000ff>/* read result of initialization */
2 X* z' L2 c6 E k# Aerrorcode = graphresult(); 9 ]+ S9 v c: a4 X4 \6 O: G* s) d
/* an error occurred */ 8 y% `3 O0 _* `1 n+ V
if (errorcode != grOk)
/ n6 T- m& q- I6 m, L{
2 N& ~8 {- P F4 Bprintf("Graphics error: %s\n",
9 q% f/ {" H- D) Qgrapherrormsg(errorcode));
) O5 `& |& ?) L) v8 u6 P, ^; vprintf(" ress any key to halt:"); + k6 ?1 @) D/ [1 F5 L
getch(); - |; K7 s5 J0 S6 U0 B9 F
exit(1); 9 g# a. D& z* H$ q7 I ^
} </FONT></P>
) V# P" [$ ^0 E6 L, o< ><FONT color=#0000ff>setcolor(getmaxcolor());
9 L7 L. F3 c# ?) M. `, Uxmax = getmaxx(); : ~; J- D( {/ w5 f; N! f1 [
ymax = getmaxy(); </FONT></P>
8 H' D) ? E& U2 v8 ~1 i< ><FONT color=#0000ff>/* draw a diagonal line */
' U' y" c9 T) X8 ?6 T4 M) rline(0, 0, xmax, ymax); </FONT></P>' h' Q2 d/ `3 C0 O1 \
< ><FONT color=#0000ff>/* clean up */
& u' ~$ F, J$ \# e) q; h* C8 ]getch(); / d9 V8 u( H5 m" I6 k& ~
closegraph();
: n/ p" h: y" T6 ^1 ]return 0;
! I0 N( J' O9 s, `} $ m3 p4 B9 k3 B
</FONT># k) @% y/ M6 `9 S
</P>
% X8 o! h0 n) o$ }6 R5 U<P><FONT color=#ff0000>函数名: linerel </FONT>! k- L, t5 l' Y9 ?+ G" W
功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线 & {0 [. T7 t# L
用 法: void far linerel(int dx, int dy);
- s- t, `8 k8 l2 Z* N程序例: </P>8 E& a+ \, P& `9 G4 a4 A/ d! E
<P><FONT color=#0000ff>#include <GRAPHICS.H>
3 c4 _. M3 w0 y+ _/ {, M: M& e#include <STDLIB.H>
. c! P2 U# |% d) n#include <STDIO.H>0 p( s9 t, _1 N; ]' F
#include <CONIO.H></FONT></P>
5 k2 \0 W' @0 w<P><FONT color=#0000ff>int main(void)
8 |0 L, _3 v+ Z8 D( X2 B! S{
3 v- E2 w+ ~! p% e% v/ N! D. w/* request auto detection */
- M2 G' V4 @# [5 m; Y9 l/ [& Hint gdriver = DETECT, gmode, errorcode; 7 u9 s' ~ }7 r9 x0 n9 @+ M
char msg[80]; </FONT></P>& L& f2 C& ^; R X ?
<P><FONT color=#0000ff>/* initialize graphics and local variables */
6 J! ^3 l( U# J$ W) A7 a+ Jinitgraph(&gdriver, &gmode, ""); </FONT></P>
# F0 |7 s% i; t8 i' S<P><FONT color=#0000ff>/* read result of initialization */
. k& y- m, w1 {* z* K& uerrorcode = graphresult();
, |( T: H, o) |% c! P' iif (errorcode != grOk)
, }' J' C& e9 U{
- s: r. Q0 o5 Q8 W/ Qprintf("Graphics error: %s\n",
2 m& J& J' u# G3 P! [, Vgrapherrormsg(errorcode));
8 l/ l; z( `+ Zprintf("Press any key to halt:"); 0 v( V/ Z' l d8 N4 f- B- A
getch(); 6 @$ s( b- S* p' J4 V& q% }: k4 ^
exit(1); " j. f8 Y: a5 R3 u. r e
} </FONT></P>
9 e) m- X, i2 ~0 D4 A, ^<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */
( J, Y; @" S6 E6 @/ F1 S4 Gmoveto(20, 30); </FONT></P>
# F/ c0 X7 r; } r* O& [<P><FONT color=#0000ff>/* create and output a
& k& g4 g- }/ [" N. Qmessage at (20, 30) */
5 l7 M4 r# X" r% ~% Y8 f hsprintf(msg, " (%d, %d)", getx(), gety()); 7 S; _$ s& f) r. t& _$ h
outtextxy(20, 30, msg); </FONT></P>' C# F8 T, ^, p" U+ a5 V
<P><FONT color=#0000ff>/* draw a line to a point a relative
8 C1 [" {; `: I) m/ |distance away from the current , {0 R; \! S3 i; ]+ X
value of C.P. */
8 v7 Y) q) F) j: i9 n% Plinerel(100, 100); </FONT></P>
2 `0 W% x. ^5 I# @) ?2 f<P><FONT color=#0000ff>/* create and output a message at C.P. */
8 F" |8 u! K6 [7 r- Ssprintf(msg, " (%d, %d)", getx(), gety()); 3 S8 V. J ]0 i. s* V
outtext(msg); </FONT></P>; g# s) V5 ]3 E z
<P><FONT color=#0000ff>/* clean up */ & X2 j; ?; d; O( Z0 J
getch();
, T/ i/ e: ]: T) i$ a, i. Pclosegraph();
& t2 p; a" R5 {5 Y; w- j( }- Greturn 0; 2 T, e1 u, I+ T; m
} </FONT>$ y. B+ Y2 F% Z8 B5 v6 a: z4 f
</P>, u% U8 i0 e4 H' f# x1 u# C7 [
<P><FONT color=#ff0000>函数名: localtime</FONT>
- X1 x: D8 w5 O3 m9 M+ j; k; Y功 能: 把日期和时间转变为结构
8 ~( ~* T$ s* r1 [) O5 ]4 e) u用 法: struct tm *localtime(long *clock);
( Y4 r% I# i% d! [程序例: </P>, Q+ O+ N3 {9 e9 \
<P><FONT color=#0000ff>#include <TIME.H>
A( e1 F7 B- }4 ]$ ]#include <STDIO.H>. q5 Y S: B8 G# A0 \: }1 W( B, h
#include <DOS.H></FONT></P>
: b; [6 W6 I d0 U9 l! V; A7 `: }<P><FONT color=#0000ff>int main(void)
5 T4 _9 V) s0 Q) U) ~: I* n{ " a6 g, x" E) P, ?2 F5 q! c; @
time_t timer; . a" z' C) P4 T' E
struct tm *tblock; </FONT></P>
7 y( o: L$ g* N9 ~8 _) a<P><FONT color=#0000ff>/* gets time of day */
$ ]/ j0 x4 e) P4 Q. [0 Atimer = time(NULL); </FONT></P>/ q4 I) x& t# y; k# \' _
<P><FONT color=#0000ff>/* converts date/time to a structure */
' `1 g# V6 ]1 ntblock = localtime(&timer); </FONT></P>
! ?* ?& H4 e- ^<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>
. b/ i b8 Q0 D+ T<P><FONT color=#0000ff>return 0; U8 b" a7 D- M) G; K( _
} - M' j+ V3 P }
" @( s: u% N. [$ E0 Z h. R
. L! R& {; d3 E* [- _</FONT></P># R, [8 i+ k7 f! b: @$ r# [( c
<P><FONT color=#ff0000>函数名: lock </FONT>
! b1 u7 y; b9 v6 g* G T$ Q功 能: 设置文件共享锁 ' K( u" H; G+ D( r
用 法: int lock(int handle, long offset, long length);
$ J% G# ^4 R" L& D- @! {; `) F! m9 N# `2 g程序例: </P>
( Q* I! z$ `+ T7 Q$ ~( U) Q: r/ R% N<P><FONT color=#0000ff>#include <IO.H>
1 F0 l& ^( {# S- N% M#include <FCNTL.H>3 @6 g) V( m3 o w7 L K
#include <SYS\STAT.H>
5 h7 p1 M1 m4 ]& X; H8 n. N/ a#include <PROCESS.H>
1 p i/ j9 ^9 x- D% @#include <SHARE.H>) b; J% {0 w( Q5 \
#include <STDIO.H></FONT></P>
9 ?6 n' _- R6 l3 K4 j$ n<P><FONT color=#0000ff>int main(void) / q; z ~$ v- x: o" E O/ V
{ 8 g" ?' K( L$ M! Z
int handle, status; + M7 O9 f: q x# q; j: L( n
long length; </FONT></P>7 \9 E6 W# N" U
<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */ & U# F( R6 {+ m6 Z
/* file locking to function properly */ </FONT></P>
+ h0 m8 R- @, i- B+ I8 T1 G<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat", 7 ?2 y4 @+ t' I
O_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>
4 z2 ^3 |2 O) Z* ~6 q/ ]<P><FONT color=#0000ff>if (handle < 0) " O5 ]9 @; }6 ~; n9 z
{
' {- p8 r F0 a0 t/ I3 h8 N" q# F# fprintf("sopen failed\n"); 7 e0 o* N- h2 T" _& ` _
exit(1); 3 p3 `# g) m2 m2 [
} </FONT></P>2 d3 z2 X+ {1 k
<P><FONT color=#0000ff>length = filelength(handle);
. U" ] V# G" m" A3 O8 o( mstatus = lock(handle,0L,length/2); </FONT></P>
_1 S5 I1 [: o% f/ M! g<P><FONT color=#0000ff>if (status == 0)
2 b4 m; l$ P! u' D$ J. O7 n. y4 v" t" Hprintf("lock succeeded\n");
: O" e5 l, d& I4 w7 M; e7 Xelse ( B4 y; y4 I6 W7 {; V$ I- w
printf("lock failed\n"); </FONT></P>
2 P( {! W/ F$ z/ V8 @<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>0 q6 z. }" r& F) v; B# j2 V
<P><FONT color=#0000ff>if (status == 0)
' ^# E# ^& _, D" Gprintf("unlock succeeded\n"); 4 y2 E) ?$ G2 y3 e7 q5 Z
else 2 B# M7 a# R- E0 e% g
printf("unlock failed\n"); </FONT></P>
# E9 k! Y& R6 `; V8 r. Z$ q<P><FONT color=#0000ff>close(handle);
5 ^0 @% `7 b7 H( l+ [7 e& Areturn 0;
8 e; A7 y6 O& ?+ u} 2 B4 j# M4 G# J3 Y9 x! w7 P
</FONT>. ? p" s" X* u) g. m9 O
</P>" U( Q- V4 |% {. A @: J' o
<P><FONT color=#ff0000>函数名: log </FONT>+ d5 x ^" V& u2 W
功 能: 对数函数ln(x)
4 } D C7 M: `. t0 d ?! d6 L用 法: double log(double x); 6 x; }; }8 j9 j" }7 ?
程序例: </P>
- p- e# {- W8 [; c* o<P><FONT color=#0000ff>#include <MATH.H>9 R. q% q4 Y6 d* f0 {% @# o
#include <STDIO.H></FONT></P>0 x R! \2 T& E& ^ M- P& f
<P><FONT color=#0000ff>int main(void) % ]5 w U j& |* F7 C2 c6 V; ]
{ % B5 b& o) x0 ?) E X% J5 Q
double result;
( X% C: E8 A$ C- L. pdouble x = 8.6872; </FONT></P>% K, ?/ m- g3 Z. h
<P><FONT color=#0000ff>result = log(x); $ S; x! u- ?6 \/ ?
printf("The natural log of %lf is %lf\n", x, result); </FONT></P>+ O! i* R) L8 T
<P><FONT color=#0000ff>return 0;
6 e) y$ C% J# e+ e, p* J& N; J1 B} 6 A( ~4 @7 @7 K+ D! J ~
9 h: b6 p$ J a, x
</FONT></P>
1 } [8 c# G" J! U<P><FONT color=#ff0000>函数名: log10 </FONT>3 {) \0 y- s5 ~! m; S- `, S7 S
功 能: 对数函数log * i, a% A8 y/ ~
用 法: double log10(double x); 4 d6 B% O8 j3 e3 k/ m0 c" l
程序例: </P>
# R' U+ L% M1 ]& n# {0 z/ B<P><FONT color=#0000ff>#include <MATH.H>8 w+ Q& [2 o8 v# J+ W
#include <STDIO.H></FONT></P>
( {% H, u( z) T/ L8 _<P><FONT color=#0000ff>int main(void)
# C; a9 p* Q5 f0 K{
! c# a- y% {$ r e {) `: Tdouble result; ! ^4 Z4 `0 _7 |0 P$ q% ~
double x = 800.6872; </FONT></P>9 }: s( R0 V2 `/ q0 c
<P><FONT color=#0000ff>result = log10(x); d- [+ l, u6 c, L) A
printf("The common log of %lf is %lf\n", x, result); </FONT></P>
" ?2 {5 Z3 t( F- c% V<P><FONT color=#0000ff>return 0;
* L: H8 C7 s5 c8 ^1 t}
2 V" q( h" }: k$ O, ~/ s4 o' [& A7 l) x. j# m) S
</FONT>
v1 F( ]- S/ T7 [& G4 N7 I4 T( J4 x</P>) d2 i" a5 d4 m
<P><FONT color=#ff0000>函数名: longjump </FONT>
0 z; Z& D) ~ F( A X) B* I2 `功 能: 执行非局部转移
C: a" h0 i( M5 |7 s用 法: void longjump(jmp_buf env, int val);
% L& r* a5 E3 S: T程序例: </P>
' C7 D( i# x8 {; ^6 a0 C<P><FONT color=#0000ff>#include <STDIO.H>' t9 a+ B; _3 u; H q
#include <SETJMP.H>
; S4 [! H- I7 i8 h, K: V7 B" e#include <STDLIB.H></FONT></P># k+ G7 S+ x2 X
<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
9 b1 S- S1 v0 b/ D) N- r5 B0 G<P><FONT color=#0000ff>int main(void)
5 f; U) k ?. v1 M{ </FONT></P>
& |; a. j9 W# N9 ~( Z<P><FONT color=#0000ff>int value; ( J, j7 }2 Q6 M6 |
jmp_buf jumper; </FONT></P>, W; E6 z, p! I
<P><FONT color=#0000ff>value = setjmp(jumper); 6 I Y ]9 P% U2 A$ S% y# y6 N1 X
if (value != 0)
! _, ~; F6 a R{
- w$ _6 l6 D( k1 q5 [- P vprintf("Longjmp with value %d\n", value); ) i' D9 e/ ]6 X9 B; H
exit(value);
, T; d, [" {- U3 p2 {. a0 s}
* T6 n5 t5 U+ t Q- G) aprintf("About to call subroutine ... \n");
+ Y9 N) ~- {& fsubroutine(jumper); </FONT></P>4 [% H; N. }3 P1 l% Y
<P><FONT color=#0000ff>return 0; * q/ o% i" c3 y$ A% ^
} </FONT></P>
! W: N) d1 C4 w* L$ C* I, o6 T6 J<P><FONT color=#0000ff>void subroutine(jmp_buf jumper)
. l* I& C# u& y( g9 H{
! Z& i" Z. I8 dlongjmp(jumper,1);
" N$ q/ J4 V4 z$ [ c# K* [} 1 M8 F7 W! P b: w
0 R7 g1 Q/ N6 S& ?9 p0 [! J</FONT>
9 q _6 _, z" x0 o% F</P>, M( f3 i4 M% v: D8 I
<P><FONT color=#ff0000>函数名: lowvideo</FONT>
" z+ W* {' ?9 R f# A) @7 o功 能: 选择低亮度字符
, s, V1 ?5 q( K7 m用 法: void lowvideo(void);
5 V# [( H7 j0 w! h程序例: </P>% }5 C7 q! m4 ~7 ]0 ^: Q7 ?
<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>2 q$ X. \* V7 `' S* b
<P><FONT color=#0000ff>int main(void)
+ W5 L; d \% k; [& Q; o- C& C{ / x- C1 o, {) A/ N0 `6 ?
clrscr(); </FONT></P>
9 y B) P; e2 d! [<P><FONT color=#0000ff>highvideo();
# ?- K( V$ i! b7 ]4 U$ scprintf("High Intesity Text\r\n");
& r0 E; j# |8 j- Slowvideo(); . Y4 _. Z, u" O3 \1 D: b* u y% f
gotoxy(1,2);
4 u; p6 n. ?8 O. K% Q4 c# _! Qcprintf("Low Intensity Text\r\n"); </FONT></P>
7 ^0 ]+ t7 x& k<P><FONT color=#0000ff>return 0;
4 n, {/ ^7 C! C! f1 ~: U0 Y} / ^& q H0 P1 J; \
, Y+ D+ L9 N( g; p. [1 C
</FONT>
! S5 _( O8 j6 E9 R</P>
H y, T6 ?+ e2 w3 v" @& B, I u w0 d<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>1 J; F) h0 s' S) ]' U6 d% h9 l
功 能: 将无符号长整型数向左循环移位
! y( W' d$ u- }. c& s用 法: unsigned long lrotl(unsigned long lvalue, int count);
, F% Q. I1 d/ u tunsigned long _lrotl(unsigned long lvalue, int count); % e' h7 D1 I. O( B4 ~
程序例: </P>/ W r9 h5 j; L- Q/ y2 {/ r
<P><FONT color=#0000ff>/* lrotl example */
: `, d4 ?2 C5 j# F#include <STDLIB.H>, B+ D- |* t: I% _6 G
#include <STDIO.H></FONT></P>
) f( J* C* E) |. v<P><FONT color=#0000ff>int main(void) 0 {5 a4 u) ^& X: v: l
{ ! K' _5 c4 |6 P' H
unsigned long result;
/ K% x) s: ^" x0 `6 n8 Z, E" W0 ^unsigned long value = 100; </FONT></P>
* M! N* ?" x( v) J<P><FONT color=#0000ff>result = _lrotl(value,1); : N! M. N5 F) E
printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>
# |- O4 o" _; n' j: a<P><FONT color=#0000ff>return 0;
( U0 h! C& F" ~' [}
% \4 s$ p$ K& h6 I# X</FONT>
! \* a+ u: T7 M# j' W# ~</P>
}8 f: Z! x. W6 ~3 ?<P><FONT color=#ff0000>函数名: lsearch </FONT>
" L- j& n5 ]7 n功 能: 线性搜索 & g. H( M5 `3 Z/ x3 a) \+ }+ u
用 法: void *lsearch(const void *key, void *base, size_t *nelem,
/ S% k; L2 [7 ]5 P$ l- j2 ]0 ?1 Wsize_t width, int (*fcmp)(const void *, const void *));
9 C0 F+ e) O3 G! J1 c [程序例: </P>
n* Y& f7 R4 h: B% P1 u<P><FONT color=#0000ff>#include <STDIO.H>
5 H; _! I$ L. o. x; D#include <STDLIB.H></FONT></P>
3 x$ m/ {* V8 T$ T<P><FONT color=#0000ff>int compare(int *x, int *y) 9 d N4 v9 P* |- A1 Q$ E5 P2 A
{ . e8 |& n8 c" R, X- m4 X2 ?3 @
return( *x - *y ); ' _! H+ |8 o% b
} </FONT></P>( X. ]# ~7 f8 g$ r z' p+ E- e* g8 P/ ?
<P><FONT color=#0000ff>int main(void) " u, ~' N& w, @ |- b5 Y
{ 4 K( A6 y. a6 E0 D ]) X
int array[5] = {35, 87, 46, 99, 12}; 5 g+ d; `- H' I8 ]
size_t nelem = 5;
7 u0 c( B" A0 w/ D( k6 Jint key; 0 X% U5 v& v2 m8 {5 Z- D
int *result; </FONT></P>" I% G* ^* c( c8 m* }5 V
<P><FONT color=#0000ff>key = 99;
$ F9 s* W1 t. h! Aresult = lfind(&key, array, &nelem,
& {' g' J N& csizeof(int), (int(*)(const void *,const void *))compare);
' }# V4 j5 {$ l0 [2 Y; G/ iif (result) 2 l2 R) l* P) m9 b
printf("Number %d found\n",key); 7 v( w) ?$ V9 M) ?/ l f9 c0 n
else Z0 S/ o, \" d7 [
printf("Number %d not found\n",key); </FONT></P>" e: q _4 E$ w6 K3 j% j$ [5 ]
<P><FONT color=#0000ff>return 0; & a2 X: j' c; K
}
9 y- N( n1 U6 k- z, f! M6 O: L& u- H( f7 m
</FONT>8 @- W8 w( u2 `' L X' T' Y
</P>
8 V' }& x7 ~. s) W" t9 a<P><FONT color=#ff0000>函数名: lseek </FONT>
+ z# D W" P6 z' r g& f功 能: 移动文件读/写指针
$ y9 u0 ?8 U& G( d- e* G用 法: long lseek(int handle, long offset, int fromwhere); ) L. k" M7 L0 [( d. F( E6 R1 e* Z
程序例: </P>( F3 q2 L/ d& Z' C
<P><FONT color=#0000ff>#include <SYS\STAT.H>* A5 n( B0 i, W& N. F7 @
#include <STRING.H>' B' m5 n9 v5 Q2 O" V, e" y: {+ |
#include <STDIO.H>
; \& k! m( g# t8 j3 `#include <FCNTL.H>
7 J! d- n, C: T. ]1 f; m#include <IO.H></FONT></P>
) y3 \* s/ J- t/ D; l5 j<P><FONT color=#0000ff>int main(void) 0 S( x" C. Y; v1 i
{ ) N+ k" q3 u' @. L2 p) {
int handle;
) C7 w4 ?3 K4 i( Nchar msg[] = "This is a test"; , M3 e! `# K( ~3 \" {: Y# v
char ch; </FONT></P>
7 o0 F7 F: s3 P/ ~<P><FONT color=#0000ff>/* create a file */
3 E( p6 M$ A+ O: hhandle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
: p' ?7 y* P" I' L' ]4 V<P><FONT color=#0000ff>/* write some data to the file */ + \3 w. O1 B* i. q
write(handle, msg, strlen(msg)); </FONT></P>, S3 y% t! @2 ?4 V0 N" _% k
<P><FONT color=#0000ff>/* seek to the begining of the file */
. q! @* D% U' [4 D6 ~4 k) h7 T9 c( N; elseek(handle, 0L, SEEK_SET); </FONT></P>* w: d+ m6 ?1 `% n. k
<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */ , T4 _3 c0 V' N! T& o {
do
2 @- y8 N# H0 m X% @' V( s/ X- i0 ?{ & Y$ i5 x" r: s& u" @
read(handle, &ch, 1); 7 F _7 [: A: q. m: M
printf("%c", ch); 6 D* L# Z7 h1 X) l
} while (!eof(handle)); </FONT></P>* U# X, M' i, Q* I. I* z
<P><FONT color=#0000ff>close(handle);
# o% i+ g( r: a$ lreturn 0; 2 ?; s" x8 t Y9 p/ N9 V) }2 W% ]
}
# _! G' G# k0 Q8 F0 a2 m& }</FONT></P>
! I0 `* C3 Z# m5 c<P align=left><FONT color=#0000ff></FONT> </P> |
zan
|