a8源码
A. 急求一OA协同办公系统源码
你要源码是什么目的呢，如果是想应付一下领导，就去申请一套试用版的oa先安上，现在有很多oa都是先用后付钱的。下次买软件注意别买错了，国内做oa的一共就那么几家而已
B. 这个通达信指标源码有误，请高手帮忙修改调整下，万分感谢....
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))*10;
XVL:=(IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2))); HSL:=(XVL/20)/1.15;
攻击:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
LLJX:=EMA(攻击,3);0,POINTDOT,COLORWHITE;
B1:SUM(LLJX,1),COLORCYAN,COLOR007575; B2:SUM(LLJX,2),COLORCYAN,COLOR007575;
B3:SUM(LLJX,3),COLORCYAN,COLOR007575; B4:SUM(LLJX,4),COLORCYAN,COLOR007575;
B5:SUM(LLJX,5),COLORCYAN,COLOR007575; B6:SUM(LLJX,6),COLORCYAN,COLOR007575;
B7:SUM(LLJX,7),COLORCYAN,COLOR007575; B8:SUM(LLJX,8),COLORCYAN,COLOR007575;
B9:SUM(LLJX,9),COLORCYAN,COLOR007575;
B10:SUM(LLJX,10),COLORCYAN,COLOR007575;
A1:IF(B1>REF(B1,1),B1,DRAWNULL),COLORRED;
A2:IF(B2>REF(B2,1),B2,DRAWNULL),COLORRED;
A3:IF(B3>REF(B3,1),B3,DRAWNULL),COLORRED;
A4:IF(B4>REF(B4,1),B4,DRAWNULL),COLORRED;
A5:IF(B5>REF(B5,1),B5,DRAWNULL),COLORRED;
A6:IF(B6>REF(B6,1),B6,DRAWNULL),COLORRED;
A7:IF(B7>REF(B7,1),B7,DRAWNULL),COLORRED;
A8:IF(B8>REF(B8,1),B8,DRAWNULL),COLORRED;
A9:IF(B9>REF(B9,1),B9,DRAWNULL),COLORRED;
A10:IF(B10>REF(B10,1),B10,DRAWNULL),COLORRED;
C. 通达信金牛判势指标源码和机构震仓指标怎么写，如下图效果
金牛判势主图公式：
DRAWGBK(C>O,RGB(60,0,0),RGB(0,0,0),1,2,1);
DRAWTEXT_FIX(1,0.88,5,0,'~☆~皓天~☆~'),COLORBLUE;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
金牛:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;
金钻趋势:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
金牛2:EMA(金钻趋势,25)COLORCYAN,LINETHICK2;
DRAWBAND(金钻趋势,RGB(55,0,0),金牛2,RGB(0,91,0));
DRAWKLINE(H,O,L,C);
STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,MIN(MIN(OPEN,CLOSE),金钻趋势),2,0),COLORYELLOW;
STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;
DRAWTEXT(XG,L,'▲买入'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;
{DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;}
DRAWTEXT(XG2 AND L<金钻趋势,L,'↖金钻起涨'),COLORMAGENTA;
2机构震仓副图公式：
VAR1:=(CLOSE+HIGH+LOW)/3;
VAR2:=EMA(VAR1,10);
VAR3:=REF(VAR2,1);
绿探底震仓:IF(VAR2,10,DRAWNULL),COLORGREEN,LINETHICK9;
红买: IF(VAR2>VAR3,10,DRAWNULL), COLORRED,LINETHICK9;
蓝卖: IF(VAR2<VAR3,10,DRAWNULL),COLORFFFF00,LINETHICK9;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
上穿买:SMA(RSV,3,1),COLORRED;
下穿卖:SMA(上穿买,3,1),COLORFFFF00;
希望我的回答能使你满意。
D. 通达信社保入场公式源码
社保入场公式
aa:=winner(c+c*15/100)*100;
bb:=winner(c+c*0/100)*100;
cc:=aa-bb;
dd:=(winner(c-c*0.1/100)-winner(c-c*15/100))*100;
ee:=cc<3 and dd<0.5 and o<>l;
a1:=dynainfo(6);
a2:=if(l>a1,0,if(h<a1,1,(a1-l+0.01)/(h-l+0.01)));
a3:=v/winner(l);
a4:=ref(hhv(c,120),1);
a5:=ref(llv(c,120),1);
a6:=100*(c-a5)/(a4-a5);
a7:=a2>0 or a2=1;
a8:=a7 and a3/ref(a3,3)>=3 and a6<80 ;
a9:=ref(a8,1) or ref(a8,2) or ref(a8,3) or ref(a8,4);
a10:=a8 and a9;
a11:=if(filter(a8,3),5,0);
a12:=if(filter(a10,3) or ee,10,0);
进场:a11;
加仓:a12;
社保机构进场日:stickline(a11,0,5,5,0),colorff7700;
社保机构加仓日:stickline(a12,0,15,5,0),colorff00ff;
stickline(a11,0,5,5,0),colorff7700;
stickline(a11,0,5,4.5,0),colorff8800;
stickline(a11,0,5,4,0),colorff9900;
stickline(a11,0,5,3.5,0),colorffaa00;
stickline(a11,0,5,3,0),colorffbb00;
stickline(a11,0,5,2.5,0),colorffcc00;
stickline(a11,0,5,2,0),colorffdd00;
stickline(a11,0,5,1,0),colorffee00;
stickline(a12,0,15,4.5,0),color102099;
stickline(a12,0,15,4,0),color1020aa;
stickline(a12,0,15,3.5,0),color1020bb;
stickline(a12,0,15,3,0),color1020cc;
stickline(a12,0,15,2.5,0),color1020dd;
stickline(a12,0,15,2,0),color1020ee;
stickline(a12,0,15,1,0),color1020ff;
drawtext(a11,8,'进场'),COLORYELLOW;
drawtext(a12,17,'加仓'),COLORWHITE;
股票公式专家团为你解答，希望能帮到你，祝投资顺利。
E. 谁能帮我把我这个通达信的主图指标改成预警指标啊
楼主，这个指标准确度好像不错。验证了一下，还蛮多人喜欢用的。做了一下选股的公式，送给楼主。做成的是选出今天出现那个黄色买入的信号的。楼主自己验证一下。
源码：
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
FILTER(买=1,5);
F. 网页源代码
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0031)http://www.oicq88.com/999/8.htm -->
<HTML><HEAD><TITLE>QQ聊天宝典--人的一生会遇上的四个人</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
type=text/css rel=stylesheet>
<STYLE type=text/css>TD {
FONT-SIZE: 14px; LINE-HEIGHT: 28px
}
</STYLE>
<META content="MSHTML 6.00.6000.16735" name=GENERATOR><BGSOUND balance=0 src=""
volume=0 loop=infinite>
<STYLE>BODY {
SCROLLBAR-FACE-COLOR: #fb7c7c; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; SCROLLBAR-SHADOW-COLOR: #ffffff; SCROLLBAR-3DLIGHT-COLOR: #ffd4d4; SCROLLBAR-ARROW-COLOR: #ffffff; SCROLLBAR-TRACK-COLOR: #ffd4d4; SCROLLBAR-DARKSHADOW-COLOR: #ffffff
}
</STYLE>
<STYLE type=text/css>P {
FONT-SIZE: 9pt
}
TD {
FONT-SIZE: 9pt
}
SELECT {
FONT-SIZE: 9pt
}
A {
FONT-SIZE: 9pt; COLOR: black; TEXT-DECORATION: none
}
A:hover {
COLOR: red; TEXT-DECORATION: underline overline
}
.drop {
FILTER: dropshadow(color=000000, offx=1, offy=1, positive=1)
}
.drop2 {
FILTER: dropshadow(color=FFFFFF, offx=1, offy=1, positive=1)
}
</STYLE>
</HEAD>
<BODY bgProperties=fixed background=QQ聊天宝典--人的一生会遇上的四个人_files/story.jpg>
<SCRIPT language=VBScript>
dim w,t,p,mm,c,mr,dy,tmp,vs:vs=5:dy=1:p=1:mr="<BR><BR><BR>":c="<font color=white><B>|"&mr:Set w = document.body
sub tp
m=mid(t,p,1):if m="" then c=mr
if m="`" then m="":mm=mid(mm,1,len(mm)-1)
if m="<" then av=instr(mid(t,p),">"):m=mid(t,p,av):p=p+av-1
if m="&" then av=instr(mid(t,p),";"):m=mid(t,p,av):p=p+av-1
tmp=100:if m="." then tmp=400 else if m="," then tmp=200 else if m=" " then tmp=200
if w.scrollHeight-w.scrollTop>w.offsetHeight then w.scrollTop=w.scrollTop+int(dy):dy=dy+dy/vs else dy=1
mm=mm&m:w1.innerHTML=mm&c:p=p+1:if p<=len(t)+1 then SetTimeOut "tp",16+tmp else w.scroll="yes"
end sub
sub window_onload()
w.scroll="yes"
w.bgcolor="#A8A8A8"
w.style.cursor="crosshair"
'-------------------
t=w0.innerHTML:tp
end sub
</SCRIPT>
<DIV id=w0 style="DISPLAY: none; WIDTH: 671px; HEIGHT: 2186px">
<TABLE width="90%" align=center border=0>
<TBODY>
<TR>
<TD>
<P align=center><FONT face=华文行楷 color=#990066
size=4>人的一生会遇上的四个人</FONT><FONT face=华文行楷 color=#cc66ff
size=4><B></B></FONT></P>
<P
align=left></P>
<P align=left><FONT face=华文中宋 color=#ff99cc
size=3>
人生就是为了找寻爱的过程，每个人的人生都要找到四个人。</FONT></P>
<P align=left><FONT face=华文中宋 color=#3399ff><FONT
size=2>
</FONT></FONT><FONT face=华文中宋 size=3><FONT
color=#3399ff>第一个是自己,<BR>
第二个是你最爱的人，<BR>
第三个是最爱你的人，<BR>
第四个是共度一生的人.<BR>
首先会遇到你最爱的人，然后体会到爱的感觉；<BR>
因为了解被爱的感觉，所以才能发现最爱你的人；<BR>
当你经历过爱人与被爱，学会了爱，才会知道什么是你需要的，<BR>
也才会找到最适合你，能够相处一辈子的人。<BR>
但很悲哀的，在现实生活中，这三个人通常不是同一个人；<BR>
你最爱的，往往没有选择你；<BR>
最爱你的，往往不是你最爱的；<BR>
而最长久的，偏偏不是你最爱也不是最爱你的，<BR>
只是在最适合的时间出现的那个人。<BR>
你，会是别人生命中的第几个人呢？</FONT><FONT
color=#ff99cc><BR>
</FONT><FONT
color=#3399ff>没有人是故意要变心的，他爱你的时候是真的爱你，<BR>
可是他不爱你的时候也是真的不爱你了，<BR>
他爱你的时候没有办法假装不爱你；<BR>
同样的，他不爱你的时候也没有办法假装爱你
。<BR>
当一个人不爱你要离开你，<BR>
你要问自己还爱不爱他，<BR>
如果你也不爱他了，千万别为了可怜的自尊而不肯离开；<BR>
如果你还爱他，你应该会希望他过得幸福快乐，<BR>
希望他跟真正爱的人在一起，绝不会阻止，<BR>
你要是阻止他得到真正的幸福，就表示你已经不爱他了，<BR>
而如果你不爱他，你又有什么资格指责他变心呢？<BR>
爱不是占有，<BR>
你喜欢月亮，不可能把月亮拿下来放在脸盆里，<BR>
但月亮的光芒仍可照进你的房间。<BR>
换句话说，你爱一个人，也可以用另一种方式拥有，<BR>
让爱人成为生命里的永恒回忆，<BR>
如果你真爱一个人，就要爱他原来的样子—爱他的好，也爱他的坏：<BR>
爱他的优点，也爱他的缺点，<BR>
绝不能因为爱他，就希望他变成自己所希望的样子，<BR>
万一变不成就不爱他了。<BR>
真正爱一个人是无法说出原因的，<BR>
你只知道无论何时何地、心情好坏，你都希望这个人陪着你；<BR>
真正的感情是两人能在最艰苦中相守，也就是没有丝毫要求。<BR>
毕竟，感情必须付出，而不是只想获得；<BR>
分开是一种必然的考验，<BR>
如果你们感情不够稳固，只好认输，<BR>
真爱是不会变成怨恨的。<BR>
两人在谈情说爱的时候，<BR>
最喜欢叫对方发誓，许下承诺我们为什么要对方发誓，<BR>
就是因为我们不相信对方，我们根本不相信情人，<BR>
而这些山盟海誓又很不切实际：<BR>
海枯石烂、地老天荒，都不能改变我对你的爱!<BR>
明知道海不会枯、石不会烂、地不会老、天不会荒；<BR>
就算会，也活不到那时候。<BR>
许下诺言的时候千万注意，不要许下可以实现的诺言，<BR>
最好是承诺做不到的事，<BR>
反正做不到的，随便说说也不要紧，<BR>
请记住：”不可能实现的诺言最动人”<BR>
在爱情里，说的是一套，做的是另一套；<BR>
讲的人不相信，听的人也不相信。<BR>
你呢？找到了第几个？<BR>
茫茫人海中，你遇见了谁？谁又遇见了你？</FONT></FONT></P>
<P align=left> </P>
<P> <FONT color=#ff0000>转给0-4人：你的生活会悄悄起变化</FONT></P>
<P> <FONT color=#ff0000>转给5-9人：生活如你所愿</FONT></P>
<P> <FONT color=#ff0000>转给9-14人：接下来的三个星期你会有惊喜的发现</FONT></P>
<P> <FONT color=#ff0000>转给15人以上：你的梦想终会成真.</FONT> </P>
<P> 这是一个朋友转发给我的信。常常收到类似的让我继续转发的邮件，号称如果这样做了就会怎么样之类，通常我会把自己作为终点，但是这封信打动了我，因为它说："收到了这封信，是因为有人在默默的祝福，因为你也爱你身边的一些人"。带着爱的，一切将如愿以偿。</P>
<P> 这是一封给你送上好运的信，它始于新英格兰。此信的复制由南非教区主教索尔安东尼起草并由维尼乌拉发出，已经绕地球转了十次。现在好运已降临到你身上，只要你照办，将此信复制2O份分别寄给亲朋好友，使它在界各地周转，你将在四天内交到好运，这不是在开玩笑，不需要寄钱，因为幸运是无代价的。</P>
<P>
<B><FONT face=宋体>你看到了吗？我在默默的祝福你。<SPAN lang=EN-US
style="FONT-FAMILY: PMingLiU; mso-bidi-font-family: 宋体">*^_^*</SPAN></FONT><SPAN
style="FONT-FAMILY: PMingLiU; mso-bidi-font-family: 宋体"><FONT
face=PMingLiU>
</FONT></SPAN></B></P></TD></TR></TBODY></TABLE></DIV>
<DIV id=w1></DIV>
<P align=center> </P><BR><BR>
<SCRIPT language=JavaScript>
<!--
if (window.Event)
document.captureEvents(Event.MOUSEUP);
function nocontextmenu()
{
event.cancelBubble = true
event.returnValue = false;
return false;
}
function norightclick(e)
{
if (window.Event)
{
if (e.which == 2 || e.which == 3)
return false;
}
else
if (event.button == 2 || event.button == 3)
{
event.cancelBubble = true
event.returnValue = false;
return false;
}
}
document.oncontextmenu = nocontextmenu; // for IE5+
document.onmousedown = norightclick; // for all others
//-->
</SCRIPT>
</BODY></HTML>
#include<stdio.h>
#include<string.h>
#define F(x, y, z) (((x) & (y)) | ((~x) & (z)))
#define G(x, y, z) (((x) & (z)) | ((y) & (~z)))
#define H(x, y, z) ((x) ^ (y) ^ (z))
#define I(x, y, z) ((y) ^ ((x) | (~z)))
#define RL(x, y) (((x) << (y)) | ((x) >> (32 - (y)))) //x向左循环移y位
#define PP(x) (x<<24)|((x<<8)&0xff0000)|((x>>8)&0xff00)|(x>>24) //将x高低位互换,例如PP(aabbccdd)=ddccbbaa
#define FF(a, b, c, d, x, s, ac) a = b + (RL((a + F(b,c,d) + x + ac),s))
#define GG(a, b, c, d, x, s, ac) a = b + (RL((a + G(b,c,d) + x + ac),s))
#define HH(a, b, c, d, x, s, ac) a = b + (RL((a + H(b,c,d) + x + ac),s))
#define II(a, b, c, d, x, s, ac) a = b + (RL((a + I(b,c,d) + x + ac),s))
unsigned A,B,C,D,a,b,c,d,i,len,flen[2],x[16]; //i临时变量,len文件长,flen[2]为64位二进制表示的文件初始长度
char filename[200]; //文件名
FILE *fp;
void md5(){ //MD5核心算法,供64轮
a=A,b=B,c=C,d=D;
/**//* Round 1 */
FF (a, b, c, d, x[ 0], 7, 0xd76aa478); /**//* 1 */
FF (d, a, b, c, x[ 1], 12, 0xe8c7b756); /**//* 2 */
FF (c, d, a, b, x[ 2], 17, 0x242070db); /**//* 3 */
FF (b, c, d, a, x[ 3], 22, 0xc1bdceee); /**//* 4 */
FF (a, b, c, d, x[ 4], 7, 0xf57c0faf); /**//* 5 */
FF (d, a, b, c, x[ 5], 12, 0x4787c62a); /**//* 6 */
FF (c, d, a, b, x[ 6], 17, 0xa8304613); /**//* 7 */
FF (b, c, d, a, x[ 7], 22, 0xfd469501); /**//* 8 */
FF (a, b, c, d, x[ 8], 7, 0x698098d8); /**//* 9 */
FF (d, a, b, c, x[ 9], 12, 0x8b44f7af); /**//* 10 */
FF (c, d, a, b, x[10], 17, 0xffff5bb1); /**//* 11 */
FF (b, c, d, a, x[11], 22, 0x895cd7be); /**//* 12 */
FF (a, b, c, d, x[12], 7, 0x6b901122); /**//* 13 */
FF (d, a, b, c, x[13], 12, 0xfd987193); /**//* 14 */
FF (c, d, a, b, x[14], 17, 0xa679438e); /**//* 15 */
FF (b, c, d, a, x[15], 22, 0x49b40821); /**//* 16 */
/**//* Round 2 */
GG (a, b, c, d, x[ 1], 5, 0xf61e2562); /**//* 17 */
GG (d, a, b, c, x[ 6], 9, 0xc040b340); /**//* 18 */
GG (c, d, a, b, x[11], 14, 0x265e5a51); /**//* 19 */
GG (b, c, d, a, x[ 0], 20, 0xe9b6c7aa); /**//* 20 */
GG (a, b, c, d, x[ 5], 5, 0xd62f105d); /**//* 21 */
GG (d, a, b, c, x[10], 9, 0x02441453); /**//* 22 */
GG (c, d, a, b, x[15], 14, 0xd8a1e681); /**//* 23 */
GG (b, c, d, a, x[ 4], 20, 0xe7d3fbc8); /**//* 24 */
GG (a, b, c, d, x[ 9], 5, 0x21e1cde6); /**//* 25 */
GG (d, a, b, c, x[14], 9, 0xc33707d6); /**//* 26 */
GG (c, d, a, b, x[ 3], 14, 0xf4d50d87); /**//* 27 */
GG (b, c, d, a, x[ 8], 20, 0x455a14ed); /**//* 28 */
GG (a, b, c, d, x[13], 5, 0xa9e3e905); /**//* 29 */
GG (d, a, b, c, x[ 2], 9, 0xfcefa3f8); /**//* 30 */
GG (c, d, a, b, x[ 7], 14, 0x676f02d9); /**//* 31 */
GG (b, c, d, a, x[12], 20, 0x8d2a4c8a); /**//* 32 */
/**//* Round 3 */
HH (a, b, c, d, x[ 5], 4, 0xfffa3942); /**//* 33 */
HH (d, a, b, c, x[ 8], 11, 0x8771f681); /**//* 34 */
HH (c, d, a, b, x[11], 16, 0x6d9d6122); /**//* 35 */
HH (b, c, d, a, x[14], 23, 0xfde5380c); /**//* 36 */
HH (a, b, c, d, x[ 1], 4, 0xa4beea44); /**//* 37 */
HH (d, a, b, c, x[ 4], 11, 0x4bdecfa9); /**//* 38 */
HH (c, d, a, b, x[ 7], 16, 0xf6bb4b60); /**//* 39 */
HH (b, c, d, a, x[10], 23, 0xbebfbc70); /**//* 40 */
HH (a, b, c, d, x[13], 4, 0x289b7ec6); /**//* 41 */
HH (d, a, b, c, x[ 0], 11, 0xeaa127fa); /**//* 42 */
HH (c, d, a, b, x[ 3], 16, 0xd4ef3085); /**//* 43 */
HH (b, c, d, a, x[ 6], 23, 0x04881d05); /**//* 44 */
HH (a, b, c, d, x[ 9], 4, 0xd9d4d039); /**//* 45 */
HH (d, a, b, c, x[12], 11, 0xe6db99e5); /**//* 46 */
HH (c, d, a, b, x[15], 16, 0x1fa27cf8); /**//* 47 */
HH (b, c, d, a, x[ 2], 23, 0xc4ac5665); /**//* 48 */
/**//* Round 4 */
II (a, b, c, d, x[ 0], 6, 0xf4292244); /**//* 49 */
II (d, a, b, c, x[ 7], 10, 0x432aff97); /**//* 50 */
II (c, d, a, b, x[14], 15, 0xab9423a7); /**//* 51 */
II (b, c, d, a, x[ 5], 21, 0xfc93a039); /**//* 52 */
II (a, b, c, d, x[12], 6, 0x655b59c3); /**//* 53 */
II (d, a, b, c, x[ 3], 10, 0x8f0ccc92); /**//* 54 */
II (c, d, a, b, x[10], 15, 0xffeff47d); /**//* 55 */
II (b, c, d, a, x[ 1], 21, 0x85845dd1); /**//* 56 */
II (a, b, c, d, x[ 8], 6, 0x6fa87e4f); /**//* 57 */
II (d, a, b, c, x[15], 10, 0xfe2ce6e0); /**//* 58 */
II (c, d, a, b, x[ 6], 15, 0xa3014314); /**//* 59 */
II (b, c, d, a, x[13], 21, 0x4e0811a1); /**//* 60 */
II (a, b, c, d, x[ 4], 6, 0xf7537e82); /**//* 61 */
II (d, a, b, c, x[11], 10, 0xbd3af235); /**//* 62 */
II (c, d, a, b, x[ 2], 15, 0x2ad7d2bb); /**//* 63 */
II (b, c, d, a, x[ 9], 21, 0xeb86d391); /**//* 64 */
A += a;
B += b;
C += c;
D += d;
}
main(){
while(1){
printf("Input file:");
gets(filename); //用get函数,避免scanf以空格分割数据,
if (filename[0]==34) filename[strlen(filename)-1]=0,strcpy(filename,filename+1); //支持文件拖曳,但会多出双引号,这里是处理多余的双引号
if (!strcmp(filename,"exit")) exit(0); //输入exit退出
if (!(fp=fopen(filename,"rb"))) {printf("Can not open this file!\n");continue;} //以二进制打开文件
fseek(fp, 0, SEEK_END); //文件指针转到文件末尾
if((len=ftell(fp))==-1) {printf("Sorry! Can not calculate files which larger than 2 GB!\n");fclose(fp);continue;} //ftell函数返回long,最大为2GB,超出返回-1
rewind(fp); //文件指针复位到文件头
A=0x67452301,B=0xefcdab89,C=0x98badcfe,D=0x10325476; //初始化链接变量
flen[1]=len/0x20000000; //flen单位是bit
flen[0]=(len%0x20000000)*8;
memset(x,0,64); //初始化x数组为0
fread(&x,4,16,fp); //以4字节为一组,读取16组数据
for(i=0;i<len/64;i++){ //循环运算直至文件结束
md5();
memset(x,0,64);
fread(&x,4,16,fp);
}
((char*)x)[len%64]=128; //文件结束补1,补0操作,128二进制即10000000
if(len%64>55) md5(),memset(x,0,64);
memcpy(x+14,flen,8); //文件末尾加入原文件的bit长度
md5();
fclose(fp);
printf("MD5 Code:%08x%08x%08x%08x\n",PP(A),PP(B),PP(C),PP(D)); //高低位逆反输出
}
}
H. 请高手，把下列源码转换成通达信可用的
因不知道原公式的出处，故不能比对是否有误。如果方便，请说明。以下是经过修改的公式，通达信可以通过。
=.=================.=
A1:EMA((EMA(CLOSE,1)+EMA(CLOSE,3)+EMA(CLOSE,5))/3,3),COLORRED;
A2:EMA((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA( CLOSE,7))/3,3),COLORRED;
A3:EMA((EMA(CLOSE,5)+EMA(CLOSE,7)+EMA( CLOSE,9))/3,3),COLORRED;
A4:EMA((EMA(CLOSE,7)+EMA(CLOSE,9)+EMA( CLOSE,11))/3,3),COLORRED;
A5:EMA((EMA(CLOSE,9)+EMA(CLOSE,11)+EMA( CLOSE,13))/3,3),COLORRED;
A6:EMA((EMA(CLOSE,11)+EMA(CLOSE,13)+EMA( CLOSE,15))/3,3),COLORRED;
A7:EMA((EMA(CLOSE,13)+EMA(CLOSE,15)+EMA( CLOSE,17))/3,3),COLORRED;
A8:EMA((EMA(CLOSE,15)+EMA(CLOSE,17)+EMA( CLOSE,19))/3,3),COLORRED;
A9:EMA((EMA(CLOSE,17)+EMA(CLOSE,19)+EMA( CLOSE,21))/3,3),COLORYELLOW;
A10:EMA((EMA(CLOSE,19)+EMA(CLOSE,21)+EMA( CLOSE,23))/3,3),COLORYELLOW;
A11:EMA((EMA(CLOSE,21)+EMA(CLOSE,23)+EMA( CLOSE,25))/3,3),COLORYELLOW;
A:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3),COLORYELLOW;
B:=REF(A,1);
DRAWTEXT(A>B,(A+B)/2,'★');
DRAWTEXT(A<=B,(A+B)/2,'☆');
STICKLINE(A>B,A,B,1,0),COLORYELLOW;
STICKLINE(A<=B,A,B,1,1),COLORWHITE;
A15:A-(A1-A*0.997),COLORGREEN;
A16:A-(A2-A),COLORGREEN;
A17:A-(A3-A),COLORGREEN;
A18:A-(A4-A),COLORGREEN;
A19:A-(A5-A),COLORGREEN;
A20:A-(A6-A),COLORGREEN;
A21:A-(A7-A),COLORGREEN;
A22:A-(A8-A),COLORGREEN;
A23:A-(A9-A),COLORGREEN;
A24:A-(A10-A),COLORGREEN;
A25:A-(A11-A*0.997),COLORGREEN;
STICKLINE(OPEN>=CLOSE,OPEN,CLOSE,1,0 ),COLORBLUE;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,1,0 ),COLORMAGENTA;
DRAWLINE(CLOSE>OPEN,OPEN,CLOSE>OPEN,LOW,1),COLORMAGENTA;
DRAWLINE(CLOSE>OPEN,CLOSE,CLOSE>OPEN,HIGH,1),COLORMAGENTA;
DRAWLINE(OPEN>=CLOSE,CLOSE,OPEN>=CLOSE,LOW,1),COLORBLUE;
DRAWLINE(OPEN>=CLOSE,OPEN,OPEN>=CLOSE,HIGH,1),COLORBLUE;
I. 请高手把股票公式源码改写成选股预警公式或是选股公式
ZIG PEAKBARS 未来函数选出的股票你敢买吗？
J. AMD的A8—3500四核处理器为什么鲁大师测试下去是低端处理器
很简单，因为A8等APU重点强化的是其内部集成显卡。在加上，A8属于最新的CPU鲁大师的硬件库里没有他的源代码。运行测试程序的时候很可能是单核在跑，本来相对于普通X86
CPU，APU的CPU部分就不算太好，这一下就整个单核运行。不被认为低端才怪。
你用其他的权威软件测试一下（我用的i3
2100+Z68+GTX560
Ti，测完之后,竟然干掉了i7
920，所以啊，鲁大师就当成愉快了），比如π值运算，国际象棋之类的程序测试下，如果有太大出入，就是你买的是次品或假货。