| N:=10;P:=3;{K线}
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLOR5454FF;
 STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,0),COLORFFFF00;
 STICKLINE(CLOSE>OPEN,HIGH,CLOSE,0.1,0),COLOR5454FF;
 STICKLINE(CLOSE>OPEN,LOW,OPEN,0.1,0),COLOR5454FF;
 STICKLINE(CLOSE<OPEN,HIGH,OPEN,0.1,0),COLORFFFF00;
 STICKLINE(CLOSE<OPEN,LOW,CLOSE,0.1,0),COLORFFFF00;
 STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),CLOSE,OPEN,7,0),COLOR5454FF;
 STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),CLOSE,OPEN,7,0),COLORFFFF00;
 STICKLINE(CLOSE=OPEN AND CLOSE>REF(CLOSE,1),HIGH,LOW,0.1,0),COLOR5454FF;
 STICKLINE(CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),HIGH,LOW,0.1,0),COLORFFFF00;
 {宝塔}
 BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
 DWN:BBI-P*STD(BBI,N),linethick1;
 UPR:BBI+P*STD(BBI,N),linethick1;
 MA5:ma(c,5),COLORFF50FF,linethick2;
 partline(MA5,MA5>=ref(MA5,1),rgb(255,0,0),MA5<ref(MA5,1),rgb(0,250,0)),linethick3;
 var1:=CLOSE>=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var2:=REF(var1,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var3:=REF(var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var4:=REF(var3,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var5:=REF(var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var6:=REF(var5,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var7:=REF(var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var8:=REF(var7,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var9:=REF(var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varA:=REF(var9,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 varB:=REF(varA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varC:=REF(varB,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 varD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varE:=REF(varD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varF:=REF(varE,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var10:=REF(varF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var11:=REF(var10,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var12:=REF(var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var13:=REF(var12,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var14:=REF(var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var15:=REF(var14,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var16:=REF(var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var17:=REF(var16,1) AND CLOSE<REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var18:=REF(var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 var181:=REF(varD OR varE OR varF OR var10 OR var11 OR var12 OR var13 OR
 var14 OR var15 OR var16 OR var17 OR var18,1);
 var19:=var181 AND var1;
 var11A:=REF(var1 OR var2 OR var3 OR var4 OR var5 OR var6 OR var7 OR
 var8 OR var9 OR varA OR varB OR varC,1);
 var1A:=var11A AND varD;
 STICKLINE(var19,L,L-0.1,8,0),COLOR00FFFF;
 STICKLINE(var1A,H,H+0.1,8,0),COLORFF00FF;
 黄底买入:var19,linethick0,COLOR00ffff;
 粉顶卖出:var1A,linethick0,COLORFF50FF;
 红色持股:0,linethick0,COLORRED;
 绿色持币:0,linethick0,COLOR00d900;
 {解盘}
 MA5:=MA(C,5);
 MA10:=MA(C,10);
 MA20:=MA(C,20);
 MA40:=MA(C,40);
 MA60:=MA(C,60);
 MA125:=MA(C,125);
 MA250:=MA(C,250);
 BIAS:=(C-MA20)/MA20*100;
 SHOPEN:=OPEN;
 SHHIGH:=HIGH;
 SHLOW:=LOW;
 SHCLOSE:=CLOSE;
 SHAMOUNT:=AMOUNT;
 SHVOL:=VOL;
 J12:=(HIGH - ((HIGH - LOW) / 3));
 J23:=(LOW + ((HIGH - LOW) / 3));
 t1:=(((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE <= J23),1,0)) > 1);
 t2:=((((CLOSE > J23) AND (CLOSE < J12)) AND (OPEN > J23)) AND (OPEN < J12));
 t3:=((CLOSE >= J12) AND (OPEN <= J23));
 t4:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE > J12));
 t5:=(((OPEN <= J23) AND (CLOSE <= J12)) AND (CLOSE >= J23));
 t6:=((CLOSE <= J23) AND (OPEN >= J12));
 t7:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE < J23));
 t8:=(((OPEN >= J12) AND (CLOSE <= J12)) AND (CLOSE >= J23));
 t9:=(((SHAMOUNT / SHVOL) / 100) > REF(HIGH,1));
 t10:=(((SHAMOUNT / SHVOL) / 100) < REF(LOW,1));
 if DISPSTATUS=2 then begin;
 var1000:='☆';
 if t1>0 then var1000:=var1000+'☆极端行情,在未来的几日内有85%的机会变更方向。';
 if t2>0 then var1000:=var1000+'☆中性行情,多空双方都未能取得当日行情主动性的控制权';
 if t3>0 then var1000:=var1000+'☆爬升行情,整个交易期间都有买方主导。';
 if t4>0 then var1000:=var1000+'☆爬升行情,信息较少,但收盘期间是买方主导,其他未知。';
 if t5>0 then var1000:=var1000+'☆爬升行情,买方把收盘价拉升到开盘价之上,卖方却也主导一段行情,但不知道是谁主导最后的行情。';
 if t6>0 then var1000:=var1000+'☆漂流行情,整个交易期间都有卖方主导。';
 if t7>0 then var1000:=var1000+'☆漂流行情,信息最少,但收盘期间是卖方主导,其他未知。';
 if t8>0 then var1000:=var1000+'☆漂流行情,卖方把收盘价压至到开盘价之下,买方却也主导一段行情,但不知道是谁主导最后的行情。';
 if t9>0 then var1000:=var1000+'☆上涨趋势。';
 if t10>0 then var1000:=var1000+'☆下跌趋势。';
 if MA20>=MA60 AND CROSS(MA40,MA60) then var1000:=var1000+'☆形成季托,待股价回落到20天均线或40天均线时介入,20天均价为:'+MA20+' 。';
 if BIAS>9.5 AND (C-REF(C,1))/REF(C,1)*100<9.8 then var1000:=var1000+'☆短线涨幅过大,有整理要求。';
 if MA20>=MA60 AND H>=MA20 AND L<=MIN(MA40,MA60) AND C>O AND C>REF(C,1) then var1000:=var1000+'☆芙蓉出水,趋势向好。';
 if BIAS<-18 AND (C-REF(C,1))/REF(C,1)*100>-9.8 then var1000:=var1000+'☆股价严重超跌,有爆发要求。';
 if BIAS<-7 AND ALL(CLOSE<OPEN,5) then var1000:=var1000+'☆连收五阴,超跌有反弹要求。';
 if ABS(HIGH-REF(HIGH,1))/HIGH<0.001 then var1000:=var1000+'☆平顶,-该高点有一定阻力。';
 if ABS(LOW-REF(LOW,1))/LOW<0.001 and abs(ref(low,1)-ref(low,2))/ref(low,1)<=0.00 then var1000:=var1000+'☆平底,该低点有一定支撑。';
 if CLOSE=OPEN AND HIGH<>close and low<>close and HIGH/LOW > 1.03 then var1000:=var1000+'☆ 长十字,多空激争 前途未明。';
 if OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018 then var1000:=var1000+'☆ 大阴烛,今日空方有绝对优势。';
 if REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98 then var1000:=var1000+'☆双飞乌鸦,多头力竭,行情走软。';
 if (MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667 then var1000:=var1000+'☆长下影,下档支撑强或空方试探进攻。';
 if (HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667 then var1000:=var1000+'☆长上影,上档阻力大或多方试探进攻。';
 if CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH then var1000:=var1000+'☆垂死十字,在顶部时重要 表强力多头开始疲软。';
 if HIGH=CLOSE AND HIGH<>LOW then var1000:=var1000+'☆光头阳线,今日尾盘多方气盛,行情可能延续到明天。';
 if (HIGH<REF(LOW,1) OR LOW>REF(HIGH,1)) then var1000:=var1000+'☆跳空缺口,当日未补,有与跳空同向进行,上涨欲望强烈,三日内为回补观察期。';
 if LOW=CLOSE AND HIGH<>LOW then var1000:=var1000+'☆赤脚阴线,尾盘空方胜。 注意股价下跌延续至次日。';
 if CLOSE=OPEN AND HIGH<>close and low<>close and high <>close then var1000:=var1000+'☆十字星,警告信号。原趋势停顿或反转,依上下影线长度判后市。';
 if CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018 then var1000:=var1000+'☆大阳烛,上升行情中意味行情剧烈向上攀升;下跌行情中意味行情剧烈向上反弹。';
 IF REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND R
 |