SENSITIVY:=O; TOWERO:=O; TOWERC:=C; FC:=C;
I:=2;
WHILE I<=DATACOUNT DO BEGIN
TOWERO[I]:=TOWERC[I-1];
TOWERC[I]:=FC[I];
SENSITIVY[I]:=TOWERO[I-1];
IF (TOWERC[I-1]-TOWERO[I-1])*(TOWERC[I-1]-SENSITIVY[I-1])<=0 THEN
BEGIN
TOWERO[I]:=TOWERO[I-1];
SENSITIVY[I]:=TOWERC[I-1];
END
ELSE IF BETWEEN(SENSITIVY[I-1],TOWERO[I-1],TOWERC[I-1]) THEN SENSITIVY[I]:=SENSITIVY[I-1];
I:=I+1;
END;
TJ:=(SENSITIVY-TOWERO)*(SENSITIVY-TOWERC)<=0 AND SENSITIVY<>TOWERC;
STICKLINE(TJ,MAX(TOWERO,TOWERC),SENSITIVY,7,1), COLORRED;
STICKLINE(TJ,MIN(TOWERO,TOWERC),SENSITIVY,7,0), COLOR006600;
STICKLINE(SENSITIVY<=MIN(TOWERO,TOWERC) AND NOT(TJ),TOWERO,TOWERC,7,1), COLORRED;
STICKLINE(SENSITIVY>=MAX(TOWERO,TOWERC) AND NOT(TJ),TOWERO,TOWERC,7,0), COLOR006600;
今开盘:TOWERO,LINETHICK0;
今收盘:TOWERC,LINETHICK0;
今敏感:SENSITIVY,LINETHICK0;
三平底翻红: MIN(TOWERO,TOWERC)=REF(MIN(TOWERO,TOWERC),1) AND MIN(TOWERO,TOWERC)=REF(MIN(TOWERO,TOWERC),2) AND MAX(TOWERO,TOWERC)>SENSITIVY,LINETHICK,COLORRED;
三平顶翻绿: MAX(TOWERO,TOWERC)=REF(MAX(TOWERO,TOWERC),1) AND MAX(TOWERO,TOWERC)=REF(MAX(TOWERO,TOWERC),2) AND MIN(TOWERO,TOWERC)
DRAWICON(三平底翻红,MIN(TOWERO,TOWERC)*0.98,4);DRAWICON(三平顶翻绿,MAX(TOWERO,TOWERC)*1.02,5);
均线:MA(C,N),COLORMAGENTA;PARTLINE(均线<=REF(均线,1),均线),COLOR006600;
{BOLL}
MID : MA(CLOSE,M);
UPPER: MID + N1*STD(CLOSE,M);
LOWER: MID - N1*STD(CLOSE,M);
EXPLAIN(C>0 ,' 【宝塔线分析要点】'),COLORYELLOW;
EXPLAIN(C>0 ,'
(1)宝塔线翻红之后,股价后市总要延伸一段上升行情。
(2)宝塔线翻青之后,股价后市总要延伸一段下降行情。
(3)盘局时宝塔线的小翻红,小翻青,可依设定损失点或利润点之大小而决定是否进出。
(4)盘局或高档时宝塔线长青而下,应即获利了结,将手中持股卖出;反之,翻红而上,则是介入时机。
(5)宝塔线翻青下跌一段后突然翻红,须防范为假突破之现象,不可马上抢进,须察3天。'),COLORFFCCCC;
EXPLAIN(C>0,' 【均K线组合规则】'),COLORYELLOW;
EXPLAIN(C>0,'★宝塔线红色且5天均线上行,看多做多(可追多,不惜帮庄家抬轿);'),COLORRED;
EXPLAIN(C>0,'★宝塔线红色但5天均线走平或下行,看多不做多(有筹码的继续与狼共舞,没筹码的观望不进;'),COLORFF00FF;
EXPLAIN(C>0,'★宝塔线绿色且5天均线下行,看空做空(对准接盘杀跌,不计盈亏);'),COLORGREEN;
EXPLAIN(C>0,'★宝塔线绿色但5天均线走平或上行,看空不做空(没筹码的观望不进,有筹码的即使套牢也暂不割肉)。这样操盘心态极佳。'),COLORFF00FF;
EXPLAIN(C>0,' 【宝塔线指标用法】'),COLORYELLOW;
EXPLAIN(C>0,'黄托底买进。'),COLORRED;
EXPLAIN(C>0,'紫压顶卖出。'),COLORGREEN;
谁能给出个正确的