真正的金马温度指标仿制品!

捞一把

闲来无事,看到金戈铁马老师的金马温度计,很不错,要源码不给,干脆自己仿制一个供大伙把玩欣赏!
希望不要拍砖! 2条线没什么特别之处,就是大伙平常用的10天线和15天线. 当然,不要过多迷信指标,学好王子老师的书才是正事!
金马主图
N1:=3;
M2:=MA(C,20),COLORGREEN;
MA10:=EMA(C,10),COLORWHITE;
MA15:=EMA(C,15),COLORRED;
VAR1:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR6:=VAR3-VAR1;
Z:=MA(VAR6,N1);
STICKLINE(Z>=0 {AND ZZ=2},O,C,3,1),COLORRED;
STICKLINE(Z>=0 {AND ZZ=2},H,MAX(O,C),0,1),COLORRED;
STICKLINE(Z>=0 {AND ZZ=2},MIN(O,C),L,0,1),COLORRED;
STICKLINE(Z<0 {AND ZZ=1},O,C,3,0),COLORCYAN;
STICKLINE(Z<0 {AND ZZ=1},H,MAX(O,C),0,0),COLORCYAN;
STICKLINE(Z<0 {AND ZZ=1},MIN(O,C),L,0,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,O,C,3,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,H,MAX(O,C),0,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,MIN(O,C),L,0,0),COLORCYAN;
STICKLINE(Z<0 AND M2<C,O,C,3,1),COLORRED;
STICKLINE(Z<0 AND M2<C,H,MAX(O,C),0,0),COLORRED;
STICKLINE(Z<0 AND M2<C,MIN(O,C),L,0,0),COLORRED;
金马日线:IF(MA10<C,MA10,DRAWNULL )COLORWHITE;
金马K线:IF(C>=MA15 AND MA10>MA15 AND CLOSE>MA15 ,MA15,DRAWNULL )COLORRED,LINETHICK1;
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(涨停,O,C,2.5,0),COLORLIMAGENTA;
金马附图
参数设置  m1   2    250    5
                m2  2    250     5
源码如下:
量:VOL,VOLSTICK;
预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),COLORFFFF00;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT ;
卖:-IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLORFF9088,POINTDOT;
买卖%:ABS(买/卖),LINETHICK0,COLORWHITE;
STICKLINE(VOL>0,VOL,0,3,0),COLORCC0000;
STICKLINE(VOL>0,VOL,0,2,0),COLORFF4400;
STICKLINE(VOL>0,VOL,0,1.1,0),COLORFF8800;
STICKLINE(VOL>0,VOL,0,0.4,0),COLORFFCC00;
STICKLINE(买>0,0,买,3,0),COLOR000066;
STICKLINE(买>0,0,买,2,0),COLOR000099;
STICKLINE(买>0,0,买,1.1,0),COLOR0000CC;
STICKLINE(买>0,0,买,0.4,0),COLOR0000FF;
M5:MA(买,M1),COLORFFFFFF,LINETHICK1;
MM5:MA(卖,M2),COLOR00FF00,LINETHICK1;

光月63

ZJ:EMA(C,13),COLOR0000FF;
HY:EMA(C,20),COLORFF00FF;
ZJ升:IF(ZJ>REF(ZJ,1),ZJ,DRAWNULL),COLORRED,LINETHICK2;
ZJ降:IF(ZJ<=REF(ZJ,1),ZJ,DRAWNULL),COLORBLUE,LINETHICK2;
HY升:IF(HY>REF(HY,1),HY,DRAWNULL),COLORFF00FF,LINETHICK2;
HY降:IF(HY<REF(HY,1),HY,DRAWNULL),COLORFFAA00,LINETHICK2;

吾道问道

谢谢分享，好好学习，天天向上。

双嘧达默

感谢楼主的分享！学习了！

捞一把

闲来无事,看到金戈铁马老师的金马温度计,很不错,要求公开源码不果,干脆自己仿制一个供大伙把玩欣赏!
希望不要拍砖!希望不会被禁言,希望不会被封d.

江鸟

金戈铁马老师的金马温度计,很不错

西域刀郎

金马主图
N1:=3;
M2:=MA(C,20),COLORGREEN;
MA10:=EMA(C,10),COLORWHITE;
MA15:=EMA(C,15),COLORRED;
VAR1:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VAR6:=VAR3-VAR1;
Z:=MA(VAR6,N1);
STICKLINE(Z>=0 {AND ZZ=2},O,C,3,1),COLORRED;
STICKLINE(Z>=0 {AND ZZ=2},H,MAX(O,C),0,1),COLORRED;
STICKLINE(Z>=0 {AND ZZ=2},MIN(O,C),L,0,1),COLORRED;
STICKLINE(Z<0 {AND ZZ=1},O,C,3,0),COLORCYAN;
STICKLINE(Z<0 {AND ZZ=1},H,MAX(O,C),0,0),COLORCYAN;
STICKLINE(Z<0 {AND ZZ=1},MIN(O,C),L,0,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,O,C,3,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,H,MAX(O,C),0,0),COLORCYAN;
STICKLINE(Z>=0 AND M2>C,MIN(O,C),L,0,0),COLORCYAN;
STICKLINE(Z<0 AND M2<C,O,C,3,1),COLORRED;
STICKLINE(Z<0 AND M2<C,H,MAX(O,C),0,0),COLORRED;
STICKLINE(Z<0 AND M2<C,MIN(O,C),L,0,0),COLORRED;
金马日线:IF(MA10<C,MA10,DRAWNULL )COLORWHITE;
金马K线:IF(C>=MA15 AND MA10>MA15 AND CLOSE>MA15 ,MA15,DRAWNULL )COLORRED,LINETHICK1;
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(涨停,O,C,2.5,0),COLORLIMAGENTA;

金马附图

参数设置  m1   2    250    5
                m2  2    250     5
源码如下:
量:VoL,VOLSTICK;
预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),COLORFFFF00;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT ;
卖:-IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLORFF9088,POINTDOT;
买卖%:ABS(买/卖),LINETHICK0,COLORWHITE;
STICKLINE(VOL>0,VOL,0,3,0),COLORCC0000;
STICKLINE(VOL>0,VOL,0,2,0),COLORFF4400;
STICKLINE(VOL>0,VOL,0,1.1,0),COLORFF8800;
STICKLINE(VOL>0,VOL,0,0.4,0),COLORFFCC00;
STICKLINE(买>0,0,买,3,0),COLOR000066;
STICKLINE(买>0,0,买,2,0),COLOR000099;
STICKLINE(买>0,0,买,1.1,0),COLOR0000CC;
STICKLINE(买>0,0,买,0.4,0),COLOR0000FF;
M5:MA(买,M1),COLORFFFFFF,LINETHICK1;
MM5:MA(卖,M2),COLOR00FF00,LINETHICK1;

勤之琼

学习学习学习

猪头哈哈

恩，这个更完美，一模一样！顶！小弟甘拜下风！向你学习！

股迷开心果

猪头哈哈

谢谢楼主分享，你的更好，你的主题标语的谦虚，让我自愧不如，良心谴责，向你多多学习，支持！

大海阳

学习学习学习学习学习学习

汉兵

很好  高实在是高 认真学习深刻领会 楼主辛苦了 期待你的帖子  向你致敬 向高手看齐

股迷开心果

回复 1# 捞一把


   

笑看股市

谢谢版主的分享.

螺旋管

谢谢分享了

捞一把

哈哈，西域刀郎 就是个大坏蛋

哈哈魔哈哈

哈哈,11年绝对大牛