『主流K线顶底形态』多维决策系统，趋势脉络，形态捕手

gspt1:EMA(CLOSE,8),COLORLIBLUE,LINETHICK1;

gspt2:EMA(CLOSE,25),COLORBLUE,LINETHICK1;

gspt3:EMA(CLOSE,55),COLORLICYAN,LINETHICK1;

IF(EMA(C,8)>=REF(EMA(C,8),1),EMA(C,8),DRAWNULL),COLORRED;

IF(EMA(C,25)>=REF(EMA(C,25),1),EMA(C,25),DRAWNULL),COLORRED;

IF(EMA(C,55)>=REF(EMA(C,55),1),EMA(C,55),DRAWNULL),COLORRED;

gspt4:=EMA(CLOSE,55);

STICKLINE(((C >= gspt4) AND (C >= O)),H,L,0,1),COLOR0000AA;

STICKLINE(((C >= gspt4) AND (C >= O)),O,C,3,0),COLOR0000AA;

STICKLINE(((C >= gspt4) AND (C >= O)),O,C,2.3,0),COLOR0000CC;

STICKLINE(((C >= gspt4) AND (C >= O)),O,C,1.8,0),COLOR0000FF;

STICKLINE(((C >= gspt4) AND (C >= O)),O,C,1,0),COLORCC66FF;

STICKLINE(((C >= gspt4) AND (C <= O)),H,L,0,1),COLOR0000AA;

STICKLINE(((C >= gspt4) AND (C <= O)),O,C,3,0),COLOR0000AA;

STICKLINE(((C >= gspt4) AND (C <= O)),O,C,2.3,0),COLOR0000CC;

STICKLINE(((C >= gspt4) AND (C <= O)),O,C,1.8,0),COLOR0000FF;

STICKLINE(((C >= gspt4) AND (C <= O)),O,C,1,0),COLORCC66FF;

STICKLINE(((C <= gspt4) AND (C >= O)),H,L,0,1),COLORFF6600;

STICKLINE(((C <= gspt4) AND (C >= O)),O,C,3,0),COLORFF6600;

STICKLINE(((C <= gspt4) AND (C >= O)),O,C,2.3,0),COLORFF9900;

STICKLINE(((C <= gspt4) AND (C >= O)),O,C,1.8,0),COLORFFCC00;

STICKLINE(((C <= gspt4) AND (C >= O)),O,C,1,0),COLORFFFF00;

STICKLINE(((C <= gspt4) AND (C <= O)),H,L,0,0),COLORFF6600;

STICKLINE(((C <= gspt4) AND (C <= O)),O,C,3,0),COLORFF6600;

STICKLINE(((C <= gspt4) AND (C <= O)),O,C,2.3,0),COLORFF9900;

STICKLINE(((C <= gspt4) AND (C <= O)),O,C,1.8,0),COLORFFCC00;

STICKLINE(((C <= gspt4) AND (C <= O)),O,C,1,0),COLORFFFF00;

gspt5:=REF(H,8)=HHV(H,2*8+1);

gspt6:=FILTER(gspt5,8);

gspt7:=BACKSET(gspt6,8+1);

gspt8:=FILTER(gspt7,8);

gspt9:=BACKSET(ISLASTBAR,BARSLAST(gspt8)+1);

gspt10:=gspt9>REF(gspt9,1);

DRAWLINE(gspt8,H,gspt10,H,1),COLORBLACK,LINETHICK2;

gspt11:=REF(L,8)=LLV(L,2*8+1);

gspt12:=FILTER(gspt11,8);

gspt13:=BACKSET(gspt12,8+1);

gspt14:=FILTER(gspt13,8);

gspt15:=BACKSET(ISLASTBAR,BARSLAST(gspt14)+1);

gspt16:=gspt15>REF(gspt15,1);

DRAWLINE(gspt14,L,gspt16,L,1),COLORBLACK,LINETHICK2;

gspt17:=INTPART(3*8/5);

gspt18:=REF(H,gspt17)=HHV(H,2*gspt17+1);

gspt19:=FILTER(gspt18,gspt17);

gspt20:=BACKSET(gspt19,gspt17+1);

gspt21:=FILTER(gspt20,gspt17);

gspt22:=BACKSET(ISLASTBAR,BARSLAST(gspt21)+1);

gspt23:=gspt22>REF(gspt22,1);

DRAWLINE(gspt21,H,gspt23,H,1),COLORRED,LINETHICK2;

gspt24:=REF(L,gspt17)=LLV(L,2*gspt17+1);

gspt25:=FILTER(gspt24,gspt17);

gspt26:=BACKSET(gspt25,gspt17+1);

gspt27:=FILTER(gspt26,gspt17);

gspt28:=BACKSET(ISLASTBAR,BARSLAST(gspt27)+1);

gspt29:=gspt28>REF(gspt28,1);

DRAWLINE(gspt27,L,gspt29,L,1),COLORRED,LINETHICK2;

gspt30:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);

gspt31:=CROSS(gspt30,0.9);

gspt32:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);

gspt33:=CROSS(gspt32,0.9);

gspt34:=REF(HIGH,BARSLAST(gspt31));

STICKLINE(CLOSE,REF(HIGH,BARSLAST(gspt31)),REF(HIGH,BARSLAST(gspt31)),0.5,1),COLORBLACK,LINETHICK2;

gspt35:=REF(LOW,BARSLAST(gspt33));

STICKLINE(CLOSE,REF(LOW,BARSLAST(gspt33)),REF(LOW,BARSLAST(gspt33)),0.5,1),COLORBLACK,LINETHICK2;

gspt36:=C;

DRAWTEXT_FIX(1,0.02,0,0,'☆：() ☆'),COLORRED;

gspt37:=REF(gspt36,10)=HHV(gspt36,2*10+1);

gspt38:=FILTER(gspt37,10);

gspt39:=BACKSET(gspt38,10+1);

gspt40:=FILTER(gspt39,10);

gspt41:=REF(gspt36,10)=LLV(gspt36,2*10+1);

gspt42:=FILTER(gspt41,10);

gspt43:=BACKSET(gspt42,10+1);

gspt44:=FILTER(gspt43,10);

gspt45:=REF(C,BARSLAST(gspt40));

gspt46:=REF(C,BARSLAST(gspt44));

gspt47:=BARSLAST(gspt40)< BARSLAST(gspt44) AND NOT(gspt40);

gspt48:=BARSLAST(gspt40)>BARSLAST(gspt44) AND NOT(gspt44);

gspt49:IF(gspt47,gspt45,gspt45),POINTDOT,COLOR0000FF,LINETHICK2;

STICKLINE(gspt47,gspt45,gspt45,9,0),COLOR0000FF,LINETHICK2;

gspt50:IF(gspt48,gspt46,gspt46),COLOR80FF00,POINTDOT,LINETHICK2;

STICKLINE(gspt48,gspt46,gspt46,9,0),COLORFF0000,LINETHICK2;

{分析家公式网http://www.70822.com}

gspt51:=EMA(CLOSE,9)-EMA(CLOSE,21);

gspt52:=EMA(gspt51,6);

STICKLINE(gspt51>gspt52,C,O,1.2,0),COLOR0000FF;

STICKLINE(gspt51>gspt52,C,O,0.6,0),COLORCC66FF;

STICKLINE(gspt51<=gspt52,C,O,1.2,0),COLORFFCC00;

STICKLINE(gspt51<=gspt52,C,O,0.6,0),COLORFFFF00;

黄昏之星:=((((((REF(CLOSE,2) / REF(OPEN,2)) > 1.03) AND (REF(OPEN,1) > REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) / REF(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE < REF(CLOSE,2)));

射击之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 * (MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));

锤头:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH - MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));

吊颈:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH - MIN(OPEN,CLOSE))))));

穿头破脚:=((((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) < 0.96)) AND (CLOSE < REF(OPEN,1))) AND (OPEN > REF(CLOSE,1))) OR (((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) > 1.04)) AND (CLOSE > REF(OPEN,1))) AND (OPEN < REF(CLOSE,1))));

身怀六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04) AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));

乌云盖顶:=(((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) < 0.97)) AND (OPEN > REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1)));

曙光初现:=(((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) > 1.03)) AND (OPEN < REF(CLOSE,1))) AND (CLOSE > REF(CLOSE,1)));

倾盆雨:=(((((REF(CLOSE,1) / REF(OPEN,1)) >= 1.03) AND (OPEN < REF(CLOSE,1))) AND (OPEN > REF(OPEN,1))) AND (CLOSE < REF(OPEN,1)));

DRAWTEXT(倾盆雨,H*1.03,'倾盆大雨'),COLORCYAN;

DRAWTEXT(黄昏之星,H*1.02,'黄昏之星'),COLORCYAN;

DRAWTEXT(射击之星,H*1.03,'射击之星'),COLORCYAN;

DRAWTEXT(锤头,L-L*0.02,'锤头'),COLORGREEN;

DRAWTEXT(吊颈,H*1.03,'吊颈'),COLORCYAN;

DRAWTEXT(穿头破脚,H*1.05,'穿头破脚'),COLORCYAN;

DRAWTEXT(乌云盖顶,H*1.03,'乌云盖顶'),COLORCYAN;

DRAWTEXT(曙光初现,L-L*0.02,'曙光初现'),COLORGREEN;

DRAWTEXT(身怀六甲,L-L*0.02,'身怀六甲'),COLORGREEN;