通达信Ⅹ-筹码天机公式源码如下000

来源:百度文库 编辑:神马文学网 时间:2024/04/25 20:53:22
通达信Ⅹ-筹码天机公式源码如下:
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;
本站所有指标公式源码均未测试,如果该公式不可用请点击报错告诉我们,感谢您的支持!
www.goooo.com.cn 选股公式网打造最全的股票公式网站。