我把福如泉涌老师的青云直上指标加了点料----新版青云直上


AA1:=MA(CLOSE,20);
AA2:=(CLOSE > MA(CLOSE,5));
AA3:=(MA(CLOSE,5) > MA(CLOSE,10));
AA4:=(CLOSE > MA(CLOSE,10));
AA5:=(MA(CLOSE,5) > MA(CLOSE,20));
AA6:=(CLOSE > MA(CLOSE,20));
AA7:=REF(AA1,1);
AA8:=(AA1 > AA7);
AAX:=(((((IF(AA2,10,(0 - 10)) + IF(AA3,10,(0 - 10))) + IF(AA4,10,(0 - 10))) + IF(AA5,10,(0 - 10))) + IF(AA6,10,(0 - 10))) + IF(AA8,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
T := BARSLAST(DISPSTATUS=1)+1;
IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),colorRED,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。'),colorYELLOW,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。'),colorYELLOW,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(AAX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。'),colorYELLOW,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'随大盘一起下跌，呈明显缩量走势，考虑到大盘风险，减持或清仓。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'放量下跌，走势明显偏弱，离场观望。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AAX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'缩量下跌，走势偏弱，离场观望。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'形态良好，强势明显，量能充足，可以继续持有。'),colorRED,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'上行趋势不变，强势依然，但量能开始转弱，注意风险。'),colorRED,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'走势趋弱，量能不足，减持大部分筹码。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'形态不佳，注意成交量的变化，但目前不适合参与。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(500,20,'趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'有走强迹象，但量能不足，趋势不明，不适合操作。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c<200 and ((((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(500,20,'走势太弱，没有参与价值。'),colorGREEN,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(500,20,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右，'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(500,20,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(500,20,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌，'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(AAX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(500,20,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(1,AAX) AND (V1 >= V2)) THEN
DRAWTEXTREL(500,20,'大盘形态走坏，重仓者可以减去大部分仓位。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (CROSS(1,AAX) AND (V1 < V2)) THEN
DRAWTEXTREL(500,20,'大盘缩量调整，注意风险，短线清仓观望。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(500,20,'大盘走势良好，量能理想，可以继续持有强势股。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (((AAX >= 1) AND (REF(AAX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(500,20,'大盘形态良好，但量能稍显不足，随时准备减仓。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(500,20,'大盘趋势不明，注意成交量变化，目前不适宜进场。'),color8000FF,LINETHICK2,ALIGN1;
IF BARSTATUS=2 and c>200 and (((AAX < 1) AND (REF(AAX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(500,20,'大盘趋势向下，量能萎缩，不适合进场。'),color8000FF,LINETHICK2,ALIGN1;
MA20:=MA(C,20);
MA40:=MA(C,40);
MA60:=MA(C,60);
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;
GP:='  ';
if t9>0  then GP:=GP+'  上涨趋势。';
if t10>0  then GP:=GP+'  下跌趋势。';
if t1>0  then GP:=GP+'  极端行情,在未来的几日内有85%的机会变更方向。';
if t2>0  then GP:=GP+'  中性行情,多空双方都未能取得当日行情主动性的控制权';
if t3>0  then GP:=GP+'  爬升行情,整个交易期间都有买方主导。';
if t4>0  then GP:=GP+'