源码
{公称名称: 私募机构短线操盘}
A01:=((CLOSE - LLV(LOW,3)) / (HHV(HIGH,3) - LLV(LOW,3)));
A11:=SMA(A01,2,1);
A21:=SMA(A11,2,1);
A31:=((3 * A11) - (2 * A21));
A41:=((2 * A31) - 0.5);
A51: (CLOSE * (1 - ((A41 - A21) / 15))),SHIFT6,LINETHICK2,colorF5CCEB;
VAR2:=REF(LOW,1);
VAR3:=((SMA(ABS((LOW - VAR2)),13,1) / SMA(MAX((LOW - VAR2),0),13,1)) * 100);
VAR4:=EMA(IF((CLOSE * 1.2),(VAR3 * 13),(VAR3 / 13)),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=((EMA(IF((LOW <= VAR5),((VAR4 + (VAR6 * 2)) / 2),0),3) / 618) * VAR7);
VAR9:=EMA(CLOSE,5);
VAR10:=(((CLOSE - MA(CLOSE,34)) / MA(CLOSE,34)) * (0 - 10));
STICKLINE((VAR9 > REF(VAR9,1)),0,(VAR9 * 0.08),4,1),color10E410;
减仓: (0 - IF((VAR9 > REF(VAR9,1)),VAR9,0)),LINETHICK0,color10E410;
STICKLINE((VAR9 < REF(VAR9,1)),0,(VAR9 * 0.08),4,1),color1010FF;
增仓:IF((VAR9 < REF(VAR9,1)),VAR9,0),LINETHICK0,color1010FF;
STICKLINE((VAR8 > REF(VAR8,1)),0,VAR8,4,1),color10FFFF;
主力进场:IF((VAR8 > REF(VAR8,1)),(VAR8 * 8),0),LINETHICK0,color10FFFF;
STICKLINE((VAR8 < REF(VAR8,1)),0,VAR8,4,1),colorFFF810;
洗盘: (0 - IF((VAR8 < REF(VAR8,1)),(VAR8 * 10),0)),LINETHICK0,colorFFF810;
主力持仓: (LOW * 5),LINETHICK0,colorFF10FF;
增减力度:VAR10,colorFF7676;
AM:=IF((DATE <= 1031231),1,0);
AA:=((CLOSE / REF(CLOSE,1)) >= 1.099);
AB:=(VOL / REF(VOL,1));
预警:IF((((CLOSE / REF(CLOSE,1)) >= 1.07) AND (AB < 1)),33,0),colorFFFF;
目标: (IF((AA AND (AB < 1)),55,0) * AM),LINETHICK2,colorFF;
XL1:=(MA(LOW,2) * 0.96);
XL2:=(MA(LOW,26) * 0.85);
XL3:=(((REF(XL1,1) < XL2) AND (REF(XL1,1) < XL1)) AND (REF(XL1,1) < REF(XL1,2)));
STICKLINE(XL3,0,(VAR8 * 3),4,0),color6EFF;
DRAWTEXT(XL3,(VAR8 * 2),'买'),colorFF;
↑买: DRAWICON(XL3,0,4),colorFF;
A:=SUMBARS(VOL,(CAPITAL * 1));
A2:=(SUM(COST(20),A) / A);
A1:=(SUM(COST(10),A) / A);
A3:=(SUM(COST(30),A) / A);
A4:=(SUM(COST(40),A) / A);
A5:=(SUM(COST(50),A) / A);
E:=(LLV(LOW,250) = LOW);
E1:=BARSLAST(E);
OK: ((((((5 * A1) + (4 * A2)) + (3 * A3)) + (2 * A4)) + A5) / 15),CIRCLEDOT,colorFF;
OK1:STICKLINE((CROSS(CLOSE,OK) AND (E1 >= 40)),OPEN,CLOSE,5,0),colorFFFF;
强弱分界线:50,POINTDOT,LINETHICK2,colorFFFF00;
VAR2:=IF((MONTH < 12),1,1);
VAR3:=((((2 * CLOSE) + HIGH) + LOW) / 4);
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
主力: (EMA((((VAR3 - VAR4) / (VAR5 - VAR4)) * 100),13) * VAR2),LINETHICK4,colorFF;
散户: EMA(((0.667 * REF(主力,1)) + (0.333 * 主力)),2),LINETHICK2,colorFF9933;
DRAWTEXT((CROSS(主力,散户) AND (主力 < 22)),20,'起动'),LINETHICK2,color99FF;
DRAWICON((CROSS(主力,散户) AND (主力 < 22)),25,1);
DRAWTEXT((CROSS(主力,30) AND (散户 < 主力)),40,'上扬 '),LINETHICK2,colorCCFF;
DRAWICON((CROSS(主力,30) AND (散户 < 主力)),35,1);
DRAWTEXT((CROSS(主力,65) AND (散户 < 主力)),55,'冲顶 '),LINETHICK2,color9933FF;
DRAWICON((CROSS(主力,65) AND (散户 < 主力)),70,2);
DRAWTEXT((CROSS(主力,75) AND (散户 < 主力)),67,'小心被套'),LINETHICK2,color9900;
DRAWICON((CROSS(主力,75) AND (散户 < 主力)),80,2);
DRAWTEXT((CROSS(散户,主力) AND (散户 > 75)),80,'头部'),colorFFFF;
DRAWICON((CROSS(散户,主力) AND (散户 > 75)),85,2);
VAR1:=REF(CLOSE,1);
VAR2:=((SMA(MAX((CLOSE - VAR1),0),6,1) / SMA(ABS((CLOSE - VAR1)),6,1)) * 100);
顶部雷达: (CROSS(80,VAR2) * 300),colorFF;
DRAWTEXT(CROSS(80,VAR2),300,'★见顶 '),colorFFFF;
VAR3:=((SMA(MAX((CLOSE - VAR1),0),7,1) / SMA(ABS((CLOSE - VAR1)),7,1)) * 100);
VAR4:=((SMA(MAX((CLOSE - VAR1),0),13,1) / SMA(ABS((CLOSE - VAR1)),13,1)) * 100);
VAR5:=BARSCOUNT(CLOSE);
底部雷达: (((VAR3 < 20) AND (VAR4 < 25)) AND (VAR5 > (50 * 300))),color99FF;
DRAWTEXT(CROSS(100,底部雷达),300,'☆底 '),colorFFFF;
