软件名称：[B]超级疯子（主图-短线指标源码）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2012-08-15 04:09:34
软件简介:

1. INPUT:DA(6,1,30),FY(5,0,8),CT(1,0,2),P(0,0,1),N(3,0,10);
    
2. 
    
3. {超级疯子}
    
4. STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,7,1),colorFFFF50;
    
5. STICKLINE((OPEN>=CLOSE),HIGH,OPEN,0,0),colorFFFF50;
    
6. STICKLINE((OPEN>=CLOSE),CLOSE,LOW,0,0),colorFFFF50;
    
7. STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,7,1),color5050FF;
    
8. STICKLINE((CLOSE>=OPEN),CLOSE,HIGH,0,0),color5050FF;
    
9. STICKLINE((CLOSE>=OPEN),LOW,OPEN,0,0),color5050FF;
    
10. X:=(BARSLAST((SYSPARAM(2)=BARPOS))+1);
     
11. NS:=IF((HHV(ABS(((HHV(CLOSE,DA)/LLV(CLOSE,DA))-1)),DA)>(10/100)),3,DA);
     
12. N1:=IF((DATATYPE=2),(NS*48),IF((DATATYPE=3),(NS*16),IF((DATATYPE=4),(NS*8),IF((DATATYPE=5),(NS*4),NS))));
     
13. MM:=IF((((STKTYPE=0) OR (P=0)) OR (VOL=0)),MA(CLOSE,N1),((SUM(AMOUNT,N1)/SUM(VOL,N1))/100));
     
14. M1:=REF(MM,1);
     
15. 买入:=IF(CROSS(CLOSE,M1),M1,0);
     
16. 卖出:=IF(CROSS(M1,CLOSE),M1,0);
     
17. YE:=BARPOS;
     
18. fei用:=(FY/1000);
     
19. DW:=BARSLAST((卖出>0));
     
20. EX10:=HHV((买入>0),(DW+1));
     
21. BJ:=IF((EX10>REF(EX10,1)),买入,0);
     
22. SJ:=IF((EX10<REF(EX10,1)),卖出,0);
     
23. BNN:=BARSLAST((BJ>0));
     
24. CC:=REF(BJ,BNN);
     
25. 盈利:=((SJ*(1-fei用))-(CC*(1+fei用)));
     
26. YL:=SUM(IF((SJ>0),盈利,0),0);
     
27. 每股盈利:YL,LINETHICK0,PRECISION2,colorFFFFFF;
     
28. CN:=SUM(IF(((SJ>0) AND (REF(CC,1)>0)),1,0),0);
     
29. CG:=SUM(IF(((SJ>0) AND (盈利>0)),1,0),0);
     
30. 成功率:((100*CG)/CN),LINETHICK0,PRECISION1,color88FF;
     
31. H1:=HHV(IF((CT=2),成功率,YL),X);
     
32. L1:=LLV(IF((CT=2),成功率,YL),X);
     
33. AH:=H1[DATACOUNT];
     
34. AL:=L1[DATACOUNT];
     
35. AHL:=(AH-AL);
     
36. POLYLINE((CT=2),成功率),color88FF;
     
37. 买入均价:(SUM(BJ,0)/CN),LINETHICK0,PRECISION1,colorFF;
     
38. 年收益:((100*((240*YL)/YE))/买入),LINETHICK0,PRECISION1,colorFF;
     
39. 持股时间:(SUM(IF(((SJ>0) AND (CC>0)),(REF(BNN,1)+1),0),0)/YE),LINETHICK0,PRECISION2,colorFF00FF;
     
40. 交易:CN,LINETHICK0,PRECISION0,colorAAAAAA;
     
41. （次）成功:CG,LINETHICK0,PRECISION0,colorAAAAAA;
     
42. 年交均次:=((240*CN)/YE);
     
43. MON:=SUM(IF((MONTH<>REF(MONTH,1)),1,0),0);
     
44. 上市年:=(MON/12);
     
45. DRAWNUMBER((BJ>0),(LOW*0.97),BJ,2),ALIGN0,colorFF;
     
46. DRAWICON(((BJ>0) AND (CT=1)),(LOW*0.99),4);
     
47. DRAWTEXT(((BJ>0) AND (CT=1)),(LOW*0.95),'★\n 买入'),ALIGN0,colorFFFF;
     
48. STICKLINE(((BJ>0) AND (CT=1)),MM,(MM+0.04),16,1),ALIGN0,colorFFFF;
     
49. STICKLINE(((BJ>0) AND (CT=1)),CLOSE,OPEN,4,0),ALIGN0,colorFFFF;
     
50. DRAWNUMBER((((SJ>0) AND (CT=1)) AND (((盈利/(CC*(1+fei用)))*100)>=0)),(HIGH*1.07),((盈利/(CC*(1+fei用)))*100),1),ALIGN0,colorFF;
     
51. DRAWNUMBER((((SJ>0) AND (CT=1)) AND (((盈利/(CC*(1+fei用)))*100)<0)),(HIGH*1.07),((盈利/(CC*(1+fei用)))*100),1),ALIGN0,colorFFFF;
     
52. DRAWICON(((SJ>0) AND (CT=1)),(HIGH*1.025),5);
     
53. STICKLINE(((SJ>0) AND (CT=1)),SJ,(SJ+0.04),16,1),ALIGN0,colorFF;
     
54. DRAWNUMBER(((SJ>0) AND (CT=1)),(HIGH*1.05),SJ,2),ALIGN0,colorFF00;
     
55. Ｎ波动:(SUM(IF((((SJ>0) AND (CC>0)) AND ((REF(BNN,1)+1)<=N)),(REF(BNN,1)+1),0),0)/YE),LINETHICK0,PRECISION2,colorFF00FF;
     
56. 买价:IF((BJ>0),BJ,0),LINETHICK0,PRECISION2,colorFF;
     
57. 卖价:IF((SJ>0),SJ,0),LINETHICK0,PRECISION2,colorFF00;
     
58. DRAWTEXTEX(CLOSE,1,0,0,(((((((((((((((((('年盈利:'+NUMTOSTR(YL,2))+'元 成功率:')+NUMTOSTR(成功率,1))+'% 年收益:')+NUMTOSTR(年收益,1))+'%')+' 持股时间比:')+NUMTOSTR(持股时间,1))+'\n')+'交易:')+NUMTOSTR(交易,0))+'次 成功:')+NUMTOSTR(CG,0))+'次 年均:')+NUMTOSTR(年交均次,1))+'次 总共:')+NUMTOSTR(YE,0))+'K线')),colorEE5555;
     
59. 临界:=(((CLOSE/M1)-1)*100);
     
60. 增减:=(临界-(100*((REF(CLOSE,1)/REF(M1,1))-1)));
     
61. DRAWTEXTEX(CLOSE,1,630,0,(((((((('当前 信号持续:'+NUMTOSTR(BNN,0))+'(K线)')+' 最高盈利:')+NUMTOSTR(HHV((((HIGH/CC)-1)*100),(BNN+1)),1))+'% 买卖临界点:')+NUMTOSTR(临界,1))+'% 增减:')+NUMTOSTR(IF(((BNN>0) AND (DATATYPE=6)),增减,IF((BNN=0),0,-100)),1))),colorEE5599;
     
62. DRAWTEXT(((SYSPARAM(3)=BARPOS) AND (CT<3)),HIGH,'.'),color1;
     
63. DRAWTEXT(((SYSPARAM(3)=BARPOS) AND (CT<3)),LOW,'.'),color1;
     
64. 参考介入价:MM,LINETHICK0,PRECISION2,colorFFFFFF;
     
65. FUA:=HHV(HIGH,15);
     
66. FUB:=LLV(LOW,15);
     
67. DRAWTEXTEX(CLOSE,1,720,60,(('15日最高价:'+NUMTOSTR(FUA,2))+' ')),ALIGN2,colorFF;
     
68. DRAWTEXTEX(CLOSE,1,840,60,(('15日最低价:'+NUMTOSTR(FUB,2))+' ')),ALIGN2,colorBB0000;
     
69. DRAWTEXTEX(CLOSE,1,950,60,(('参考介入价:'+NUMTOSTR(MM,2))+' ')),ALIGN2,colorEE9999;
     
70. VAR2:=(((CLOSE+HIGH)+LOW)/3);
     
71. VAR33:=EMA(VAR2,10);
     
72. VAR44:=REF(VAR33,1);
     
73. FILLRGN((VAR33>VAR44),VAR33,VAR44),colorFF;
     
74. FILLRGN((VAR33<VAR44),VAR44,VAR33),colorFF0000;

[url=http://www.70822.com/soft/sort013/sort02/down-51735.html]超级疯子（主图-短线指标源码）[/url]