长短支压公式、源码主图指标公式[大智慧公式]

1. DRAWGBK(c>0),color000000;
   
2. DRAWTEXTABS(12,8, '所属板块: '+BKNAME),Color888888;
   
3. DRAWTEXTABS(12,21,'每股收益: '+NUMTOSTRN(FINANCE2(3),2)+'元 '+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),1)+'倍 '+' 每股公积金:'+NUMTOSTRN(FINANCE2(7),2)+'元'),Color888888;
   
4. DRAWTEXTABS(12,34,'总 股 本: '+NUMTOSTRN(FINANCE2(35),2)+' 万股'),Color888888;
   
5. DRAWTEXTABS(12,47,'流通 A股: '+NUMTOSTRN(FINANCE2(37),2)+' 万股'),Color888888;
   
6. {以下设置长支压}
   
7. AA1:=REF(CLOSE,20)=HHV(CLOSE,2*20+1);
   
8. AB1:=FILTER(AA1,20);
   
9. AC1:=BACKSET(AB1,20+1);
   
10. HD:=FILTER(AC1,20);
    
11. AA2:=REF(CLOSE,20)=LLV(CLOSE,2*20+1);
    
12. B2:=FILTER(AA2,20);
    
13. AC2:=BACKSET(B2,20+1);LD:=FILTER(AC2,20);A:=REF(CLOSE,BARSLAST(HD));
    
14. B:=REF(CLOSE,BARSLAST(LD));
    
15. t1:=BARSLAST(HD) and BARSLAST(LD) AND NOT(LD);
    
16. STICKLINE(t1,A,A,6,0),ColorDD8800;STICKLINE(t1,B,B,6,0),Color00AA00;
    
17. {以下设置短支压}
    
18. ST:=(CLOSE/OPEN-1)*100;
    
19. ZF:=(C/REF(C,1)-1)*100;
    
20. SX1:=ST>3 AND ST=HHV(ST,6);
    
21. SX2:=ZF>3 AND ZF=HHV(ZF,6);
    
22. SX3:=ZF>=9 AND CLOSE=HIGH;
    
23. 烧香:=IF(SX1 OR SX2 OR SX3,1,0);
    
24. DYSJ:=BARSLAST(烧香);
    
25. 跟踪:=IF(DYSJ<=13 AND COUNT(C>REF(L,DYSJ),DYSJ)>=DYSJ-1,DYSJ,0);
    
26. 关注:=IF(DYSJ>=4 AND COUNT(C>REF(C,DYSJ),3)>=3,REF(C,DYSJ),REF(L,DYSJ));
    
27. ②:=IF(关注=REF(L,DYSJ),REF(C,DYSJ),REF(L,DYSJ));
    
28. PUU:=BACKSET(DISPSTATUS=2,跟踪);
    
29. 压力:STICKLINE(跟踪,②,关注,10,0),COLOR666666,LAYER7;
    
30. 支撑:STICKLINE(跟踪,关注,②,10,0),COLOR666666,LAYER7;
    
31. {压力:STICKLINE(PUU AND 跟踪,②,关注,10,0),COLOR666666,LAYER7;
    
32. 支撑:STICKLINE(PUU AND 跟踪,关注,②,10,0),COLOR666666,LAYER7;}
    
33. DRAWTEXT(烧香,L,'﹡'),COLOR0000FF,ALIGN1;
    
34. DRAWFLAGTEXT(烧香,LOW,'⊙走上短线平台,注意上下支撑！'),COLOR0000FF;
    
35. {以下设置立体K线};
    
36. STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
    
37. STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
    
38. STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
    
39. STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
    
40. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLORff7700;
    
41. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff9900;
    
42. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORffbb00;
    
43. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffcc00;
    
44. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffdd00;
    
45. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffee00;
    
46. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.5,0 ),COLORffFF00;
    
47. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000055;
    
48. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000066;
    
49. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000077;
    
50. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000099;
    
51. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000bb;
    
52. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000dd;
    
53. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0) ,COLOR0000ff;
    
54. var9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
    
55. stickline(var9Q,c,(o+c)/2,8,0),color000055;
    
56. stickline(var9Q,c,(o+c)/2,7,0),color000066;
    
57. stickline(var9Q,c,(o+c)/2,6,0),color000077;
    
58. stickline(var9Q,c,(o+c)/2,5,0),color000099;
    
59. stickline(var9Q,c,(o+c)/2,4,0),color0000bb;
    
60. stickline(var9Q,c,(o+c)/2,3,0),color0000dd;
    
61. stickline(var9Q,c,(o+c)/2,1.5,0),color0000ff;
    
62. varaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
    
63. stickline(varaQ,c,(o+c)/2,8,0),colorff11ff;
    
64. stickline(varaQ,c,(o+c)/2,7,0),colorff33ff;
    
65. stickline(varaQ,c,(o+c)/2,6,0),colorff55ff;
    
66. stickline(varaQ,c,(o+c)/2,5,0),colorff77ff;
    
67. stickline(varaQ,c,(o+c)/2,4,0),colorff99ff;
    
68. stickline(varaQ,c,(o+c)/2,3,0),colorffbbff;
    
69. stickline(varaQ,c,(o+c)/2,1.5,0),colorffddff;
    
70. varbQ:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
    
71. stickline(varbQ,c,(o+c)/2,8,0),color333333;
    
72. stickline(varbQ,c,(o+c)/2,7,0),color555555;
    
73. stickline(varbQ,c,(o+c)/2,6,0),color777777;
    
74. stickline(varbQ,c,(o+c)/2,5,0),color999999;
    
75. stickline(varbQ,c,(o+c)/2,4,0),colorbbbbbb;
    
76. stickline(varbQ,c,(o+c)/2,3,0),colordddddd;
    
77. stickline(varbQ,c,(o+c)/2,1.5,0),colorffffff;
    
78. varcQ:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
    
79. stickline(varcQ,o,(o+c)/2,8,0),color003300;
    
80. stickline(varcQ,o,(o+c)/2,7,0),color005500;
    
81. stickline(varcQ,o,(o+c)/2,6,0),color007700;
    
82. stickline(varcQ,o,(o+c)/2,5,0),color009900;
    
83. stickline(varcQ,o,(o+c)/2,4,0),color00bb00;
    
84. stickline(varcQ,o,(o+c)/2,3,0),color00dd00;
    
85. stickline(varcQ,o,(o+c)/2,1.5,0),color00ff00;
    
86. vardQ:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
    
87. stickline(vardQ,o,(o+c)/2,8,0),colorff1100;
    
88. stickline(vardQ,o,(o+c)/2,7,0),colorff3300;
    
89. stickline(vardQ,o,(o+c)/2,6,0),colorff5500;
    
90. stickline(vardQ,o,(o+c)/2,5,0),colorff7700;
    
91. stickline(vardQ,o,(o+c)/2,4,0),colorff9900;
    
92. stickline(vardQ,o,(o+c)/2,3,0),colorffbb00;
    
93. stickline(vardQ,o,(o+c)/2,1.5,0),colorffdd00;

复制代码

下载 (363.99 KB)

2019-1-3 14:15