★★★一目了然的量柱主图(通达信，难得一见)★★★

今非昔比

调整参数有4种显示模式，方便大家各取所需！新手上路，万望学长多加分助学




{参数 K0： 最小=0 ,最大=3 ,缺省=0}
YLZC:=IF(CLOSE=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(VOL+0.01)/100);
阻价:=IF(CLOSE=INDEXC,YLZC+INDEXC-INDEXL,YLZC+(CLOSE-LOW)),NODRAW;
支价:=IF(CLOSE=INDEXC,INDEXL+INDEXC-YLZC,LOW+(CLOSE-YLZC)),NODRAW;
今压:=REF(阻价,1),NODRAW,COLORGREEN;
今撑:=REF(支价,1),NODRAW;
最高:=CONST(HHV(H,125));
最低:=CONST(LLV(L,125));
RCC:=最高*0.9-(最高-最低);
RHL:=RCC;
HLMAX:=最高;
HLMIN:=最低;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
X:=21;
TTY:=H;
AAT:=REF(TTY,X)=HHV(TTY,2*X+1);
BBT:=FILTER(AAT,X);
CCT:=BACKSET(BBT,X+1);
HD10T:=FILTER(CCT,X);
AA1T:=REF(TTY,X)=LLV(TTY,2*X+1);
BB1T:=FILTER(AA1T,X);
CC1T:=BACKSET(BB1T,X+1);
LD10T:=FILTER(CC1T,X);
前期高位:=REF(H,BARSLAST(HD10T)),COLORBLUE,LINETHICK0;
前期低位:=REF(L,BARSLAST(LD10T)),COLORRED,LINETHICK0;
T10T:=BARSLAST(HD10T) AND BARSLAST(LD10T) AND NOT(LD10T);
STICKLINE(T10T AND K0=0,前期高位,前期高位,4,0),COLORBLUE;
STICKLINE(T10T AND K0=0,前期低位,前期低位,4,0),COLORRED;
WJ:=IF(C>200,6.8,6);
DIF:=IF(K0=2,EMA(CLOSE,12) - EMA(CLOSE,26),DRAWNULL);
DEA:=IF(K0=2,EMA(DIF,9),DRAWNULL);
MACD:=IF(K0=2,2*(DIF-DEA)+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,DRAWNULL),COLORSTICK;
DRAWBAND(((IF(K0=1 OR K0=2,90,DRAWNULL)-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,RGB(60,60,60),((IF(K0=1 OR K0=2,10,DRAWNULL)-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,RGB(00,00,00));
DRAWBAND(MACD,RGB(155,50,10),((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,RGB(10,155,50));
DIF+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ;
DEA+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ;
DRAWBAND(EMA(C,3),RGB(255,00,00),EMA(C,21),RGB(00,255,00));
黄金线:=EMA(CLOSE,21),COLOR00FFFF;
导火线:=EMA(CLOSE,3);
DRAWBAND(导火线,RGB(150,150,150),黄金线,RGB(00,255,00));
DRAWBAND(EMA(CLOSE,5),RGB(180,00,00),黄金线,RGB(00,200,00));
DRAWBAND(EMA(CLOSE,10),RGB(150,00,00),黄金线,RGB(00,150,00));
EMA(CLOSE,3),COLORFFFFFF;
EMA(CLOSE,21),COLOR00FFFF,LINETHICK2;
AR:=(2*(C+L)/2+REF((C+L)/2,1))/3;
BR:=(7*(C+L)/2+6*REF((C+L)/2,1)+5*REF((C+L)/2,2)
+4*REF((C+L)/2,3)+3*REF((C+L)/2,4)
+2*REF((C+L)/2,5)+REF((C+L)/2,6))/28;
AAR:=(AR+(((C+L)/2-STD((C+L)/2,2))+3*(AR+0.3*8)/2)/4)/2;
BBR:=(BR+(((C+L)/2-STD((C+L)/2,2))+3*(AR+0.3*8)/2)/4)/2;
寻底线:=IF(((AAR-BBR)/AAR<0.0001),黄金线, 黄金线+黄金线*0.02), COLORBB0000,LINETHICK2;
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
RRRSV:=SMA(下档线,3,1);
KKK:=SMA(RRRSV,3,1);
DDD:=((3 * RRRSV) - (2 * KKK));
JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
RSV24:=SMA(JJ12,3,1);
K24:=SMA(RSV24,3,1);
D24:=((3 * RSV24) - (2 * K24));
压力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF,LINETHICK1;
压力位:=IF(ISLASTBAR,压力2,DRAWNULL),COLORFFFFFF;
STICKLINE(ISLASTBAR ,压力位,压力位,50,1),LINETHICK3,COLORFFFFFF;
底部:=LLV(HIGH,30),COLOR00FF00;
底部位:=IF(ISLASTBAR,底部,DRAWNULL),COLOR00FF00;
STICKLINE(ISLASTBAR ,底部位,底部位,30,1),LINETHICK3,COLOR00FF00;
DRAWKLINE(H,O,L,C);
三日不破:=MIN(MIN(L,REF(L,1)),REF(L,2))>=REF(L,3);
三日量缩:=(MAX(MAX(V,REF(V,1)),REF(V,2))<REF(V,3));
三日价涨A:=C>=REF(C,1);
三日价涨B:=C<REF(C,1);
三日价涨C:=MIN(MIN(C,REF(C,1)),REF(C,2))>=REF(L,3);
缩倍柱:=(VOL*1.95<=REF(VOL,1));
百日低量:=(VOL=LLV(VOL,100));
倍量柱:=C>REF(C,1)*1.04 AND (VOL>=1.9*REF(VOL,1));
四日前倍量柱:=(REF(VOL,3)>1.9*REF(VOL,4));
四日前高量柱:=(REF(VOL,3)>=REF(VOL,4) AND REF(VOL,3)<1.9*REF(VOL,4) AND 三日量缩);
前三引用不成立:=COUNT(REF(四日前倍量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0 AND COUNT(REF(四日前高量柱,1) AND (REF(三日不破,1) OR REF(三日价涨C,1)),3)=0;
倍量黄金柱:=四日前倍量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
高量黄金柱:=四日前高量柱 AND 三日量缩 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
黄金柱:=倍量黄金柱 OR 高量黄金柱;
次倍量黄金柱:=NOT(黄金柱) AND 四日前倍量柱 AND 三日量缩 AND 三日不破 AND 三日价涨B AND 前三引用不成立;
次高量黄金柱:=NOT(黄金柱) AND 四日前高量柱 AND 三日量缩 AND 三日不破 AND 三日价涨B AND 前三引用不成立;
次黄金柱:=次倍量黄金柱 OR 次高量黄金柱;
准倍量黄金柱:=NOT(黄金柱 OR 次黄金柱) AND 四日前倍量柱 AND ((三日量缩 AND 三日价涨C) OR (COUNT(倍量柱,3)>=1 AND 三日不破)) AND 前三引用不成立;
准高量黄金柱:=NOT(黄金柱 OR 次黄金柱) AND 四日前高量柱 AND (三日量缩 AND 三日价涨C) AND 前三引用不成立;
准黄金柱:=准倍量黄金柱 OR 准高量黄金柱;
倍量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱) AND 四日前倍量柱 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
高量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱) AND 四日前高量柱 AND 三日不破 AND 三日价涨A AND 前三引用不成立;
将军柱:=倍量将军柱 OR 高量将军柱;
次倍量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱 OR 将军柱) AND 四日前倍量柱 AND 三日不破 AND 三日价涨B AND 前三引用不成立;
次高量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱 OR 将军柱) AND 四日前高量柱 AND 三日不破 AND 三日价涨B AND 前三引用不成立;
次将军柱:=次倍量将军柱 OR 次高量将军柱;
准倍量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱 OR 将军柱 OR 次将军柱) AND 四日前倍量柱 AND 三日价涨C AND 前三引用不成立;
准高量将军柱:=NOT(黄金柱 OR 次黄金柱 OR 准黄金柱 OR 将军柱 OR 次将军柱) AND 四日前高量柱 AND 三日价涨C AND 前三引用不成立;
准将军柱:=准倍量将军柱 OR 准高量将军柱;
BACKSET100:=BACKSET(黄金柱 OR 次黄金柱 OR 准黄金柱 OR 将军柱 OR 次将军柱 OR 准将军柱,4);
FILTER100:=FILTER(BACKSET100,3);
BACKSET101:=BACKSET(黄金柱,4);
FILTER101:=FILTER(BACKSET101,3);
BACKSET102:=BACKSET(次黄金柱,4);
FILTER102:=FILTER(BACKSET102,3);
BACKSET103:=BACKSET(准黄金柱,4);
FILTER103:=FILTER(BACKSET103,3);
BACKSET104:=BACKSET(将军柱,4);
FILTER104:=FILTER(BACKSET104,3);
BACKSET105:=BACKSET(次将军柱,4);
FILTER105:=FILTER(BACKSET105,3);
BACKSET106:=BACKSET(准将军柱,4);
FILTER106:=FILTER(BACKSET106,3);
DRAWTEXT(FILTER101,LOW*0.986,'↖黄金柱'),COLORYELLOW;
STICKLINE(FILTER101,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(FILTER102,LOW*0.986,'↖次黄'),COLORYELLOW;
STICKLINE(FILTER102,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(FILTER103,LOW*0.986,'↖准黄'),COLORFF00FF;
STICKLINE(FILTER103,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(FILTER104,LOW*0.986,'↖将军柱'),COLORRED;
STICKLINE(FILTER104,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(FILTER105,LOW*0.986,'↖次将'),COLORFF00FF;
STICKLINE(FILTER105,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(FILTER106,LOW*0.986,'↖准将'),COLORFF00FF;
STICKLINE(FILTER106,OPEN,CLOSE,2.5,0),COLORYELLOW;
立桩量:=VOL=HHV(VOL,40) AND VOL>1.9*REF(VOL,1);
立桩量三日突破:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0)));
立桩量三日不破:=BARSLAST(立桩量)=3 AND REF(LOW,3)<=MIN(MIN(C,REF(C,1)),REF(C,2));
BACKSET300:=BACKSET(立桩量三日不破,4);
BACKSET301:=BACKSET(立桩量三日突破,4);
立桩量成立:=FILTER(BACKSET300,3) AND BACKSET301 AND 立桩量;
DRAWTEXT(立桩量成立,HIGH,'←立柱'),COLORGREEN;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
MA120:=MA(CLOSE,120);
MA240:=MA(CLOSE,240);
AA1:=BARSLAST(MA60>MA30 AND (MA30=MA10 OR MA30>MA10));
BB1:=REF(COUNT(C<MA60,AA1)=AA1,1);
CC1:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3;
芙蓉出水:=BB1 AND CC1;
DRAWTEXT(芙蓉出水,H+0.3,'芙蓉出水'),COLORFF00FF;
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
ZJ:=AMOUNT/10000;
TM:=V-MA(V,10);
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
DRAWTEXT(一穿三,L-0.012,'一穿三'),COLORFF00FF;
STICKLINE(一穿三,OPEN,CLOSE,2,0),COLORFF00FF;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.95999998),'大胆搏 '),COLOR00FFFF;
WN:=IF(C>200,2.3,3);
WO:=IF(K0>0 AND  K0<3,"引AAA.O1#WEEK"/5*3+RCC/WN,DRAWNULL);
WC:=IF(K0>0 AND  K0<3,"引AAA.C1#WEEK"/5*3+RCC/WN,DRAWNULL);
WH:=IF(K0>0 AND  K0<3,"引AAA.H1#WEEK"/5*3+RCC/WN,DRAWNULL);
WL:=IF(K0>0 AND  K0<3,"引AAA.L1#WEEK"/5*3+RCC/WN,DRAWNULL);
DRAWKLINE(WH,WO,WL,WC);
{IF(K0<3 AND K0>0,((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,DRAWNULL),COLORCCCCCC,LINETHICK1;}
VARA2:=LLV(MA(LOW,3),3);
VARA3:=HHV(MA(HIGH,3),3);
K:=EMA((CLOSE-VARA2)/(VARA3-VARA2)*100,4),COLORFF00FF,LINETHICK2;
D:=EMA(0.667*REF(K,1)+0.333*K,2),COLORFFFFFF;
J:=3*K-2*D;
IF(K0=1 , ((K-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,DRAWNULL),COLORFFF111;
IF(K0=1, ((D-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,DRAWNULL),COLOR00FF00;
IF(K0=1 , ((J-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*WJ,DRAWNULL),COLORFF1111;
Z_1:=C-REF(C,1);
空:=EMA(EMA(Z_1,6),6)/EMA(EMA(ABS(Z_1),6),6),LINETHICK1,COLOR00FF00;
多:=(空*2-FORCAST(空,9)),LINETHICK1,COLORFF59FF;
{警报}
J1:=IF(多<=空,多,DRAWNULL);
J2:=IF(多<=空,多,REF(J1,1));
J3:=IF(多<=空,多,REF(J2,1));
J4:=IF(多<=空,多,REF(J3,1));
J5:=IF(多<=空,多,REF(J4,1));
J6:=IF(多<=空,多,REF(J5,1));
J7:=IF(多<=空,多,REF(J6,1));
J8:=IF(多<=空,多,REF(J7,1));
J9:=IF(多<=空,多,REF(J8,1));
J10:=IF(多<=空,多,REF(J9,1));
J11:=IF(多<=空,多,REF(J10,1));
J12:=IF(多<=空,多,REF(J11,1));
J13:=IF(多<=空,多,REF(J12,1));
J14:=IF(多<=空,多,REF(J13,1));
J15:=IF(多<=空,多,REF(J14,1));
JJ_1:=IF(多<=空,多,REF(J15,1));
JJ1:=IF(多>空,空,DRAWNULL);
JJ2:=IF(多>空,空,REF(JJ1,1));
JJ3:=IF(多>空,空,REF(JJ2,1));
JJ4:=IF(多>空,空,REF(JJ3,1));
JJ5:=IF(多>空,空,REF(JJ4,1));
JJ6:=IF(多>空,空,REF(JJ5,1));
JJ7:=IF(多>空,空,REF(JJ6,1));
JJ8:=IF(多>空,空,REF(JJ7,1));
JJ9:=IF(多>空,空,REF(JJ8,1));
JJ10:=IF(多>空,空,REF(JJ9,1));
JJ11:=IF(多>空,空,REF(JJ10,1));
JJ122:=IF(多>空,空,REF(JJ11,1));
JJ13:=IF(多>空,空,REF(JJ122,1));
JJ14:=IF(多>空,空,REF(JJ13,1));
JJ15:=IF(多>空,空,REF(JJ14,1));
JJ_2:=IF(多>空,空,REF(JJ15,1));
K11:=IF(多>空,1,IF(多<空,-1,0));
KJ1:=IF(K11!=0,K11,DRAWNULL);
KJ2:=IF(K11!=0,K11,REF(KJ1,1));
KJ3:=IF(K11!=0,K11,REF(KJ2,1));
KJ4:=IF(K11!=0,K11,REF(KJ3,1));
KJ5:=IF(K11!=0,K11,REF(KJ4,1));
KJ6:=IF(K11!=0,K11,REF(KJ5,1));
KJ7:=IF(K11!=0,K11,REF(KJ6,1));
KJ8:=IF(K11!=0,K11,REF(KJ7,1));
KJ9:=IF(K11!=0,K11,REF(KJ8,1));
KJ10:=IF(K11!=0,K11,REF(KJ9,1));
KJ11:=IF(K11!=0,K11,REF(KJ10,1));
KJ12:=IF(K11!=0,K11,REF(KJ11,1));
KJ13:=IF(K11!=0,K11,REF(KJ12,1));
KJ14:=IF(K11!=0,K11,REF(KJ13,1));
KJ15:=IF(K11!=0,K11,REF(KJ14,1));
K22:=IF(K11!=0,K11,REF(KJ15,1));
CK:=CONST(CEILING(C*100/15)/100);
CD:=IF(C<300,9,8);
警报:=IF(K22>0,JJ_1,JJ_2)*CK,COLOR00B4FF;
IF(K0=3, 警报+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLOR00B4FF;
空头1:=IF(K0=3,空*CK+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLOR00FF00;
多头1:=IF(K0=3,多*CK+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLORFF59FF;
RSV:=(C-LLV(L,3))/(HHV(H,3)-LLV(L,3))*5;
AK:=SMA(RSV,2,1);          AD:=SMA(AK,2,1);          AJ:=3*AK-2*AD;         
引力:=((SMA(AJ,2,1)-SMA(AJ,3,1))*CK+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6),COLORSTICK;
STICKLINE(K0=3 AND 引力>=((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*6,((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,引力,3,1),COLORFFFFFF;
STICKLINE(K0=3  AND 引力<((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/9*6,((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,引力,3,1),COLORFF0000;
DRAWBAND(空头1,RGB(0,158,0),多头1,RGB(180,0,0));
空头:IF(K0=3 ,空*CK+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLOR00FF00;
多头:IF(K0=3 ,多*CK+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLORFF59FF;
IF(K0=3 , 警报+((50-HLMN3)*HLMN2/HLMN4+HLMN1)/3+RCC/CD*6,DRAWNULL),COLOR00B4FF;
K1:=IF(K0=0 AND BARSLAST(FILTER104)<200,SUMBARS(FILTER104 ,1),DRAWNULL),NODRAW;
STICKLINE(K1 AND K1>3 AND BARSLAST(FILTER104)<200 ,REF(L,K1-2),REF(L,K1-2),5,0),COLORYELLOW;
STICKLINE(K1 AND K1>3 AND BARSLAST(FILTER104)<200,REF(L,K1-1),REF(L,K1-1),1,0),COLORGREEN;{低位线}
K2:IF( K0=0 AND BARSLAST(FILTER101)<200,SUMBARS(FILTER101 ,1),DRAWNULL),NODRAW;
STICKLINE(K2 AND K2>3 AND BARSLAST(FILTER101)<200,REF(L,K2-2),REF(L,K2-2),4,0),COLORYELLOW;

天一可宝

发表于 2015-12-8 06:23 | 只看该作者 回帖奖励
1208操盘策略
明天有6只新股上市；11日还有新股申购
file:///C:\Users\Administrator\Documents\Tencent Files\1308927453\Image\C2C\U]C6G4`RTAM}`0ONSR01FMS.jpg
昨天大盘处于弱势回升当中，成交量也并未有明显放大，在新一轮打新压力下，场外资金仍然不愿进场，存量资金比较紧张。要发动一波上攻行情并不容易。短期市场将维持箱体震荡态势，上证指数还在3536点--3630点之间运行。行情将在中小创小盘题材个股中展现。
上证指数今天压力位是3558点；支撑位是3506点。
创业板指仍然是股市风向标。今天压力位是2793点；支撑位是2713点。
中小创中小盘高价股，散户不愿做，基金经理可以拉升市值，这可能是年末行情的特点。

光月63

学习学习学习学习学习学习学习学习学习学习。

游阳

一帆行天下 发表于 2011-1-19 10:47
符号修改后，我的可以通过了，要设参数，记得

{参数 K0： 最小=0 ,最大=3 ,缺省=0}

很好，用上了

今非昔比

K0=1时加周K和MACD，k0=2时加周K线和KDJ，k0=3时加交易护航！

琪琦

★★★一目了然的量柱主图(通达信，难得一见)★★★

十一年磨一剑

★★★一目了然的量柱主图(通达信，难得一见)★★★

十一年磨一剑

★★★一目了然的量柱主图(通达信，难得一见)★★★

苗苗团

谢谢分享!学习学习。

龙头老大

难得一见)★★★

黄昏牧人

★★★一目了然的量柱主图(通达

好事一罗罗

难得一见)★★★

江苏扬州读者

★★★一目了然的量柱主图(通达信，难得一见)★★★

十一年磨一剑

★★★一目了然的量柱主图(通达信，难得一见)★★★

骑士

谢谢分享!学习学习。

显客江湖

谢谢分享, 学习中....

轩轩宝宝

谢谢分享!学习学习。