马斯平 发表于 2012-2-22 15:17
7 n* X7 \+ Y0 S* J0 d% r E楼上说宏程序没用的朋友,是对其不够了解或者没有从事过具体的编程工作。
! _2 @3 \, ?. ^, L即使发出来了,也未必能看得懂, ...
5 E! X( g! G) U; l1 |' c, l IF[#532EQ99.0]GOTO900 系统不同它的宏程序也不相同发,我只懂点FUNUC的,如果用FUNUC的观点为来说你的这个问题它 只是一个在任何时间里给几个宏变量赋值的程序,我不知道这样赋值起什么作用?但同时我觉得它有些不怎么妥当的地方,8 x. o9 ~4 F1 M) r N10 C5 y6 H7 Z6 H #3=3.0 3 a, u+ C2 v: f# b. v#4=3.0 $ k& p& n, b2 S; Y$ J/ \8 f/ l% A#5=5.0 4 R% `' ^5 g3 Z8 x7 l5 c& X/ ]#6=10.0 . p F7 j; p Y' z2 YIF[#20EQ#0]THEN#20=30.01 w& |: q( L1 S #532=0 : ]3 o) F) Z; Y' X* w X. h: F#537=0 # D! a- g0 \, }2 A. ]- ~7 T3 Z#538=0 6 i/ `9 v: |) A9 a; j8 b( c* Z! {' V. I1 W& Z5 J1 } IF[#3LE0]GOTO900 ( M' ? A4 `( u* e- }. E#10=#3011 在FUNUC这是读取当前的日期如今天就是20121210- u: ], K- A& |! ^( W# r #11=#3012 这是时间如现在是184000 7 T2 |5 b: b/ c, s4 y#21=FIX[#11/100]# J& |3 z. G2 g9 U& w: Q* K #22=#21-FIX[#21/100]*100这是指分钟40分 3 U, T- U% v$ e1 U! t/ d6 b#23=[#21-#22]/100 这是指时针18点% T' H. l1 H/ u$ [7 N* h3 k #12=ROUND[#22+#23*60] 这是把18点40分化为分钟72405 v! S/ v2 V. D9 {: H \ #13=0- F- D% A" F. v6 ]. W s IF[#10EQ#535]GOTO100$ g2 ~3 u( N5 `7 E! Y #13=1440% N f# U+ v5 x' q N100 . N, m: k8 ?& _7 Y' m$ o/ z4 HIF[ABS[#12+#13-#536]LT#20]GOTO200 这个可能是为了避免0点和23点59造成的差异 3 x+ f2 s4 W9 y. SN110#533=1- t/ o1 Q6 g% M) @ @4 o! L; O IF[#3GE2]THEN#538=99.0 0 V. `+ j) }$ K) S4 JGOTO500 / l! ~5 ~# ~; ?N200 2 k; q! ^% q3 E$ |1 K#533=#533+1 . }! n* @" b% m1 ]# q: q#534=#534+1 ( ]2 T6 ^$ ?) ^; _IF[#25EQ1]GOTO400 这个就不明白了,程序至终都没有25号我觉得有点不妥& X+ M1 F( E$ M+ @! E IF[#533LE[#3-1]]THEN#538=99 ; e6 a; k( M# B( {, r9 jIF[#533LE#3]GOTO5007 s5 h4 t. V+ Z9 y$ Y IF[#533GT#6]GOTO300 这段应该是不可能能读到的我设了很多时间都读不到这段, u, O: x8 {! a IF[#534EQ[#4-1]]THEN#538=99 ! `: u6 e# E5 `IF[#534GE#4]GOTO500 3 P: ^" b' |- ]) }- I3 T1 uGOTO800 2 {2 [, t$ c5 c0 \" ?% T" WN300 7 O0 y8 q8 u" R6 |% g) |IF[#534EQ[#5-1]]THEN#538=99 - b% p! r ?: l9 L# i7 D4 oIF[#534GE#5]GOTO5005 R2 v T+ M0 n GOTO800 , `. t% _' H; f( C' ?0 qN4004 G9 b8 @$ v5 A #538=99; e) I5 X2 l9 ~/ R- E2 ]: _
}4 F- Y: @0 W4 D4 u- XN500 ; w6 U5 r( s0 |& C#537=99.0 就是为了这些赋值?如果只是为了赋值直接赋不就有了?为什么要搞得这么复杂呢?所以我还是不明白,能否赐教一二 4 U- ~+ {1 t8 p+ y#532=99.0. S3 ~. R. c, u! `% d4 z7 u #534=01 Q ~9 Z6 Z7 K0 @* B7 ^ N8007 s ^6 ~' M: S+ i) d0 c #535=#107 S2 I4 I5 v# K4 [ #536=#12\4 e# d+ [2 ~
|