楚河汉界 改编[其他软件公式]

相关标签:楚河汉界成语 、 象棋楚河汉界 、 楚河汉界论坛 、 楚河汉界游戏 、 楚河汉界图片 、 楚河汉界小说 、 楚河汉界在哪 、 楚河汉界粤语 、 楚河汉界歌曲 、 楚河汉界国语 、 楚河汉界主图指标公式 、

改编的[楚河汉界]。

原理解析：
AAA赋值:1 TT赋值:1 RC赋值:(1日前的收盘价 * AAA) XA赋值:如果(RC>最高价),返回RC,否则返回0 XB赋值:如果((最高价>=RC)AND(RC>最低价)),返回最高价,否则返回0 XC赋值:如果(RC<=最低价),返回最高价,否则返回0 XD赋值:((XA + XB) + XC) YA赋值:如果(RC>最高价),返回最低价,否则返回0 YB赋值:如果((最高价>=RC)AND(RC>最低价)),返回最低价,否则返回0 YC赋值:如果(RC<=最低价),返回RC,否则返回0 YD赋值:((YA + YB) + YC) ATR赋值:(XD-YD)的20日[1日权重]移动平均 输出TT1: (收盘价的20日指数移动平均 + (2 * ATR)),线宽为0 输出TT2: (收盘价的20日指数移动平均 - (2 * ATR)),线宽为0 输出TT3: ((((TT1 + TT1) + TT1) + TT2) / 4),线宽为0 输出TT4: ((((TT1 + TT2) + TT2) + TT2) / 4),线宽为0 输出TT5: 收盘价的8日指数移动平均,线宽为0 输出TT6: 收盘价的20日指数移动平均,线宽为0 填充背景 TT赋值:1 CHECK赋值:0 CHECK1赋值:0 AAA赋值:如果(((CHECK=0)OR(CHECK1=0))AND(TT=1)),返回1,否则返回0 TD赋值:DATATYPE TT5赋值:(如果(TD=1),返回"CHUS.TT1[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT1[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT1[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT1[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT1[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT1[取周线数据]",否则返回"CHUS.TT1[取年线数据]" * TT) TT6赋值:(如果(TD=1),返回"CHUS.TT2[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT2[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT2[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT2[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT2[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT2[取周线数据]",否则返回"CHUS.TT2[取年线数据]" * TT) A3赋值:(如果(TD=1),返回"CHUS.TT3[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT3[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT3[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT3[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT3[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT3[取周线数据]",否则返回"CHUS.TT3[取年线数据]" * TT) A4赋值:(如果(TD=1),返回"CHUS.TT4[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT4[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT4[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT4[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT4[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT4[取周线数据]",否则返回"CHUS.TT4[取年线数据]" * TT) XC赋值:(如果(TD=1),返回"CHUS.TT5[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT5[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT5[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT5[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT5[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT5[取周线数据]",否则返回"CHUS.TT5[取年线数据]" * TT) XD赋值:(如果(TD=1),返回"CHUS.TT6[取5分钟数据]",否则返回如果(TD=2),返回"CHUS.TT6[取15分钟数据]",否则返回如果(TD=3),返回"CHUS.TT6[取60分钟数据]",否则返回如果(TD=4),返回"CHUS.TT6[取60分钟数据]",否则返回如果(TD=5),返回"CHUS.TT6[取日线数据]",否则返回如果(TD=6),返回"CHUS.TT6[取周线数据]",否则返回"CHUS.TT6[取年线数据]" * TT) FILLRGN(((XC >= XD) AND (AAA = 1)),TT5的4日指数移动平均,TT6的4日指数移动平均),COLOR9933CC FILLRGN(((XC < XD) AND (AAA = 1)),TT5的4日指数移动平均,TT6的4日指数移动平均),COLORFCCF00 FILLRGN(((收盘价的8日指数移动平均 >= 收盘价的20日指数移动平均) AND (AAA = 1)),A3的4日指数移动平均,A4的4日指数移动平均),COLORFF99CC FILLRGN(((收盘价的8日指数移动平均 < 收盘价的20日指数移动平均) AND (AAA = 1)),A3的4日指数移动平均,A4的4日指数移动平均),COLORCCFF66 FO赋值:如果CHECKUSER(1),返回开盘价,否则返回0 FH赋值:如果CHECKUSER(1),返回最高价,否则返回0 FL赋值:如果CHECKUSER(1),返回最低价,否则返回0 FC赋值:如果CHECKUSER(1),返回收盘价,否则返回0 KK赋值:如果((FC>=FO)AND((FC>=1日前的FC)OR(1日前的FC>=1日前的FO))),返回1,否则返回如果((FC<FO)AND((FC<1日前的FO)OR(1日前的FC<1日前的FO))),返回(0-1),否则返回0 输出明日轉折:(对((FO+FC)/2)(进行)四舍五入 * AAA),SHIFT1,线宽为0,COLOR0000FF 今日轉折赋值:对如果(KK=1),返回FC和FO的较小值,否则返回如果(KK=(0-1)),返回FC和FO的较大值,否则返回如果(1日前的KK=1),返回FC和FO的较小值,否则返回如果(1日前的KK=(0-1)),返回FC和FO的较大值,否则返回((FC+FO)/2)(进行)四舍五入 当满足条件(ISLASTBARAND(AAA=1))时,在明日轉折位置书写数字,SHIFT1,画红色 当满足条件(((FC>FO)AND(TT=1))AND(AAA=1))时,在FH和FL位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLORFF 当满足条件(((FO>FC)AND(TT=1))AND(AAA=1))时,在FH和FL位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLORFF0000 当满足条件((((KK=1)AND(FC>=FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件((((KK=1)AND(FC<FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件((((KK=(0-1))AND(FC>=FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF0000 当满足条件((((KK=(0-1))AND(FC<FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF0000 当满足条件((((KK=0)AND(FC>=FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件((((KK=0)AND(FC<FO))AND(TT=1))AND(AAA=1))时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF CC赋值:(收盘价 * TT) DIFF赋值:(CC的26日指数移动平均 - CC的52日指数移动平均) DEA赋值:DIFF的52日指数移动平均 MACD赋值:(2 * (DIFF - DEA)) DIF赋值:(CC的26日指数移动平均 - CC的52日指数移动平均) ESS赋值:CC的26日指数移动平均 EGG赋值:CC的52日指数移动平均 RDIF赋值:1日前的DIF RSS赋值:1日前的ESS RGG赋值:1日前的EGG RDEA赋值:1日前的DEA RMACD赋值:1日前的MACD RZZZ赋值:(RDEA + (((52 + 1) / (2 * (52 - 1))) * RMACD)) XDIF赋值:((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDIF)) / ((2 * 52) - (2 * 26))) XDEA赋值:((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDEA)) / ((2 * 52) - (2 * 26))) XMACD赋值:((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RZZZ)) / ((2 * 52) - (2 * 26))) AA赋值:是否最后一个周期 BB赋值:若(AA=1)则将最近1周期置为1 Y赋值:上次(BB=1)距今天数 X赋值:1 TDIF赋值:(DIF * X) TSS赋值:(ESS * X) TGG赋值:(EGG * X) TDEA赋值:(DEA * X) TMACD赋值:(MACD * X) TZZZ赋值:(TDEA + (((52 + 1) / (2 * (52 - 1))) * TMACD)) 输出西楚霸王:(((((((((52 - 1) * (26 + 1)) * TGG) * AAA) - ((((52 + 1) * (26 - 1)) * TSS) * AAA)) + (((26 + 1) * (52 + 1)) * TDIF)) * AAA) / ((2 * 52) - (2 * 26))) * AAA) PARTLINE(((西楚霸王 >= 1日前的西楚霸王) AND (AAA = 1)),西楚霸王),线宽为3,COLORFF PARTLINE(((西楚霸王 < 1日前的西楚霸王) AND (AAA = 1)),西楚霸王),线宽为3,COLORFF00 Q5赋值:TT6的4日指数移动平均的4日简单移动平均 Q6赋值:A3的4日指数移动平均的4日简单移动平均 Q7赋值:A4的4日指数移动平均的4日简单移动平均 Q8赋值:TT5的4日指数移动平均的4日简单移动平均 当满足条件若是否最后一个周期则将最近10周期置为1上穿1ANDAAA=1时,在TT6的4日指数移动平均的4日指数移动平均和TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近9周期置为1上穿1ANDAAA=1时,在1日前的TT6的4日指数移动平均的4日指数移动平均和1日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近8周期置为1上穿1ANDAAA=1时,在2日前的TT6的4日指数移动平均的4日指数移动平均和2日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近7周期置为1上穿1ANDAAA=1时,在3日前的TT6的4日指数移动平均的4日指数移动平均和3日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近6周期置为1上穿1ANDAAA=1时,在4日前的TT6的4日指数移动平均的4日指数移动平均和4日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近5周期置为1上穿1ANDAAA=1时,在5日前的TT6的4日指数移动平均的4日指数移动平均和5日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近4周期置为1上穿1ANDAAA=1时,在6日前的TT6的4日指数移动平均的4日指数移动平均和6日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近3周期置为1上穿1ANDAAA=1时,在7日前的TT6的4日指数移动平均的4日指数移动平均和7日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近2周期置为1上穿1ANDAAA=1时,在8日前的TT6的4日指数移动平均的4日指数移动平均和8日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的TT6的4日指数移动平均的4日指数移动平均和9日前的TT6的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的TT6的4日指数移动平均的4日指数移动平均位置书写数字,SHIFT1 当满足条件若是否最后一个周期则将最近10周期置为1上穿1ANDAAA=1时,在TT5的4日指数移动平均的4日指数移动平均和TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近9周期置为1上穿1ANDAAA=1时,在1日前的TT5的4日指数移动平均的4日指数移动平均和1日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近8周期置为1上穿1ANDAAA=1时,在2日前的TT5的4日指数移动平均的4日指数移动平均和2日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近7周期置为1上穿1ANDAAA=1时,在3日前的TT5的4日指数移动平均的4日指数移动平均和3日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近6周期置为1上穿1ANDAAA=1时,在4日前的TT5的4日指数移动平均的4日指数移动平均和4日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近5周期置为1上穿1ANDAAA=1时,在5日前的TT5的4日指数移动平均的4日指数移动平均和5日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近4周期置为1上穿1ANDAAA=1时,在6日前的TT5的4日指数移动平均的4日指数移动平均和6日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近3周期置为1上穿1ANDAAA=1时,在7日前的TT5的4日指数移动平均的4日指数移动平均和7日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近2周期置为1上穿1ANDAAA=1时,在8日前的TT5的4日指数移动平均的4日指数移动平均和8日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的TT5的4日指数移动平均的4日指数移动平均和9日前的TT5的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的TT5的4日指数移动平均的4日指数移动平均位置书写数字,SHIFT1 当满足条件若是否最后一个周期则将最近10周期置为1上穿1ANDAAA=1时,在A3的4日指数移动平均的4日指数移动平均和A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近9周期置为1上穿1ANDAAA=1时,在1日前的A3的4日指数移动平均的4日指数移动平均和1日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近8周期置为1上穿1ANDAAA=1时,在2日前的A3的4日指数移动平均的4日指数移动平均和2日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近7周期置为1上穿1ANDAAA=1时,在3日前的A3的4日指数移动平均的4日指数移动平均和3日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近6周期置为1上穿1ANDAAA=1时,在4日前的A3的4日指数移动平均的4日指数移动平均和4日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近5周期置为1上穿1ANDAAA=1时,在5日前的A3的4日指数移动平均的4日指数移动平均和5日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近4周期置为1上穿1ANDAAA=1时,在6日前的A3的4日指数移动平均的4日指数移动平均和6日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近3周期置为1上穿1ANDAAA=1时,在7日前的A3的4日指数移动平均的4日指数移动平均和7日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近2周期置为1上穿1ANDAAA=1时,在8日前的A3的4日指数移动平均的4日指数移动平均和8日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的A3的4日指数移动平均的4日指数移动平均和9日前的A3的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的A3的4日指数移动平均的4日指数移动平均位置书写数字,SHIFT1 当满足条件若是否最后一个周期则将最近10周期置为1上穿1ANDAAA=1时,在A4的4日指数移动平均的4日指数移动平均和A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近9周期置为1上穿1ANDAAA=1时,在1日前的A4的4日指数移动平均的4日指数移动平均和1日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近8周期置为1上穿1ANDAAA=1时,在2日前的A4的4日指数移动平均的4日指数移动平均和2日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近7周期置为1上穿1ANDAAA=1时,在3日前的A4的4日指数移动平均的4日指数移动平均和3日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近6周期置为1上穿1ANDAAA=1时,在4日前的A4的4日指数移动平均的4日指数移动平均和4日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近5周期置为1上穿1ANDAAA=1时,在5日前的A4的4日指数移动平均的4日指数移动平均和5日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近4周期置为1上穿1ANDAAA=1时,在6日前的A4的4日指数移动平均的4日指数移动平均和6日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近3周期置为1上穿1ANDAAA=1时,在7日前的A4的4日指数移动平均的4日指数移动平均和7日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近2周期置为1上穿1ANDAAA=1时,在8日前的A4的4日指数移动平均的4日指数移动平均和8日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的A4的4日指数移动平均的4日指数移动平均和9日前的A4的4日指数移动平均的4日指数移动平均位置之间画柱状线,宽度为10,0不为0则画空心柱.,线宽为3,COLOR80 当满足条件若是否最后一个周期则将最近1周期置为1上穿1ANDAAA=1时,在9日前的A4的4日指数移动平均的4日指数移动平均位置书写数字,SHIFT1 JT赋值:(9日前的A3的4日指数移动平均的4日指数移动平均+9日前的A4的4日指数移动平均的4日指数移动平均)/2 当满足条件ISLASTBARANDAAA=1时,在JT和JT位置之间画柱状线,宽度为12,0不为0则画空心柱. 当满足条件若是否最后一个周期则将最近1周期置为1ANDAAA=1上穿1时,在JT位置书写数字,SHIFT1 A00赋值:收盘价的22日简单移动平均 A03赋值:(最高价的5日指数移动平均+最低价的5日指数移动平均+收盘价的5日指数移动平均*2)/4 A04赋值:1日前的A03 A02赋值:FO>FC AND KK=0 AND FC<FO AND AAA=1 当满足条件收阳线时,在最低价位置画4号图标,ALIGN5 当满足条件收阴线时,在最低价位置画5号图标,ALIGN5 当满足条件FC>FOANDTT=1ANDAAA=1时,在FH和FL位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLORFF 当满足条件FO>FCANDTT=1ANDAAA=1时,在FH和FL位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLORFF0000 当满足条件KK=1ANDFC>=FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件KK=1ANDFC<FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件KK=-1ANDFC>=FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF0000 当满足条件KK=-1ANDFC<FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF0000 当满足条件KK=0ANDFC>=FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF 当满足条件KK=0ANDFC<FOANDTT=1ANDAAA=1时,在FO和FC位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF GJ赋值:如果收盘价=大盘的收盘价,返回(大盘的收盘价+大盘的最高价+大盘的最低价+大盘的开盘价)/4,否则返回成交额(元)/(成交量(手)+0.01)/100 明日阻力赋值:最低价+(GJ-最低价)+(收盘价-最低价) 明日支撑赋值:最低价+(收盘价-GJ) 输出今日阻力:1日前的明日阻力,线宽为0 输出今日支撑:1日前的明日支撑,线宽为0 当满足条件数据位置状态=2ANDC>=今日阻力时,在今日阻力和今日阻力位置之间画柱状线,宽度为20,0不为0则画空心柱.,COLOR0000FF 当满足条件数据位置状态=2ANDC<今日阻力时,在今日阻力和今日阻力位置之间画柱状线,宽度为20,0不为0则画空心柱.,COLOR00FF00 当满足条件数据位置状态=2ANDC>=今日支撑时,在今日支撑和今日支撑位置之间画柱状线,宽度为20,0不为0则画空心柱.,COLORFF00FF 当满足条件数据位置状态=2ANDC<今日支撑时,在今日支撑和今日支撑位置之间画柱状线,宽度为20,0不为0则画空心柱.,COLORFF0000 DRAWTEXTEX(1,1,200,30,STKLABEL+' '+品种名称),线宽为6,COLORFFFF80 WYY1赋值:星期,线宽为0 WWJ赋值:' 星期' WWJJ赋值:如果WYY1=5,返回WWJ+'五',否则返回如果WYY1=4,返回WWJ+'四',否则返回如果WYY1=3,返回WWJ+'三',否则返回如果WYY1=2,返回WWJ+'二',否则返回如果WYY1=1,返回WWJ+'1',否则返回WWJ WYY2赋值:LMONTH WYY3赋值:LDAY WWW赋值:如果数据位置状态=2,返回'农历'+NUMTOSTR(WYY2,0)+'月'+NUMTOSTR(WYY3,0)+'日',否则返回'' WWH赋值:如果数据位置状态=2,返回NUMTOSTR(日期+1000000,0),否则返回'' DRAWTEXTEX(1,1,120 ,30 ,' '+WWH+WWJJ+WWW),线宽为3,COLOR00FFFF DRAWTEXTEX(1,1,20,30,'楚河*<^O^>*汉界'),线宽为6,COLOR0000FF HH赋值:市盈(动) DD赋值:总股本(股) SS赋值:流通股本(股) FF赋值:每股公积金 GG赋值:每股收益(全年折算) ZZ赋值:每股股息(港股,美股) JJ赋值:流通市值 MM赋值:JJ/SS TH赋值:市盈(动) 换手率赋值:100*成交量(手)/当前流通股本(手),COLORFFFFFF RH赋值:最高价-最低价 R赋值:振幅*100 输出输出DRAWTEXTEX(1,1,20,840,'当日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+' 当前换手率:'+NUMTOSTR(换手率,2)+'% '),COLORFFFFFF 输出VAR100赋值:'所属板块:' VAR100赋值:VAR100+' 电力' VAR100赋值:VAR100+' 电脑' VAR100赋值:VAR100+' 电器' VAR100赋值:VAR100+' 电子信息' VAR100赋值:VAR100+' 房地产' VAR100赋值:VAR100+' 纺织服装' VAR100赋值:VAR100+' 钢铁' VAR100赋值:VAR100+' 工程建筑' VAR100赋值:VAR100+' 供水供气' VAR100赋值:VAR100+' 化工' VAR100赋值:VAR100+' 化纤' VAR100赋值:VAR100+' 机械' VAR100赋值:VAR100+' 建材' VAR100赋值:VAR100+' 交通工具' VAR100赋值:VAR100+' 交通设施' VAR100赋值:VAR100+' 教育传媒' VAR100赋值:VAR100+' 金融' VAR100赋值:VAR100+' 旅游酒店' VAR100赋值:VAR100+' 煤炭石油' VAR100赋值:VAR100+' 酿酒食品' VAR100赋值:VAR100+' 农林牧渔' VAR100赋值:VAR100+' 其他行业' VAR100赋值:VAR100+' 汽车' VAR100赋值:VAR100+' 汽配' VAR100赋值:VAR100+' 商业连锁' VAR100赋值:VAR100+' 石化' VAR100赋值:VAR100+' 通信' VAR100赋值:VAR100+' 外贸' VAR100赋值:VAR100+' 医药' VAR100赋值:VAR100+' 仪电仪表' VAR100赋值:VAR100+' 有色金属' VAR100赋值:VAR100+' 运输物流' VAR100赋值:VAR100+' 造纸印刷' VAR100赋值:VAR100+' 安徽' VAR100赋值:VAR100+' 北京' VAR100赋值:VAR100+' 福建' VAR100赋值:VAR100+' 甘肃' VAR100赋值:VAR100+' 广东' VAR100赋值:VAR100+' 广西' VAR100赋值:VAR100+' 贵州' VAR100赋值:VAR100+' 海南' VAR100赋值:VAR100+' 河北' VAR100赋值:VAR100+' 河南' VAR100赋值:VAR100+' 黑龙江' VAR100赋值:VAR100+' 湖北' VAR100赋值:VAR100+' 湖南' VAR100赋值:VAR100+' 吉林' VAR100赋值:VAR100+' 江苏' VAR100赋值:VAR100+' 江西' VAR100赋值:VAR100+' 辽宁' VAR100赋值:VAR100+' 内蒙古' VAR100赋值:VAR100+' 宁夏' VAR100赋值:VAR100+' 青海' VAR100赋值:VAR100+' 山东' VAR100赋值:VAR100+' 山西' VAR100赋值:VAR100+' 陕西' VAR100赋值:VAR100+' 上海' VAR100赋值:VAR100+' 深圳' VAR100赋值:VAR100+' 四川' VAR100赋值:VAR100+' 天津' VAR100赋值:VAR100+' ***' VAR100赋值:VAR100+' 新疆' VAR100赋值:VAR100+' 云南'

 来源:程序化99（ WWW.CXH99.COM ）

源码：

{楚河漢界引用公式}

{公称名称: CHUS}AAA:=1;TT:=1;

RC:=(REF(CLOSE,1) * AAA);
XA:=IF((RC > HIGH),RC,0);
XB:=IF(((HIGH >= RC) AND (RC > LOW)),HIGH,0);
XC:=IF((RC <= LOW),HIGH,0);
XD:=((XA + XB) + XC);
YA:=IF((RC > HIGH),LOW,0);
YB:=IF(((HIGH >= RC) AND (RC > LOW)),LOW,0);
YC:=IF((RC <= LOW),RC,0);
YD:=((YA + YB) + YC);
ATR:=SMA((XD - YD),20,1);
TT1: (EMA(CLOSE,20) + (2 * ATR)),LINETHICK0;
TT2: (EMA(CLOSE,20) - (2 * ATR)),LINETHICK0;
TT3: ((((TT1 + TT1) + TT1) + TT2) / 4),LINETHICK0;
TT4: ((((TT1 + TT2) + TT2) + TT2) / 4),LINETHICK0;
TT5: EMA(CLOSE,8),LINETHICK0;
TT6: EMA(CLOSE,20),LINETHICK0;

{西楚霸王}
DRAWGBK(1,colorrgb(0,0,100),colorrgb(0,0,0),1);
TT:=1;
CHECK:=0;
CHECK1:=0;
AAA:=IF((((CHECK = 0) OR (CHECK1 = 0)) AND (TT = 1)),1,0);
TD:=DATATYPE;
TT5:=(IF((TD = 1),"CHUS.TT1#min5",IF((TD = 2),"CHUS.TT1#min15",IF((TD = 3),"CHUS.TT1#min60",IF((TD = 4),"CHUS.TT1#min60",IF((TD = 5),"CHUS.TT1#day",IF((TD = 6),"CHUS.TT1#week","CHUS.TT1#year")))))) * TT);
TT6:=(IF((TD = 1),"CHUS.TT2#min5",IF((TD = 2),"CHUS.TT2#min15",IF((TD = 3),"CHUS.TT2#min60",IF((TD = 4),"CHUS.TT2#min60",IF((TD = 5),"CHUS.TT2#day",IF((TD = 6),"CHUS.TT2#week","CHUS.TT2#year")))))) * TT);
A3:=(IF((TD = 1),"CHUS.TT3#min5",IF((TD = 2),"CHUS.TT3#min15",IF((TD = 3),"CHUS.TT3#min60",IF((TD = 4),"CHUS.TT3#min60",IF((TD = 5),"CHUS.TT3#day",IF((TD = 6),"CHUS.TT3#week","CHUS.TT3#year")))))) * TT);
A4:=(IF((TD = 1),"CHUS.TT4#min5",IF((TD = 2),"CHUS.TT4#min15",IF((TD = 3),"CHUS.TT4#min60",IF((TD = 4),"CHUS.TT4#min60",IF((TD = 5),"CHUS.TT4#day",IF((TD = 6),"CHUS.TT4#week","CHUS.TT4#year")))))) * TT);
XC:=(IF((TD = 1),"CHUS.TT5#min5",IF((TD = 2),"CHUS.TT5#min15",IF((TD = 3),"CHUS.TT5#min60",IF((TD = 4),"CHUS.TT5#min60",IF((TD = 5),"CHUS.TT5#day",IF((TD = 6),"CHUS.TT5#week","CHUS.TT5#year")))))) * TT);
XD:=(IF((TD = 1),"CHUS.TT6#min5",IF((TD = 2),"CHUS.TT6#min15",IF((TD = 3),"CHUS.TT6#min60",IF((TD = 4),"CHUS.TT6#min60",IF((TD = 5),"CHUS.TT6#day",IF((TD = 6),"CHUS.TT6#week","CHUS.TT6#year")))))) * TT);
FILLRGN(((XC >= XD) AND (AAA = 1)),EMA(TT5,4),EMA(TT6,4)),color9933cc;
FILLRGN(((XC < XD) AND (AAA = 1)),EMA(TT5,4),EMA(TT6,4)),colorFccF00;
FILLRGN(((EMA(CLOSE,8) >= EMA(CLOSE,20)) AND (AAA = 1)),EMA(A3,4),EMA(A4,4)),colorFF99CC;
FILLRGN(((EMA(CLOSE,8) < EMA(CLOSE,20)) AND (AAA = 1)),EMA(A3,4),EMA(A4,4)),colorccFF66;
FO:=IF(CHECKUSER(1),OPEN,0);
FH:=IF(CHECKUSER(1),HIGH,0);
FL:=IF(CHECKUSER(1),LOW,0);
FC:=IF(CHECKUSER(1),CLOSE,0);
<%vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
vo(i)=(vo(i-1)+vc(i-1))/2
if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
vc(i)=(2*vc(i)+vh(i)+vl(i))/4
nextffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc
%>
KK:=IF(((FC >= FO) AND ((FC >= REF(FC,1)) OR (REF(FC,1) >= REF(FO,1)))),1,IF(((FC < FO) AND ((FC < REF(FO,1)) OR (REF(FC,1) < REF(FO,1)))),(0 - 1),0));
明日轉折:(ROUND(((FO + FC) / 2)) * AAA),SHIFT1,LINETHICK0,color0000FF;
今日轉折:=ROUND(IF((KK = 1),MIN(FC,FO),IF((KK = (0 - 1)),MAX(FC,FO),IF((REF(KK,1) = 1),MIN(FC,FO),IF((REF(KK,1) = (0 - 1)),MAX(FC,FO),((FC + FO) / 2))))));
DRAWNUMBER((ISLASTBAR AND (AAA = 1)),明日轉折,ROUND(明日轉折),2),SHIFT1,COLORRED;
STICKLINE((((FC > FO) AND (TT = 1)) AND (AAA = 1)),FH,FL,0.4,0),colorFF;
STICKLINE((((FO > FC) AND (TT = 1)) AND (AAA = 1)),FH,FL,0.4,0),colorFF0000;
STICKLINE(((((KK = 1) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF;
STICKLINE(((((KK = 1) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF;
STICKLINE(((((KK = (0 - 1)) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF0000;
STICKLINE(((((KK = (0 - 1)) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF0000;
STICKLINE(((((KK = 0) AND (FC >= FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF;
STICKLINE(((((KK = 0) AND (FC < FO)) AND (TT = 1)) AND (AAA = 1)),FO,FC,8,0),colorFF;
CC:=(CLOSE * TT);
DIFF:=(EMA(CC,26) - EMA(CC,52));
DEA:=EMA(DIFF,52);
MACD:=(2 * (DIFF - DEA));
DIF:=(EMA(CC,26) - EMA(CC,52));
ESS:=EMA(CC,26);
EGG:=EMA(CC,52);
RDIF:=REF(DIF,1);
RSS:=REF(ESS,1);
RGG:=REF(EGG,1);
RDEA:=REF(DEA,1);
RMACD:=REF(MACD,1);
RZZZ:=(RDEA + (((52 + 1) / (2 * (52 - 1))) * RMACD));
XDIF:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDIF)) / ((2 * 52) - (2 * 26)));
XDEA:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RDEA)) / ((2 * 52) - (2 * 26)));
XMACD:=((((((52 - 1) * (26 + 1)) * RGG) - (((52 + 1) * (26 - 1)) * RSS)) + (((26 + 1) * (52 + 1)) * RZZZ)) / ((2 * 52) - (2 * 26)));
AA:=ISLASTBAR;
BB:=BACKSET((AA = 1),1);
Y:=BARSLAST((BB = 1));
X:=1;
TDIF:=(DIF * X);
TSS:=(ESS * X);
TGG:=(EGG * X);
TDEA:=(DEA * X);
TMACD:=(MACD * X);
TZZZ:=(TDEA + (((52 + 1) / (2 * (52 - 1))) * TMACD));
西楚霸王:(((((((((52 - 1) * (26 + 1)) * TGG) * AAA) - ((((52 + 1) * (26 - 1)) * TSS) * AAA)) + (((26 + 1) * (52 + 1)) * TDIF)) * AAA) / ((2 * 52) - (2 * 26))) * AAA);
PARTLINE(((西楚霸王 >= REF(西楚霸王,1)) AND (AAA = 1)),西楚霸王),LINETHICK3,colorFF;
PARTLINE(((西楚霸王 < REF(西楚霸王,1)) AND (AAA = 1)),西楚霸王),LINETHICK3,colorFF00;Q5:=MA(EMA(TT6,4),4);
Q6:=MA(EMA(A3,4),4);
Q7:=MA(EMA(A4,4),4);
Q8:=MA(EMA(TT5,4),4);
STICKLINE(CROSS(BACKSET(ISLASTBAR,10),1) AND AAA=1,EMA(EMA(TT6,4),4),EMA(EMA(TT6,4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,9),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),1),REF(EMA(EMA(TT6,4),4),1),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,8),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),2),REF(EMA(EMA(TT6,4),4),2),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,7),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),3),REF(EMA(EMA(TT6,4),4),3),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,6),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),4),REF(EMA(EMA(TT6,4),4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,5),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),5),REF(EMA(EMA(TT6,4),4),5),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,4),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),6),REF(EMA(EMA(TT6,4),4),6),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,3),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),7),REF(EMA(EMA(TT6,4),4),7),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,2),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),8),REF(EMA(EMA(TT6,4),4),8),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),9),REF(EMA(EMA(TT6,4),4),9),10,0),LINETHICK3,color80;
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(TT6,4),4),9),REF(EMA(EMA(TT6,4),4),9),1),SHIFT1;
STICKLINE(CROSS(BACKSET(ISLASTBAR,10),1) AND AAA=1,EMA(EMA(TT5,4),4),EMA(EMA(TT5,4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,9),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),1),REF(EMA(EMA(TT5,4),4),1),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,8),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),2),REF(EMA(EMA(TT5,4),4),2),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,7),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),3),REF(EMA(EMA(TT5,4),4),3),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,6),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),4),REF(EMA(EMA(TT5,4),4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,5),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),5),REF(EMA(EMA(TT5,4),4),5),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,4),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),6),REF(EMA(EMA(TT5,4),4),6),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,3),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),7),REF(EMA(EMA(TT5,4),4),7),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,2),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),8),REF(EMA(EMA(TT5,4),4),8),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),9),REF(EMA(EMA(TT5,4),4),9),10,0),LINETHICK3,color80;
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(TT5,4),4),9),REF(EMA(EMA(TT5,4),4),9),1),SHIFT1;
STICKLINE(CROSS(BACKSET(ISLASTBAR,10),1) AND AAA=1,EMA(EMA(A3,4),4),EMA(EMA(A3,4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,9),1) AND AAA=1,REF(EMA(EMA(A3,4),4),1),REF(EMA(EMA(A3,4),4),1),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,8),1) AND AAA=1,REF(EMA(EMA(A3,4),4),2),REF(EMA(EMA(A3,4),4),2),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,7),1) AND AAA=1,REF(EMA(EMA(A3,4),4),3),REF(EMA(EMA(A3,4),4),3),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,6),1) AND AAA=1,REF(EMA(EMA(A3,4),4),4),REF(EMA(EMA(A3,4),4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,5),1) AND AAA=1,REF(EMA(EMA(A3,4),4),5),REF(EMA(EMA(A3,4),4),5),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,4),1) AND AAA=1,REF(EMA(EMA(A3,4),4),6),REF(EMA(EMA(A3,4),4),6),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,3),1) AND AAA=1,REF(EMA(EMA(A3,4),4),7),REF(EMA(EMA(A3,4),4),7),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,2),1) AND AAA=1,REF(EMA(EMA(A3,4),4),8),REF(EMA(EMA(A3,4),4),8),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(A3,4),4),9),REF(EMA(EMA(A3,4),4),9),10,0),LINETHICK3,color80;
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(A3,4),4),9),REF(EMA(EMA(A3,4),4),9),1),SHIFT1;
STICKLINE(CROSS(BACKSET(ISLASTBAR,10),1) AND AAA=1,EMA(EMA(A4,4),4),EMA(EMA(A4,4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,9),1) AND AAA=1,REF(EMA(EMA(A4,4),4),1),REF(EMA(EMA(A4,4),4),1),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,8),1) AND AAA=1,REF(EMA(EMA(A4,4),4),2),REF(EMA(EMA(A4,4),4),2),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,7),1) AND AAA=1,REF(EMA(EMA(A4,4),4),3),REF(EMA(EMA(A4,4),4),3),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,6),1) AND AAA=1,REF(EMA(EMA(A4,4),4),4),REF(EMA(EMA(A4,4),4),4),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,5),1) AND AAA=1,REF(EMA(EMA(A4,4),4),5),REF(EMA(EMA(A4,4),4),5),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,4),1) AND AAA=1,REF(EMA(EMA(A4,4),4),6),REF(EMA(EMA(A4,4),4),6),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,3),1) AND AAA=1,REF(EMA(EMA(A4,4),4),7),REF(EMA(EMA(A4,4),4),7),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,2),1) AND AAA=1,REF(EMA(EMA(A4,4),4),8),REF(EMA(EMA(A4,4),4),8),10,0),LINETHICK3,color80;
STICKLINE(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(A4,4),4),9),REF(EMA(EMA(A4,4),4),9),10,0),LINETHICK3,color80;
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,1),1) AND AAA=1,REF(EMA(EMA(A4,4),4),9),REF(EMA(EMA(A4,4),4),9),1),SHIFT1;
JT:=(REF(EMA(EMA(A3,4),4),9)+REF(EMA(EMA(A4,4),4),9))/2;
STICKLINE(ISLASTBAR AND AAA=1,JT,JT,12,0);
DRAWNUMBER(CROSS(BACKSET(ISLASTBAR,1) AND AAA=1,1),JT,JT,1),SHIFT1;
A00:=MA(CLOSE,22);
A03:=(EMA(HIGH,5)+EMA(LOW,5)+EMA(CLOSE,5)*2)/4;
A04:=REF(A03,1);
A02:=FO>FC AND KK=0 AND FC<FO AND AAA=1;DRAWICON(CLOSE>O,LOW,4),ALIGN5;
DRAWICON(CLOSE<O,LOW,5),ALIGN5;
STICKLINE(FC>FO AND TT=1 AND AAA=1,FH,FL,0.4,0),colorFF;
STICKLINE(FO>FC AND TT=1 AND AAA=1,FH,FL,0.4,0),colorFF0000;
STICKLINE(KK=1 AND FC>=FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF;
STICKLINE(KK=1 AND FC<FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF;
STICKLINE(KK=-1 AND FC>=FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF0000;
STICKLINE(KK=-1 AND FC<FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF0000;
STICKLINE(KK=0 AND FC>=FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF;
STICKLINE(KK=0 AND FC<FO AND TT=1 AND AAA=1,FO,FC,8,0),colorFF;gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:REF(明日阻力 , 1),LINETHICK0;
今日支撑:REF(明日支撑 , 1),LINETHICK0;
STICKLINE(BARSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF;
STICKLINE(BARSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00;
STICKLINE(BARSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;
STICKLINE(BARSTATUS=2 and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF0000;DRAWTEXTEX(1,1,200,30,STKLABEL+' '+STKNAME),LINETHICK6,ColorFFFF80;
wyy1:=WEEKDAY,LINETHICK0;
wWj:=' 星期';
wWjj:=IF(wyy1=5 ,wWj+'五',IF(wyy1=4 ,wWj+'四',
IF(wyy1=3 ,wWj+'三',IF(wyy1=2 ,wWj+'二',IF(wyy1=1 ,wWj+'1',wWj)))));
wyy2:=LMONTH;
wyy3:=LDAY;
wWw:=IF( BARSTATUS=2 ,' 农历 '+NUMTOSTR(wyy2,0)+'月 '+NUMTOSTR(wyy3,0)+'日',' ');
wWh:=IF( BARSTATUS=2 ,NUMTOSTR(date+1000000,0),' ' );
DRAWTEXTEX(1,1,120 ,30 ,' '+wWh+wWjj+wWw),LINETHICK3,Color00FFFF;
DRAWTEXTEX(1,1,20,30,'楚河*<^o^>*汉界'),LINETHICK6,Color0000ff;
HH:=DYNAINFO(39);
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
TH:=DYNAINFO(39);
换手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXTEX(1,1,20,840,'当日振幅:'+NUMTOSTR(R,2)+'% '+NUMTOSTR(RH,2)+'元 '+' 当前换手率:'+NUMTOSTR(换手率,2)+'% '),ColorFFFFFF;
var100:='所属板块:';
if inblock('电力')=1 then var100:=var100+' 电力';
if inblock('电脑')=1 then var100:=var100+' 电脑';
if inblock('电器')=1 then var100:=var100+' 电器';
if inblock('电子信息')=1 then var100:=var100+' 电子信息';
if inblock('房地产')=1 then var100:=var100+' 房地产';
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';
if inblock('钢铁')=1 then var100:=var100+' 钢铁';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供气')=1 then var100:=var100+' 供水供气';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纤')=1 then var100:=var100+' 化纤';
if inblock('机械')=1 then var100:=var100+' 机械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通设施')=1 then var100:=var100+' 交通设施';
if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';
if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';
if inblock('其他行业')=1 then var100:=var100+' 其他行业';
if inblock('汽车')=1 then var100:=var100+' 汽车';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外贸')=1 then var100:=var100+' 外贸';
if inblock('医药')=1 then var100:=var100+' 医药';
if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';
if inblock('有色金属')=1 then var100:=var100+' 有色金属';
if inblock('运输物流')=1 then var100:=var100+' 运输物流';
if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肃')=1 then var100:=var100+' 甘肃';
if inblock('广东')=1 then var100:=var100+' 广东';
if inblock('广西')=1 then var100:=var100+' 广西';
if inblock('贵州')=1 then var100:=var100+' 贵州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江苏')=1 then var100:=var100+' 江苏';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('辽宁')=1 then var100:=var100+' 辽宁';
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';
if inblock('宁夏')=1 then var100:=var100+' 宁夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山东')=1 then var100:=var100+' 山东';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陕西')=1 then var100:=var100+' 陕西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重庆')=1 then var100:=var100+' 重庆';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('奥运')=1 then var100:=var100+' 奥运';
if inblock('创投')=1 then var100:=var100+' 创投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盘')=1 then var100:=var100+' 大盘';
if inblock('股权改革')=1 then var100:=var100+' 股权改革';
if inblock('股权投资')=1 then var100:=var100+' 股权投资';
DRAWTEXTEX(1,1,20,960,var100),color00ffff;
DRAWTEXTEX(1,1,20,900,'总股本:'+NUMTOSTR(DD,0)+'万股' +' 流通A股:'+NUMTOSTR(SS,0)+'万股'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+' 每股收益:'+NUMTOSTR(GG,3)),COLORbbffff;VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4444:=CROSS(VAR3333,0.9);
压力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5;
支撑: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),Color00b4ff;下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
aRSV:=SMA(下档线,3,1);
aK:=SMA(aRSV,3,1);
aD:=((3 * aRSV) - (2 * aK));
aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
aRSV24:=SMA(aJ12,3,1);
aK24:=SMA(aRSV24,3,1);
aD24:=((3 * aRSV24) - (2 * aK24));
撑压位:=IF(CROSS(aD24,aD),HIGH,REF(HIGH,BARSLAST(CROSS(aD24,aD))));
底:=LLV(HIGH,30);
STICKLINE(BARSTATUS=2 ,撑压位,撑压位,40,1),LINETHICK1,COLORFFFFFF;
DRAWTEXT(BARSTATUS=2 ,撑压位,' 撑压'),COLORFFFFFF;
STICKLINE(BARSTATUS=2 ,底,底,40,1),COLOR00FF00,LINETHICK1;
DRAWTEXT(BARSTATUS=2 ,底,' 底线'),COLOR00FF00;
partline(c>0,c*2-ref(c,3)),SHIFT3,color005555;
partline(c>0,ref(c,1)*2-ref(c,4)),SHIFT2,color005500;
partline(c>0,ref(c,2)*2-ref(c,5)),SHIFT1,color55335;

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】