智能筹码通达信指标公式源码
通达信筹码动态指标公式
通达信筹码动态指标公式HH:=IF(C<REF(C,1) AND H<REF(L,1),REF(L,1),H);LL:=IF(C>REF(C,1) AND L>REF(H,1),REF(H,1),L);穿越筹码:=(WINNER(HH)-WINNER(LL))*100,COLORBLUE;STICKLINE(1,穿越筹码/2,穿越筹码/2,2.5,0),COLORBLUE;STICKLINE(1,穿越筹码/2,穿越筹码/2,3.2,0),COLOR990000;STICKLINE(1,穿越筹码/2,-穿越筹码/2,2.5,0),COLORCC0000;STICKLINE(1,穿越筹码/2,-穿越筹码/2,1.9,0),COLORFF4400;STICKLINE(1,穿越筹码/2,-穿越筹码/2,1.4,0),COLORFF8800;STICKLINE(1,穿越筹码/2,-穿越筹码/2,0.4,0),COLORFFCC00;获利出货码:(PWINNER(1,LL)-WINNER(LL))*100,POINTDOT,COLOR000099;套牢割肉码:(WINNER(HH)-PWINNER(1,HH))*100,POINTDOT,COLORGREEN;STICKLINE(获利出货码>0,0,获利出货码,2.5,0),COLORRED;STICKLINE(获利出货码>0,0,获利出货码,2.8,0)COLOR000066;STICKLINE(获利出货码>0,0,获利出货码,2.3,0)COLOR000077;STICKLINE(获利出货码>0,0,获利出货码,1.7,0)COLOR000099;STICKLINE(获利出货码>0,0,获利出货码,1.2,0)COLOR0000CC;STICKLINE(获利出货码>0,0,获利出货码,0.1,0)COLORCC66FF;STICKLINE(套牢割肉码>0,0,-套牢割肉码,2.5,0),COLORGREEN;STICKLINE(套牢割肉码>0,0,-套牢割肉码,3.2,0),COLOR007700;STICKLINE(套牢割肉码>0,0,-套牢割肉码,2.8,0),COLOR009900;STICKLINE(套牢割肉码>0,0,-套牢割肉码,2.1,0),COLOR00BB00;STICKLINE(套牢割肉码>0,0,-套牢割肉码,1.6,0),COLOR00DD00;STICKLINE(套牢割肉码>0,0,-套牢割肉码,0.4,0),COLOR00FF00;A:=90+(100-90)/2;B:=(100-90)/2;CC:=COST(A);DD:=COST(B);CMJZD:=(CC-DD)/(CC+DD)*100/2;筹码集中度:MA(CMJZD,3),COLORGRAY;筹码集中度升:IF(筹码集中度>=REF(筹码集中度,3),筹码集中度,DRAWNULL),COLORRED,LINETHICK2;筹码集中度降:IF(筹码集中度<REF(筹码集中度,3),筹码集中度,DRAWNULL),COLORFAABEC,LINETHICK2;比例变化:(筹码集中度-REF(筹码集中度,1))/REF(筹码集中度,1)*100,COLORYELLOW,LINETHICK2;拉高加仓:IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)>REF(MA(C,20),3),1,0),COLOR0095FF;拉高加仓1:STICKLINE(拉高加仓>0,0,筹码集中度*0.33,2.7,0),COLOR0095FF;STICKLINE(拉高加仓>0,0,筹码集中度*0.33,2.1,0),COLOR0064FF;STICKLINE(拉高加仓>0,0,筹码集中度*0.33,1.5,0),COLOR0093FF;STICKLINE(拉高加仓>0,0,筹码集中度*0.33,0.9,0),COLOR00C2FF;STICKLINE(拉高加仓>0,0,筹码集中度*0.33,0.3,0),COLOR00FFFF;下跌加仓:IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)<REF(MA(C,20),3),1,0),COLORFF0066;下跌加仓1:STICKLINE(下跌加仓>0,0,筹码集中度*0.33,2.7,0),COLORFF0033;STICKLINE(下跌加仓>0,0,筹码集中度*0.33,2.7,0),COLORFF0066;STICKLINE(下跌加仓>0,0,筹码集中度*0.33,1.5,0),COLORFF0099;STICKLINE(下跌加仓>0,0,筹码集中度*0.33,0.9,0),COLORFF00CC;STICKLINE(下跌加仓>0,0,筹码集中度*0.33,0.3,0),COLORFF00FF;底:0;线1:10,COLORLIBLUE,POINTDOT;线2:20,COLORFF00FF,POINTDOT;VAR02:=LLV(LOW,10);VAR03:=HHV(HIGH,25);支撑线:EMA((CLOSE-VAR02)/(VAR03-VAR02)*4,4),COLORBLUE;VAR01:=支撑线>REF(支撑线,1)AND 支撑线<1.5;MA3:=MA(C,3);VAR04:=HIGH>MA3*1.1;买进:FILTER(CROSS(C,MA3)AND VAR01,5),STICK,LINETHICK3,COLOR0099FF;DRAWICON(FILTER(CROSS(C,MA3)AND VAR01,5),10,35);卖出:FILTER(VAR04 AND 支撑线>3,10),STICK,LINETHICK3,COLORFFAA66;DRAWICON(FILTER(VAR04 AND 支撑线>3,10),1.5,36);VARF:=TROUGHBARS(3,15,1)<4;DRAWTEXT(FILTER(VARF=1,3),5,'庄影'),COLORYELLOW;。
通达信指标公式源码 筹码趋势 副图源码
庄筹:=WINNER(CLOSE)*100,COLORRED, LINETHICK2;
筹码集中度:EMA(庄筹,20),COLORRED, LINETHICK1;
筹码集中警戒线:EMA(筹码集中度,5),COLORYELLOW, LINETHICK1;
筹码集中生命线:EMA(筹码集中警戒线,5),COLORBLUE, LINETHICK1;
STICKLINE(筹码集中度>筹码集中警戒线,筹码集中度,筹码集中警戒线,2,0),COLORRED; STICKLINE(筹码集中度<筹码集中警戒线,筹码集中度,筹码集中警戒线,2,0),COLORGREEN; STICKLINE(筹码集中警戒线>筹码集中生命线,筹码集中警戒线,筹码集中生命线,2,0),COLORFF00FF;
STICKLINE(筹码集中警戒线<筹码集中生命线,筹码集中警戒线,筹码集中生命线,2,0),COLORFFFF00;
A:=CROSS(筹码集中度,筹码集中警戒线);
B:=CROSS(筹码集中警戒线,筹码集中度);
DRAWICON(A,筹码集中度-0.1,10);
DRAWICON(B,筹码集中度+0.1,12);。
通达信Ⅹ-筹码天机公式源码如下
通达信Ⅹ-筹码天机公式源码如下通达信Ⅹ-筹码天机公式源码如下：MA3:="MASS.A";MA5:="MASS.B";量能博弈:=(VOL >= HHV(VOL,10));FV:=VOL;量能博弈平台:((REF((((HIGH + LOW) + (3 * CLOSE)) / 5),BARSLAST(量能博弈)) * MA3) / MA5),LINETHICK0,colorFFFFFF;异动雷达:=SUMBARS((REF(FV,1) - FV),0);上:=REF(HIGH,BARSLAST(量能博弈));下:=REF(LOW,BARSLAST(量能博弈));VAR1:=(INBLOCK('A股板块') OR INBLOCK('B股板块'));量能博弈平台上:REF(HIGH,BARSLAST(量能博弈)),LINETHICK0,colorFFFFFF;量能博弈平台下:REF(LOW,BARSLAST(量能博弈)),LINETHICK0,colorFFFFFF;短线超跌:=(MA(CLOSE,14) * 0.9);黄色博弈:=(量能博弈 AND (异动雷达 > 300));蓝色博弈:=(量能博弈 AND BETWEEN(异动雷达,100,300));青色博弈:=((量能博弈AND (((VOL / CAPITAL) * 100) >= 3)) AND (异动雷达 <= 100));筹码分布:=(量能博弈 AND (异动雷达 >= 100));平台上:=REF(HIGH,BARSLAST(筹码分布));平台下:=REF(LOW,BARSLAST(筹码分布));平台:=REF((((HIGH + LOW) + (3 * CLOSE)) / 5),BARSLAST(筹码分布));A1:=REF((HIGH - ((HIGH - LOW) * 0.1)),BARSLAST(筹码分布));A2:=REF((HIGH - ((HIGH - LOW) * 0.2)),BARSLAST(筹码分布));A3:=REF((HIGH - ((HIGH - LOW) * 0.3)),BARSLAST(筹码分布));A4:=REF((HIGH - ((HIGH - LOW) * 0.4)),BARSLAST(筹码分布));A5:=REF((HIGH - ((HIGH - LOW) * 0.5)),BARSLAST(筹码分布));A6:=REF((HIGH - ((HIGH - LOW) * 0.6)),BARSLAST(筹码分布));A7:=REF((HIGH - ((HIGH - LOW) * 0.7)),BARSLAST(筹码分布));A8:=REF((HIGH - ((HIGH - LOW) * 0.8)),BARSLAST(筹码分布));A9:=REF((HIGH - ((HIGH - LOW) * 0.9)),BARSLAST(筹码分布));DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台上,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A1,'﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A2,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A3,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A4,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A5,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A6,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A7,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A8,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A9,'﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台下,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台上,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A1,'﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A2,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A3,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A4,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A5,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A6,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A7,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A8,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),A9,'﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台下,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND (MA3 = MA5)),平台,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFF;上市首日:=IF((VAR1 = 1),(BARSCOUNT(CLOSE) = 1),0);消失条件:=(COUNT(筹码分布,BARSCOUNT(CLOSE)) = 0);平台上0:=REF(HIGH,BARSLAST(上市首日));平台下0:=REF(LOW,BARSLAST(上市首日));平台0:=REF((((HIGH + LOW) + (3 * CLOSE)) / 5),BARSLAST(上市首日));A10:=REF((HIGH - ((HIGH - LOW) * 0.1)),BARSLAST(上市首日));A20:=REF((HIGH - ((HIGH - LOW) * 0.2)),BARSLAST(上市首日));A30:=REF((HIGH - ((HIGH - LOW) * 0.3)),BARSLAST(上市首日));A40:=REF((HIGH - ((HIGH - LOW) * 0.4)),BARSLAST(上市首日));A50:=REF((HIGH - ((HIGH - LOW) * 0.5)),BARSLAST(上市首日));A60:=REF((HIGH - ((HIGH - LOW) * 0.6)),BARSLAST(上市首日));A70:=REF((HIGH - ((HIGH - LOW) * 0.7)),BARSLAST(上市首日));A80:=REF((HIGH - ((HIGH - LOW) * 0.8)),BARSLAST(上市首日));A90:=REF((HIGH - ((HIGH - LOW) * 0.9)),BARSLAST(上市首日));DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台上0,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A10,'﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A20,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A30,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A40,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A50,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A60,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A70,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A80,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A90,'﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台下0,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台上0,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A10,'﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A20,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A30,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A40,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A50,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A60,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A70,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A80,'﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),A90,'﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFFFF00;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台下0,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台0,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((SYSPARAM(1) = BARPOS) AND 消失条件),平台0,'﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFF;台上:=REF(HIGH,BARSLAST(青色博弈));台下:=REF(LOW,BARSLAST(青色博弈));台:=REF((((HIGH + LOW) + (3 * CLOSE)) / 5),BARSLAST(青色博弈));A11:=REF((HIGH - ((HIGH - LOW) * 0.1)),BARSLAST(青色博弈));A21:=REF((HIGH - ((HIGH - LOW) * 0.2)),BARSLAST(青色博弈));A31:=REF((HIGH - ((HIGH - LOW) * 0.3)),BARSLAST(青色博弈));A41:=REF((HIGH - ((HIGH - LOW) * 0.4)),BARSLAST(青色博弈));A51:=REF((HIGH - ((HIGH - LOW) * 0.5)),BARSLAST(青色博弈));A61:=REF((HIGH - ((HIGH - LOW) * 0.6)),BARSLAST(青色博弈));A71:=REF((HIGH - ((HIGH - LOW) * 0.7)),BARSLAST(青色博弈));A81:=REF((HIGH - ((HIGH - LOW) * 0.8)),BARSLAST(青色博弈));A91:=REF((HIGH - ((HIGH - LOW) * 0.9)),BARSLAST(青色博弈));清晰转换A:=(COUNT(CROSS(台,平台),BARSLAST(青色博弈)) = 0);清晰转换B:=(COUNT(CROSS(平台,台),BARSLAST(青色博弈)) = 0);DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台上,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A11,'﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A21,'﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A31,'﹋﹋﹋﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A41,'﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A51,'﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A61,'﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A71,'﹋﹋﹋﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A81,'﹋﹋﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A91,'﹋'),ALIGN2,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台下,'﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台上,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A11,'﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A21,'﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A31,'﹋﹋﹋﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A41,'﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A51,'﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A61,'﹋﹋﹋﹋﹋﹋﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A71,'﹋﹋﹋﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A81,'﹋﹋﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),A91,'﹋'),ALIGN1,colorFF00;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台下,'﹌﹌﹌'),ALIGN1,colorFF;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台,'﹌﹌﹌﹌﹌﹌'),ALIGN2,colorFF;DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 清晰转换A) AND 清晰转换B) AND (MA3 = MA5)),台,'﹌﹌﹌﹌﹌﹌'),ALIGN1,colorFF;现象:=((("CMFB.X1" OR "CMFB.X2") OR "CMFB.X3") OR "CMFB.X4");DRAWICON(((现象 AND BETWEEN(CLOSE,平台下,平台)) AND (MA3 = MA5)),LOW,1);EXPLAIN((现象AND BETWEEN(CLOSE,平台下,平台)),'主仓成本下限\n'),colorFFFF;DRAWICON(((现象 AND BETWEEN(CLOSE,平台上,平台)) AND (MA3 = MA5)),LOW,1);EXPLAIN((现象AND BETWEEN(CLOSE,平台上,平台)),'主仓成本均价\n'),colorFFFF;DRAWICON(((现象AND BETWEEN(CLOSE,平台上,(平台上* 1.03))) AND (MA3 = MA5)),LOW,1);EXPLAIN((现象AND BETWEEN(CLOSE,平台上,(平台上* 1.03))),'主仓成本上限\n'),colorFFFF;DRAWICON((((现象AND (CLOSE > 平台上)) AND BETWEEN(LOW,平台,(平台上 * 1.03))) AND (MA3 = MA5)),LOW,1);EXPLAIN(((现象 AND (CLOSE > 平台上)) AND BETWEEN(LOW,平台上,(平台上 * 1.03))),'主仓成本上限\n'),colorFFFF;本站所有指标公式源码均未测试,如果该公式不可用请点击报错告诉我们,感谢您的支持！ 选股公式网打造最全的股票公式网站。
通达信指标公式源码 筹码多空线
{换手率}
换手:100*VOL/(FINANCE(7)/100),NODRAW;
换手5日:MA(换手,5),NODRAW;
换手10日:MA(换手,10),NODRAW;
换手20日:MA(换手,20),NODRAW;
STICKLINE(浮筹比例<10,10,浮筹比例,6,0),COLORRED;
{筹码多空线}
开盘:=WINNER(O)*100,NODRAW;
收盘:=WINNER(C)*100,NODRAW;
最高:=WINNER(H)*100,NODRAW;
最低:=WINNER(L)*100,NODRAW;
DRAWKLINE(最高,开盘,最低,收盘);{画筹码K线}
获利比例%:收盘,NODRAW;
MID:=(3*收盘+最低+开盘+最高)/6;
多空:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REFF(MID,20))/210,LINETHICK1,COLORWHITE;
筹码分布主图通达信指标公式源码
XA_1:=400;XA_2:=90;XA_3:=79;XA_4:=IF(XA_2>10,10,XA_3);XA_5:=CURRBARSCOUNT;XA_6:=REF(HIGH,XA_2)=HHV(HIGH,2*XA_2+1);XA_7:=BACKSET(XA_6,XA_2+1);XA_8:=FILTER(XA_7,XA_2) AND HIGH=HHV(HIGH,XA_2+1); XA_9:=BARSLAST(XA_8);XA_10:=IF(XA_8,XA_5,0);XA_11:=IF(XA_9,REF(HIGH,XA_9),HIGH);XA_12:=IF(XA_9,REF(XA_10,XA_9),XA_10);XA_13:=REF(XA_11,XA_9+1);XA_14:=CONST(XA_12);XA_15:=REF(XA_12,XA_9+1);XA_16:=CONST(XA_15);XA_17:=REF(LOW,XA_2)=LLV(LOW,2*XA_2+1);XA_18:=BACKSET(XA_17,XA_2+1);XA_19:=FILTER(XA_18,XA_2) AND LOW=LLV(LOW,XA_2+1); XA_20:=BARSLAST(XA_19);XA_21:=IF(XA_19,XA_5,0);XA_22:=IF(XA_20,REF(XA_21,XA_20),XA_21);XA_23:=CONST(XA_22);STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00; XA_24:=BARSLAST(LOW=LLV(LOW,180));XA_25:=REF(LOW,XA_24);XA_26:=BARSLAST(HIGH=HHV(HIGH,XA_24));XA_27:=REF(HIGH,XA_26);XA_28:=BARSLAST(LOW=LLV(LOW,XA_26));XA_29:=REF(LOW,XA_28);XA_30:=INTPART((XA_26+1)/2);XA_31:=REFDATE(XA_27,DATE);XA_32:=REFDATE(CLOSE,DATE);XA_33:=REFDATE(XA_29,DATE);C线:DRAWLINE(CURRBARSCOUNT=CONST(XA_26+1),XA_33,CURRBARSCOUNT=CONST( XA_30),XA_32,0),COLORBLACK;D线:DRAWLINE(CURRBARSCOUNT=CONST(XA_30),XA_32,CURRBARSCOUNT=CONST(1), XA_33,0),COLORBLACK;FFG1:DRAWBAND(C线,RGB(255,0,0),XA_33,RGB(255,0,0));FFG2:DRAWBAND(D线,RGB(50,205,50),XA_33,RGB(50,205,50));DRAWKLINE(HIGH,OPEN,LOW,CLOSE);STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00;XA_34:=CONST(XA_28+XA_28);XA_35:=CONST(CLOSE+0.01);XA_36:=REFDATE(XA_35,DATE);XA_37:=REF(XA_22,XA_20+1);XA_38:=CONST(XA_37);XA_39:=REF(HIGH,XA_4)=HHV(HIGH,2*XA_4+1);XA_40:=CONST((XA_31+XA_33)/2);XA_41:=CONST((XA_31+XA_40)/2);XA_42:=CONST((XA_40+XA_33)/2);NOTEXTC区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_41,XA_41)),DRAWNULL),COLORCY AN;NOTEXTB区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_40,XA_40)),DRAWNULL),COLORCY AN;NOTEXTA区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_42,XA_42)),DRAWNULL),COLORCY AN;XA_43:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35+XA_35*0.2,XA_3 5+XA_35*0.2)),DRAWNULL);XA_44:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35+XA_35*0.1,XA_3 5+XA_35*0.1)),DRAWNULL);XA_45:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35,XA_35)),DRAWN ULL);NOTEXT高:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_31,XA_31)),DRAWNULL),C OLORMAGENTA;NOTEXT低:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_29,XA_29)),DRAWNULL),C OLORGREEN;新势力A:IF(CURRBARSCOUNT<=CONST(XA_28+1),MA(CLOSE,XA_28),DRAWNULL),COLORRED; 新势力V:IF(CURRBARSCOUNT<=CONST(XA_28+1),IF(新势力A<REF(新势力A,1),新势力A,DRAWNULL),DRAWNULL),COLORGREEN;XA_46:=BACKSET(XA_39,XA_4+1);XA_47:=FILTER(XA_46,XA_4) AND HIGH=HHV(HIGH,XA_4+1);XA_48:=BARSLAST(XA_47);XA_49:=IF(XA_47,XA_5,0);XA_50:=IF(XA_48,REF(HIGH,XA_48),HIGH);XA_51:=IF(XA_48,REF(XA_49,XA_48),XA_49);XA_52:=REF(XA_50,XA_48+1);XA_53:=CONST(XA_51);XA_54:=REF(XA_51,XA_48+1);XA_55:=CONST(XA_54);XA_56:=REF(LOW,XA_4)=LLV(LOW,2*XA_4+1);XA_57:=BACKSET(XA_56,XA_4+1);XA_58:=FILTER(XA_57,XA_4) AND LOW=LLV(LOW,XA_4+1);XA_59:=BARSLAST(XA_58);XA_60:=CONST(XA_41);XA_61:=CONST(XA_40);XA_62:=CONST(XA_42);XA_63:=IF(CLOSE>=XA_60,AMOUNT,DRAWNULL);XA_64:=IF(CLOSE>=XA_60,VOL,DRAWNULL);XA_65:=0.01*SUM(XA_63,XA_26)/SUM(XA_64,XA_26);XA_66:=REFDATE(XA_65,DATE);NOTEXTD区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_65,XA_65)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_67:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,AMOUNT,DRAWNULL);XA_68:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,VOL,DRAWNULL);XA_69:=0.01*SUM(XA_67,XA_26)/SUM(XA_68,XA_26);XA_70:=REFDATE(XA_69,DATE);NOTEXTC区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_69,XA_69)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_71:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,AMOUNT,DRAWNULL);XA_72:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,VOL,DRAWNULL);XA_73:=0.01*SUM(XA_71,XA_26)/SUM(XA_72,XA_26);XA_74:=REFDATE(XA_73,DATE);NOTEXTB区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_73,XA_73)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_75:=IF(CLOSE<=XA_62,AMOUNT,DRAWNULL);XA_76:=IF(CLOSE<=XA_62,VOL,DRAWNULL);XA_77:=0.01*SUM(XA_75,XA_26)/SUM(XA_76,XA_26);XA_78:=REFDATE(XA_77,DATE);NOTEXTA区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_77,XA_77)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_79:=IF(CLOSE>=XA_36,AMOUNT,DRAWNULL);XA_80:=IF(CLOSE>=XA_36,VOL,DRAWNULL);XA_81:=0.01*SUM(XA_79,XA_26)/SUM(XA_80,XA_26);XA_82:=REFDATE(XA_81,DATE);XA_83:=IF(XA_58,XA_5,0);XA_84:=IF(XA_59,REF(XA_83,XA_59),XA_83);XA_85:=CONST(XA_84);XA_86:=REF(XA_84,XA_59+1);XA_87:=CONST(XA_86);XA_88:=REF(HIGH,XA_3)=HHV(HIGH,2*XA_3+1);XA_89:=BACKSET(XA_88,XA_3+1);XA_90:=FILTER(XA_89,XA_3) AND HIGH=HHV(HIGH,XA_3+1);XA_91:=BARSLAST(XA_90);NOTEXT上区成本:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_81,XA_81)),DRAWNULL),D OTLINE,COLORRED;XA_92:=IF(CLOSE<=XA_36,AMOUNT,DRAWNULL);XA_93:=IF(CLOSE<=XA_36,VOL,DRAWNULL);XA_94:=0.01*SUM(XA_92,XA_26)/SUM(XA_93,XA_26);XA_95:=REFDATE(XA_94,DATE);NOTEXT下区成本:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_94,XA_94)),DRAWNULL),D OTLINE,COLORYELLOW;XA_96:=100*VOL/(FINANCE(7)/100);XA_97:=IF(CLOSE>=XA_60,XA_96,DRAWNULL);XA_98:=CONST(INTPART(SUM(XA_97,XA_26)));VB143:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_66,1),COLORLIGRAY;VB144:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_66*1.007,XA_98),COLORYELLO W;XA_99:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,XA_96,DRAWNULL);XA_100:=CONST(INTPART(SUM(XA_99,XA_26)));VB148:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_70,2),COLORRED;VB149:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_70*1.007,XA_100),COLORYELL OW;XA_101:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,XA_96,DRAWNULL);XA_102:=CONST(INTPART(SUM(XA_101,XA_26)));VB153:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_74,3),COLORMAGENTA;XA_103:=IF(XA_90,XA_5,0);XA_104:=IF(XA_91,REF(HIGH,XA_91),HIGH);XA_105:=IF(XA_91,REF(XA_103,XA_91),XA_103);XA_106:=REF(XA_104,XA_91+1);XA_107:=CONST(XA_105);XA_108:=REF(XA_105,XA_91+1);XA_109:=CONST(XA_108);XA_110:=REF(XA_106,XA_91+1);VB154:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_74*1.007,XA_102),COLORYELL OW;XA_111:=IF(CLOSE<=XA_62,XA_96,DRAWNULL);XA_112:=CONST(INTPART(SUM(XA_111,XA_26)));VB158:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_78,4),COLORCYAN;VB159:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_78*1.007,XA_112),COLORYELL OW;XA_113:=IF(CLOSE>=XA_36,XA_96,DRAWNULL);XA_114:=CONST(INTPART(SUM(XA_113,XA_26)));VB163:DRAWTEXT(CURRBARSCOUNT=CONST(XA_26),XA_82,5),COLORYELLOW;VB164:DRAWNUMBER(CURRBARSCOUNT=CONST(XA_26-7),XA_82*1.007,XA_114),COLO RYELLOW;XA_115:=IF(CLOSE<=XA_36,XA_96,DRAWNULL);XA_116:=CONST(INTPART(SUM(XA_115,XA_26)));VB168:DRAWTEXT(CURRBARSCOUNT=CONST(XA_26),XA_95,6),COLORYELLOW;VB169:DRAWNUMBER(CURRBARSCOUNT=CONST(XA_26-7),XA_95*1.007,XA_116),COLO RYELLOW;XA_117:=REF(LOW,XA_3)=LLV(LOW,2*XA_3+1);XA_118:=BACKSET(XA_117,XA_3+1);XA_119:=FILTER(XA_118,XA_3) AND LOW=LLV(LOW,XA_3+1);XA_120:=BARSLAST(XA_58);XA_121:=IF(XA_119,XA_5,0);XA_122:=IF(XA_120,REF(XA_121,XA_120),XA_83);XA_123:=CONST(XA_122);XA_124:=REF(XA_122,XA_120+1);XA_125:=CONST(XA_124);。
通达信指标公式源码移动筹码分布主图指标
使用方法：公式的左上角写明的不同周期内量和价的情况。
如果背景色是红色，预示着对应周期内的均线指标会上涨。
如果背景颜色是绿色，预示着对应周期内均线指标会下跌。
只有当对应周期内的价和量都预示为上涨或者都预示为下跌的时候。
才会在右边出现文字，提示这条均价线是助长涨（支撑），还是领跌（压力）的作用。
DRAWTEXT(CURRBARSCOUNT=5,HIGH*1.01,'5日');{DRAWLINE(扣抵5,C,C,MA(C,5),0),COLORWHITE,LINETHICK2;} DRAWTEXT(CURRBARSCOUNT=10,HIGH*1.01,'10日');{DRAWLINE(扣抵10,C,C, MA(C,10),0),COLORYELLOW,LINETHICK2;} DRAWTEXT(CURRBARSCOUNT=20,HIGH*1.01,'20日');{DRAWLINE(扣抵20,C,C, MA(C,20),0),COLORMAGENTA,LINETHICK2;} DRAWTEXT(CURRBARSCOUNT=60,HIGH*1.01,'60日');{DRAWLINE(扣抵60,C,C, MA(C,60),0),COLORRED,LINETHICK2;} DRAWTEXT(CURRBARSCOUNT=120,HIGH*1.01,'120日');{DRAWLINE(扣抵120,C,C, MA(C,120),0),COLORGRAY,LINETHICK2;} DRAWTEXT(CURRBARSCOUNT=250,HIGH*1.01,'250日');{DRAWLINE(扣抵250,C,C, MA(C,250),0),COLORBLUE,LINETHICK2;} {DRAWICON(CURRBARSCOUNT=5,HIGH,14);DRAWICON(CURRBARSCOUNT=10,HIGH,14);DRAWICON(CURRBARSCOUNT=20,HIGH,14);DRAWICON(CURRBARSCOUNT=60,HIGH,14);DRAWICON(CURRBARSCOUNT=120,HIGH,14);DRAWICON(CURRBARSCOUNT=250,HIGH,14);}MA5:MA(CLOSE,5);MA10:MA(CLOSE,10);MA20:MA(CLOSE,20);MA60:MA(CLOSE,60);MA120:MA(CLOSE,120);MA250:MA(CLOSE,250);DRAWRECTREL(0,0,240,350,RGB(0,0,1));DRAWTEXT_FIX(C>0,0.04 ,0.07,1,'当前情况:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.04 ,0.11,1,'005日扣抵:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.04 ,0.15,1,'010日扣抵:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.04 ,0.19,1,'020日扣抵:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.04 ,0.23,1,'060日扣抵:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.04 ,0.27,1,'120日扣抵:'),COLORYELLOW; DRAWTEXT_FIX(C>0,0.005 ,0.090,0,'----------------------------------------------------------------------------------------'),COLORGRAY;DRAWTEXT_FIX(C>0,0.065 ,0.03,1,'价(元)'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>0,0.065 ,0.07,1,VAR2STR(C,2)),COLORYELLOW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,4),0.065 ,0.11,1,VAR2STR(REF(C,4),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,4),0.065 ,0.11,1,VAR2STR(REF(C,4),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,4),0.065 ,0.11,1,VAR2STR(REF(C,4),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,9),0.065 ,0.15,1,VAR2STR(REF(C,9),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,9),0.065 ,0.15,1,VAR2STR(REF(C,9),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,9),0.065 ,0.15,1,VAR2STR(REF(C,9),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,19),0.065 ,0.19,1,VAR2STR(REF(C,19),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,19),0.065 ,0.19,1,VAR2STR(REF(C,19),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,19),0.065 ,0.19,1,VAR2STR(REF(C,19),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,59),0.065 ,0.23,1,VAR2STR(REF(C,59),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,59),0.065 ,0.23,1,VAR2STR(REF(C,59),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,59),0.065 ,0.23,1,VAR2STR(REF(C,59),2)),COLORGREEN;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,119),0.065 ,0.27,1,VAR2STR(REF(C,119),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,119),0.065 ,0.27,1,VAR2STR(REF(C,119),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,119),0.065 ,0.27,1,VAR2STR(REF(C,119),2)),COLORGREEN; VART1:=ABS((C-REF(C,4)))*100/C,NODRAW;VART1_1:=IF(VART1>999,999.9,VART1),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,4),0.09 ,0.11,1,STRCAT(VAR2STR(VART1_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,4),0.09 ,0.11,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,4),0.09 ,0.11,1,STRCAT(VAR2STR(VART1_1,1),'%')),COLORGREEN; VART2:=ABS((C-REF(C,9)))*100/C,NODRAW;VART2_1:=IF(VART2>999,999.9,VART2),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,9),0.09 ,0.15,1,STRCAT(VAR2STR(VART2_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,9),0.09 ,0.15,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,9),0.09 ,0.15,1,STRCAT(VAR2STR(VART2_1,1),'%')),COLORGREEN; VART3:=ABS((C-REF(C,19)))*100/C,NODRAW;VART3_1:=IF(VART3>999,999.9,VART3),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,19),0.09 ,0.19,1,STRCAT(VAR2STR(VART3_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,19),0.09 ,0.19,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,19),0.09 ,0.19,1,STRCAT(VAR2STR(VART3_1,1),'%')),COLORGREEN ;VART4:=ABS((C-REF(C,59)))*100/C,NODRAW;VART4_1:=IF(VART4>999,999.9,VART4),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,59),0.09 ,0.23,1,STRCAT(VAR2STR(VART4_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,59),0.09 ,0.23,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,59),0.09 ,0.23,1,STRCAT(VAR2STR(VART4_1,1),'%')),COLORGREEN ;VART5:=ABS((C-REF(C,119)))*100/C,NODRAW;VART5_1:=IF(VART5>999,999.9,VART5),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>REF(C,119),0.09 ,0.27,1,STRCAT(VAR2STR(VART5_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC=REF(C,119),0.09 ,0.27,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC<REF(C,119),0.09 ,0.27,1,STRCAT(VAR2STR(VART5_1,1),'%')),COLORGREE N;DRAWTEXT_FIX(C>0,0.12 ,0.03,1,'量(万)'),COLORYELLOW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDC>0,0.12 ,0.07,1,VAR2STR(V/10000,2)),COLORYELLOW;TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60, IF(PERIOD=5,TOTALFZNUM,1))))),NODRAW;MTIME:=MOD(FROMOPEN,TOTAL),NODRAW;CTIME:=IF(MTIME<0.5,TOTAL,MTIME),NODRAW;VVOL:=IF((CURRBARSCOUNT=1 ANDDYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),0),NODRAW; DRAWTEXT_FIX(C>0,0.18 ,0.03,1,'虚拟量(万)'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDVVOL>0,0.18 ,0.07,1,VAR2STR(VVOL/10000,2)),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,4),0.12 ,0.11,1,VAR2STR(REF(V/10000,4),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,4),0.12 ,0.11,1,VAR2STR(REF(V/10000,4),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,4),0.12 ,0.11,1,VAR2STR(REF(V/10000,4),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,9),0.12 ,0.15,1,VAR2STR(REF(V/10000,9),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,9),0.12 ,0.15,1,VAR2STR(REF(V/10000,9),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,9),0.12 ,0.15,1,VAR2STR(REF(V/10000,9),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,19),0.12 ,0.19,1,VAR2STR(REF(V/10000,19),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,19),0.12 ,0.19,1,VAR2STR(REF(V/10000,19),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,19),0.12 ,0.19,1,VAR2STR(REF(V/10000,19),2)),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,59),0.12 ,0.23,1,VAR2STR(REF(V/10000,59),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,59),0.12 ,0.23,1,VAR2STR(REF(V/10000,59),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,59),0.12 ,0.23,1,VAR2STR(REF(V/10000,59),2)),COLORGREEN;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,119),0.12 ,0.27,1,VAR2STR(REF(V/10000,119),2)),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,119),0.12 ,0.27,1,VAR2STR(REF(V/10000,119),2)),COLORWHITE; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,119),0.12 ,0.27,1,VAR2STR(REF(V/10000,119),2)),COLORGREEN; VART21:=ABS((V-REF(V,4)))*100/V;VART21_1:=IF(VART21>999,999.9,VART21),NODRAW;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,4),0.155 ,0.11,1,STRCAT(VAR2STR(VART21_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,4),0.155 ,0.11,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,4),0.155 ,0.11,1,STRCAT(VAR2STR(VART21_1,1),'%')),COLORGREE N;VART22:=ABS((V-REF(V,9)))*100/V;VART22_1:=IF(VART22>999,999.9,VART22);DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,9),0.155 ,0.15,1,STRCAT(VAR2STR(VART22_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,9),0.155 ,0.15,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,9),0.155 ,0.15,1,STRCAT(VAR2STR(VART22_1,1),'%')),COLORGREE N;VART23:=ABS((V-REF(V,19)))*100/V;VART23_1:=IF(VART23>999,999.9,VART23);DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,19),0.155 ,0.19,1,STRCAT(VAR2STR(VART23_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,19),0.155 ,0.19,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,19),0.155 ,0.19,1,STRCAT(VAR2STR(VART23_1,1),'%')),COLORGRE EN;VART24:=ABS((C-REF(C,59)))*100/C;VART24_1:=IF(VART24>999,999.9,VART24);DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,59),0.155 ,0.23,1,STRCAT(VAR2STR(VART24_1,1),'%')),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,59),0.155 ,0.23,1,VAR2STR(0,2)),COLORWHITE;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,59),0.155 ,0.23,1,STRCAT(VAR2STR(VART24_1,1),'%')),COLORGRE EN;VART25:=ABS((C-REF(C,119)))*100/C;VART25_1:=IF(VART25>999,999.9,VART25);DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV>REF(V,119),0.155 ,0.27,1,STRCAT(VAR2STR(VART25_1,1),'%')),COLORRE D;DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV=REF(V,119),0.155 ,0.27,1,VAR2STR(0,2)),COLORWHITE;{W } DRAWTEXT_FIX(CURRBARSCOUNT=1 ANDV<REF(V,119),0.155 ,0.27,1,STRCAT(VAR2STR(VART25_1,1),'%')),COLORGR EEN;DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C>REF(C,4) ANDVVOL>REF(V,4),0.16 ,0.11,0,'5日均线助涨'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C<REF(C,4) ANDVVOL<REF(V,4),0.16 ,0.11,0,'5日均线领跌'),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C>REF(C,9) ANDVVOL>REF(V,9),0.16 ,0.15,0,'10日均线助涨'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C<REF(C,9) ANDVVOL<REF(V,9),0.16 ,0.15,0,'10日均线领跌'),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C>REF(C,19) ANDVVOL>REF(V,19),0.16 ,0.19,0,'20日均线助涨'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C<REF(C,19) ANDVVOL<REF(V,19),0.16 ,0.19,0,'20日均线领跌'),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C>REF(C,59) ANDVVOL>REF(V,59),0.16 ,0.23,0,'60日均线助涨'),COLORRED;DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C<REF(C,59) ANDVVOL<REF(V,59),0.16 ,0.23,0,'60日均线领跌'),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C>REF(C,119) ANDVVOL>REF(V,119),0.16 ,0.27,0,'120日均线助涨'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C<REF(C,119) ANDVVOL<REF(V,119),0.16 ,0.27,0,'120日均线领跌'),COLORGREEN;。
筹码主图公式通达信指标公式源码
筹码主图公式TS:=130;N:=99;M:=3;MT:=3;M1:=5;M2:=7;M3:=21;M4:=12;M5:=50;DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);GZ:=EXP(LN(HI/LO)/10);LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA); LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA); LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA); LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA); LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA); LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA); LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;L4:=REFDATE(HHV(LH4,DA),DATE);L5:=REFDATE(HHV(LH5,DA),DATE);L6:=REFDATE(HHV(LH6,DA),DATE);L7:=REFDATE(HHV(LH7,DA),DATE);L8:=REFDATE(HHV(LH8,DA),DATE);L9:=REFDATE(HHV(LH9,DA),DATE);L10:=REFDATE(HHV(LH10,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1, 1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/10 0,HI/POW(GZ,2),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/10 0,HI/POW(GZ,3),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/10 0,HI/POW(GZ,5),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/10 0,HI/POW(GZ,6),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/10 0,HI/POW(GZ,7),1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*P OW(GZ,3)*N/100,1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*P OW(GZ,2)*N/100,1,1)COLOR656566,LINETHICK1;STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)* N/100,1,1)COLOR656566,LINETHICK1;DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3;{BS标志}DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND(REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,7);DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND(REF(ZIG(3,5),1)>=REF(ZIG(3,5),2))AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.02,8);VAR1:=ZIG(3,10)<REF(ZIG(3,10),1) ANDREF(ZIG(3,10),1)>REF(ZIG(3,10),2);VAR2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2); STICKLINE(VAR1,C,O,3,0),COLORYELLOW,LINETHICK2;STICKLINE(VAR1,C,O,1,0),COLORYELLOW,LINETHICK2;STICKLINE(VAR1,H,L,0,0),COLORYELLOW,LINETHICK2;STICKLINE(VAR2,C,O,3,0),COLORFF0FF0,LINETHICK2;STICKLINE(VAR2,C,O,2,0),COLORFF0FF0,LINETHICK2;STICKLINE(VAR2,H,L,1,0),COLORFF0FF0,LINETHICK2;DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CL OSE,20)),HIGH*1.06,'-落袋为安'),COLORYELLOW;EXP7:EXPMA(CLOSE,M2),COLORWHITE,LINETHICK1;今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLORCC3299,NODRAW;高区:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;低区:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,DOTLI NE;STICKLINE(CCI>=200 AND H>=高区,O,C,3,0),COLORBLUE;STICKLINE(CCI<=100 AND L<=低区,O,C,3,0),COLORYELLOW;。
筹码分布主图通达信指标公式源码
XA_1:=400;XA_2:=90;XA_3:=79;XA_4:=IF(XA_2>10,10,XA_3);XA_5:=CURRBARSCOUNT;XA_6:=REF(HIGH,XA_2)=HHV(HIGH,2*XA_2+1);XA_7:=BACKSET(XA_6,XA_2+1);XA_8:=FILTER(XA_7,XA_2) AND HIGH=HHV(HIGH,XA_2+1); XA_9:=BARSLAST(XA_8);XA_10:=IF(XA_8,XA_5,0);XA_11:=IF(XA_9,REF(HIGH,XA_9),HIGH);XA_12:=IF(XA_9,REF(XA_10,XA_9),XA_10);XA_13:=REF(XA_11,XA_9+1);XA_14:=CONST(XA_12);XA_15:=REF(XA_12,XA_9+1);XA_16:=CONST(XA_15);XA_17:=REF(LOW,XA_2)=LLV(LOW,2*XA_2+1);XA_18:=BACKSET(XA_17,XA_2+1);XA_19:=FILTER(XA_18,XA_2) AND LOW=LLV(LOW,XA_2+1); XA_20:=BARSLAST(XA_19);XA_21:=IF(XA_19,XA_5,0);XA_22:=IF(XA_20,REF(XA_21,XA_20),XA_21);XA_23:=CONST(XA_22);STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00; XA_24:=BARSLAST(LOW=LLV(LOW,180));XA_25:=REF(LOW,XA_24);XA_26:=BARSLAST(HIGH=HHV(HIGH,XA_24));XA_27:=REF(HIGH,XA_26);XA_28:=BARSLAST(LOW=LLV(LOW,XA_26));XA_29:=REF(LOW,XA_28);XA_30:=INTPART((XA_26+1)/2);XA_31:=REFDATE(XA_27,DATE);XA_32:=REFDATE(CLOSE,DATE);XA_33:=REFDATE(XA_29,DATE);C线:DRAWLINE(CURRBARSCOUNT=CONST(XA_26+1),XA_33,CURRBARSCOUNT=CONST( XA_30),XA_32,0),COLORBLACK;D线:DRAWLINE(CURRBARSCOUNT=CONST(XA_30),XA_32,CURRBARSCOUNT=CONST(1), XA_33,0),COLORBLACK;FFG1:DRAWBAND(C线,RGB(255,0,0),XA_33,RGB(255,0,0));FFG2:DRAWBAND(D线,RGB(50,205,50),XA_33,RGB(50,205,50));DRAWKLINE(HIGH,OPEN,LOW,CLOSE);STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00;XA_34:=CONST(XA_28+XA_28);XA_35:=CONST(CLOSE+0.01);XA_36:=REFDATE(XA_35,DATE);XA_37:=REF(XA_22,XA_20+1);XA_38:=CONST(XA_37);XA_39:=REF(HIGH,XA_4)=HHV(HIGH,2*XA_4+1);XA_40:=CONST((XA_31+XA_33)/2);XA_41:=CONST((XA_31+XA_40)/2);XA_42:=CONST((XA_40+XA_33)/2);NOTEXTC区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_41,XA_41)),DRAWNULL),COLORCY AN;NOTEXTB区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_40,XA_40)),DRAWNULL),COLORCY AN;NOTEXTA区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,XA_42,XA_42)),DRAWNULL),COLORCY AN;XA_43:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35+XA_35*0.2,XA_3 5+XA_35*0.2)),DRAWNULL);XA_44:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35+XA_35*0.1,XA_3 5+XA_35*0.1)),DRAWNULL);XA_45:=IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_35,XA_35)),DRAWN ULL);NOTEXT高:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_31,XA_31)),DRAWNULL),C OLORMAGENTA;NOTEXT低:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_29,XA_29)),DRAWNULL),C OLORGREEN;新势力A:IF(CURRBARSCOUNT<=CONST(XA_28+1),MA(CLOSE,XA_28),DRAWNULL),COLORRED; 新势力V:IF(CURRBARSCOUNT<=CONST(XA_28+1),IF(新势力A<REF(新势力A,1),新势力A,DRAWNULL),DRAWNULL),COLORGREEN;XA_46:=BACKSET(XA_39,XA_4+1);XA_47:=FILTER(XA_46,XA_4) AND HIGH=HHV(HIGH,XA_4+1);XA_48:=BARSLAST(XA_47);XA_49:=IF(XA_47,XA_5,0);XA_50:=IF(XA_48,REF(HIGH,XA_48),HIGH);XA_51:=IF(XA_48,REF(XA_49,XA_48),XA_49);XA_52:=REF(XA_50,XA_48+1);XA_53:=CONST(XA_51);XA_54:=REF(XA_51,XA_48+1);XA_55:=CONST(XA_54);XA_56:=REF(LOW,XA_4)=LLV(LOW,2*XA_4+1);XA_57:=BACKSET(XA_56,XA_4+1);XA_58:=FILTER(XA_57,XA_4) AND LOW=LLV(LOW,XA_4+1);XA_59:=BARSLAST(XA_58);XA_60:=CONST(XA_41);XA_61:=CONST(XA_40);XA_62:=CONST(XA_42);XA_63:=IF(CLOSE>=XA_60,AMOUNT,DRAWNULL);XA_64:=IF(CLOSE>=XA_60,VOL,DRAWNULL);XA_65:=0.01*SUM(XA_63,XA_26)/SUM(XA_64,XA_26);XA_66:=REFDATE(XA_65,DATE);NOTEXTD区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_65,XA_65)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_67:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,AMOUNT,DRAWNULL);XA_68:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,VOL,DRAWNULL);XA_69:=0.01*SUM(XA_67,XA_26)/SUM(XA_68,XA_26);XA_70:=REFDATE(XA_69,DATE);NOTEXTC区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_69,XA_69)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_71:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,AMOUNT,DRAWNULL);XA_72:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,VOL,DRAWNULL);XA_73:=0.01*SUM(XA_71,XA_26)/SUM(XA_72,XA_26);XA_74:=REFDATE(XA_73,DATE);NOTEXTB区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_73,XA_73)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_75:=IF(CLOSE<=XA_62,AMOUNT,DRAWNULL);XA_76:=IF(CLOSE<=XA_62,VOL,DRAWNULL);XA_77:=0.01*SUM(XA_75,XA_26)/SUM(XA_76,XA_26);XA_78:=REFDATE(XA_77,DATE);NOTEXTA区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,XA_77,XA_77)),DRAWNULL),DOTLIN E,COLORLIGRAY;XA_79:=IF(CLOSE>=XA_36,AMOUNT,DRAWNULL);XA_80:=IF(CLOSE>=XA_36,VOL,DRAWNULL);XA_81:=0.01*SUM(XA_79,XA_26)/SUM(XA_80,XA_26);XA_82:=REFDATE(XA_81,DATE);XA_83:=IF(XA_58,XA_5,0);XA_84:=IF(XA_59,REF(XA_83,XA_59),XA_83);XA_85:=CONST(XA_84);XA_86:=REF(XA_84,XA_59+1);XA_87:=CONST(XA_86);XA_88:=REF(HIGH,XA_3)=HHV(HIGH,2*XA_3+1);XA_89:=BACKSET(XA_88,XA_3+1);XA_90:=FILTER(XA_89,XA_3) AND HIGH=HHV(HIGH,XA_3+1);XA_91:=BARSLAST(XA_90);NOTEXT上区成本:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_81,XA_81)),DRAWNULL),D OTLINE,COLORRED;XA_92:=IF(CLOSE<=XA_36,AMOUNT,DRAWNULL);XA_93:=IF(CLOSE<=XA_36,VOL,DRAWNULL);XA_94:=0.01*SUM(XA_92,XA_26)/SUM(XA_93,XA_26);XA_95:=REFDATE(XA_94,DATE);NOTEXT下区成本:IF(CURRBARSCOUNT<=CONST(XA_26+1),CONST(IF(1,XA_94,XA_94)),DRAWNULL),D OTLINE,COLORYELLOW;XA_96:=100*VOL/(FINANCE(7)/100);XA_97:=IF(CLOSE>=XA_60,XA_96,DRAWNULL);XA_98:=CONST(INTPART(SUM(XA_97,XA_26)));VB143:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_66,1),COLORLIGRAY;VB144:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_66*1.007,XA_98),COLORYELLO W;XA_99:=IF(CLOSE<=XA_60 AND CLOSE>=XA_61,XA_96,DRAWNULL);XA_100:=CONST(INTPART(SUM(XA_99,XA_26)));VB148:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_70,2),COLORRED;VB149:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_70*1.007,XA_100),COLORYELL OW;XA_101:=IF(CLOSE<=XA_61 AND CLOSE>=XA_62,XA_96,DRAWNULL);XA_102:=CONST(INTPART(SUM(XA_101,XA_26)));VB153:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_74,3),COLORMAGENTA;XA_103:=IF(XA_90,XA_5,0);XA_104:=IF(XA_91,REF(HIGH,XA_91),HIGH);XA_105:=IF(XA_91,REF(XA_103,XA_91),XA_103);XA_106:=REF(XA_104,XA_91+1);XA_107:=CONST(XA_105);XA_108:=REF(XA_105,XA_91+1);XA_109:=CONST(XA_108);XA_110:=REF(XA_106,XA_91+1);VB154:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_74*1.007,XA_102),COLORYELL OW;XA_111:=IF(CLOSE<=XA_62,XA_96,DRAWNULL);XA_112:=CONST(INTPART(SUM(XA_111,XA_26)));VB158:DRAWTEXT(CURRBARSCOUNT=CONST(13),XA_78,4),COLORCYAN;VB159:DRAWNUMBER(CURRBARSCOUNT=CONST(6),XA_78*1.007,XA_112),COLORYELL OW;XA_113:=IF(CLOSE>=XA_36,XA_96,DRAWNULL);XA_114:=CONST(INTPART(SUM(XA_113,XA_26)));VB163:DRAWTEXT(CURRBARSCOUNT=CONST(XA_26),XA_82,5),COLORYELLOW;VB164:DRAWNUMBER(CURRBARSCOUNT=CONST(XA_26-7),XA_82*1.007,XA_114),COLO RYELLOW;XA_115:=IF(CLOSE<=XA_36,XA_96,DRAWNULL);XA_116:=CONST(INTPART(SUM(XA_115,XA_26)));VB168:DRAWTEXT(CURRBARSCOUNT=CONST(XA_26),XA_95,6),COLORYELLOW;VB169:DRAWNUMBER(CURRBARSCOUNT=CONST(XA_26-7),XA_95*1.007,XA_116),COLO RYELLOW;XA_117:=REF(LOW,XA_3)=LLV(LOW,2*XA_3+1);XA_118:=BACKSET(XA_117,XA_3+1);XA_119:=FILTER(XA_118,XA_3) AND LOW=LLV(LOW,XA_3+1);XA_120:=BARSLAST(XA_58);XA_121:=IF(XA_119,XA_5,0);XA_122:=IF(XA_120,REF(XA_121,XA_120),XA_83);XA_123:=CONST(XA_122);XA_124:=REF(XA_122,XA_120+1);XA_125:=CONST(XA_124);。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
有买卖点提示，又有筹码可以参考，此指标是我在其他指标的基础上优化而来。
全仓买入:((CROSS(MA(CLOSE,5),MA(CLOSE,30))) AND CLOSE<MA(CLOSE,60));上线:=SMA(C,6.5,1);下线:=SMA(C,13.5,1);上线1:=SMA(C,3,1);下线1:=SMA(C,8,1);DRAWTEXT( CROSS(上线,下线),LOW *0.98,'◎全仓买' ),COLOR00FF00; DRAWTEXT(CROSS(下线1,上线1),H*1.02,'●清仓'),COLORYELLOW;买卖线:MA(CLOSE,5),COLORGREEN,LINETHICK2;买:IF(买卖线>REF(买卖线,1),买卖线,DRAWNULL),COLORRED,LINETHICK2;卖:IF(买卖线<REF(买卖线,1),买卖线,DRAWNULL),COLORGREEN,LINETHICK2; BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;UPR:=BBI+3*STD(BBI,13),LINETHICK2;DWN:=BBI-3*STD(BBI,13);安全:=MA(CLOSE,60),LINETHICK2;LC:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWTEXT( CROSS(82,RSI) , HIGH*1.02,'◆减仓') ,COLORFF9966,LINETHICK2;A77:=(2*C+H+L)/4;操作1:=MA(A77,5)*1.03,LINETHICK2;操作2:=MA(A77,5)*0.97,LINETHICK2;VAR1:LLV(A77,21);VAR2:HHV(A77,21);SK:=EMA((A77-VAR1)/(VAR2-VAR1)*100,7);SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) ANDCOUNT(SK>=SD,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW*0.98,'◇买进') ,COLOR0099FF;DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>6/10 ANDCOUNT(SK>SD,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0),LOW*0.98,'◇买进') ,COLORYELLOW;D:=MA(CLOSE,80)-MA(CLOSE,10)/3;DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 ANDCLOSE>REF(CLOSE,1)*1.08AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.98,'◆抄底'),COLORYELLOW;VARE1:=EMA(C,3);VARE2:=EMA(C,5);VARE3:=EMA(C,10);VAR4:=EMA(C,20);VAR5:=EMA(C,30);买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);STICKLINE(买进条件,H,L,0.5,1),COLORRED,LINETHICK2;STICKLINE(买进条件,O,C,6,0),COLORRED,LINETHICK2;加码价:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004;加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);STICKLINE(加码条件,H,L,0.5,1),COLORYELLOW,LINETHICK2;STICKLINE(加码条件,O,C,6,0),COLORYELLOW,LINETHICK2;{成本分布}HB:=COST(99.9);LB:=COST(0.1);B3:=(HB-LB)/50;B31:=HB-B3;B32:=HB-2*B3;B33:=HB-3*B3;B34:=HB-4*B3;B35:=HB-5*B3;B36:=HB-6*B3;B37:=HB-7*B3;B38:=HB-8*B3;B39:=HB-9*B3;B310:=HB-10*B3;B311:=HB-11*B3;B312:=HB-12*B3;B313:=HB-13*B3;B314:=HB-14*B3;B315:=HB-15*B3;B316:=HB-16*B3;B317:=HB-17*B3;B318:=HB-18*B3;B319:=HB-19*B3;B320:=HB-20*B3;B321:=HB-21*B3;B322:=HB-22*B3;B323:=HB-23*B3;B324:=HB-24*B3;B325:=HB-25*B3;B326:=HB-26*B3;B327:=HB-27*B3;B328:=HB-28*B3;B329:=HB-29*B3;B330:=HB-30*B3;B331:=HB-31*B3;B332:=HB-32*B3;B333:=HB-33*B3;B334:=HB-34*B3;B335:=HB-35*B3;B336:=HB-36*B3;B337:=HB-37*B3;B338:=HB-38*B3;B339:=HB-39*B3;B340:=HB-40*B3;B341:=HB-41*B3;B342:=HB-42*B3;B343:=HB-43*B3;B344:=HB-44*B3;B345:=HB-45*B3;B346:=HB-46*B3;B347:=HB-47*B3;B348:=HB-48*B3;B349:=HB-49*B3;A1:=WINNER(HB)*100-WINNER(B31)*100;A2:=WINNER(B31)*100-WINNER(B32)*100;A3:=WINNER(B32)*100-WINNER(B33)*100;A4:=WINNER(B33)*100-WINNER(B34)*100;A5:=WINNER(B34)*100-WINNER(B35)*100;A6:=WINNER(B35)*100-WINNER(B36)*100;A7:=WINNER(B36)*100-WINNER(B37)*100;A8:=WINNER(B37)*100-WINNER(B38)*100;A9:=WINNER(B38)*100-WINNER(B39)*100;A10:=WINNER(B39)*100-WINNER(B310)*100; A11:=WINNER(B310)*100-WINNER(B311)*100; A12:=WINNER(B311)*100-WINNER(B312)*100; A13:=WINNER(B312)*100-WINNER(B313)*100;A14:=WINNER(B313)*100-WINNER(B314)*100;A15:=WINNER(B314)*100-WINNER(B315)*100;A16:=WINNER(B315)*100-WINNER(B316)*100;A17:=WINNER(B316)*100-WINNER(B317)*100;A18:=WINNER(B317)*100-WINNER(B318)*100;A19:=WINNER(B318)*100-WINNER(B319)*100;A20:=WINNER(B319)*100-WINNER(B320)*100;A21:=WINNER(B320)*100-WINNER(B321)*100;A22:=WINNER(B321)*100-WINNER(B322)*100;A23:=WINNER(B322)*100-WINNER(B323)*100;A24:=WINNER(B323)*100-WINNER(B324)*100;A25:=WINNER(B324)*100-WINNER(B325)*100;A26:=WINNER(B325)*100-WINNER(B326)*100;A27:=WINNER(B326)*100-WINNER(B327)*100;A28:=WINNER(B327)*100-WINNER(B328)*100;A29:=WINNER(B328)*100-WINNER(B329)*100;A30:=WINNER(B329)*100-WINNER(B330)*100;A31:=WINNER(B330)*100-WINNER(B331)*100;A32:=WINNER(B331)*100-WINNER(B332)*100;A33:=WINNER(B332)*100-WINNER(B333)*100;A34:=WINNER(B333)*100-WINNER(B334)*100;A35:=WINNER(B334)*100-WINNER(B335)*100;A36:=WINNER(B335)*100-WINNER(B336)*100;A37:=WINNER(B336)*100-WINNER(B337)*100;A38:=WINNER(B337)*100-WINNER(B338)*100;A39:=WINNER(B338)*100-WINNER(B339)*100;A40:=WINNER(B339)*100-WINNER(B340)*100;A41:=WINNER(B340)*100-WINNER(B341)*100;A42:=WINNER(B341)*100-WINNER(B342)*100;A43:=WINNER(B342)*100-WINNER(B343)*100;A44:=WINNER(B343)*100-WINNER(B344)*100;A45:=WINNER(B344)*100-WINNER(B345)*100;A46:=WINNER(B345)*100-WINNER(B346)*100;A47:=WINNER(B346)*100-WINNER(B347)*100;A48:=WINNER(B347)*100-WINNER(B348)*100;A49:=WINNER(B348)*100-WINNER(B349)*100;A50:=WINNER(B349)*100-WINNER(LB)*100; STICKLINE(ISLASTBAR,HB ,HB ,A1*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B31 ,B31 ,A1*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B32 ,B32 ,A2*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B33 ,B33 ,A3*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B34 ,B34 ,A4*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B35 ,B35 ,A5*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B36 ,B36 ,A6*50 ,0 ),COLORGRAY;STICKLINE(ISLASTBAR,B37 ,B37 ,A7*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B38 ,B38 ,A8*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B39 ,B39 ,A9*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B310 ,B310 ,A10*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B311 ,B311 ,A11*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B312 ,B312 ,A12*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B313 ,B313 ,A13*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B314 ,B314 ,A14*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B315 ,B315 ,A15*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B316 ,B316 ,A16*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B317 ,B317 ,A17*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B318 ,B318 ,A18*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B319 ,B319 ,A19*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B320 ,B320 ,A20*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B321 ,B321 ,A21*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B322 ,B322 ,A22*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B323 ,B323 ,A23*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B324 ,B324 ,A24*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B325 ,B325 ,A25*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B326 ,B326 ,A26*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B327 ,B327 ,A27*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B328 ,B328 ,A28*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B329 ,B329 ,A29*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B330 ,B330 ,A30*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B331 ,B331 ,A31*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B332 ,B332 ,A32*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B333 ,B333 ,A33*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B334 ,B334 ,A34*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B335 ,B335 ,A35*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B336 ,B336 ,A36*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B337 ,B337 ,A37*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B338 ,B338 ,A38*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B339 ,B339 ,A39*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B340 ,B340 ,A40*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B341 ,B341 ,A41*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B342 ,B342 ,A42*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B343 ,B343 ,A43*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B344 ,B344 ,A44*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B345 ,B345 ,A45*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B346 ,B346 ,A46*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B347 ,B347 ,A47*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,B348 ,B348 ,A48*50 ,0 ),COLORGRAY; STICKLINE(ISLASTBAR,LB ,LB ,A50*50 ,0 ),COLORGRAY;当前获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;。