股海网带来通达信原创主图 原创主图飞越彩泓极品与大家分享（源码）无未来函数。
近期在家休假，闲来无事，把十几年前唐能通大师的一些文章和作品拿来翻阅，偶有灵感，特别制作了这个主图，暂命名飞越彩泓。还是有点不舒服有点头疼，先上图，明天再续。。。。。。
R1：=（CLOSE》REF（CLOSE，1） AND CLOSE》REF（CLOSE，2））;
R2：=（REF（R1，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R3：=（REF（R2，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R4：=（REF（R3，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R5：=（REF（R4，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R6：=（REF（R5，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R7：=（REF（R6，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R8：=（REF（R7，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R9：=（REF（R8，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
RA：=（REF（R9，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
RB：=（REF（RA，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
RC：=（REF（RB，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
RD：=（CLOSE《REF（CLOSE，1） AND CLOSE《REF（CLOSE，2））;
RE：=（REF（RD，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
RF：=（REF（RE，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R10：=（REF（RF，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R11：=（REF（R10，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R12：=（REF（R11，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R13：=（REF（R12，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R14：=（REF（R13，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R15：=（REF（R14，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R16：=（REF（R15，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R17：=（REF（R16，1） AND CLOSE《=REF（CLOSE，1） AND CLOSE》=REF（CLOSE，2））;
R18：=（REF（R17，1） AND CLOSE》=REF（CLOSE，1） AND CLOSE《=REF（CLOSE，2））;
R19：=REF（RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18，1） AND R1;
R1A：=（（REF（R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC，1）） AND RD）;
短买春：R19，NODRAW，COLOR00DD00;
秋离场：R1A，NODRAW，COLOR2288EE;
红持股：R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC，NODRAW，COLOR0000FF;
急速超跌关注：=（CLOSE-MA（CLOSE，34））/MA（CLOSE，34）*100《-14，COLORBBBBBB，NODRAW;
Q1：=CONST（IF（短买春，0，IF（秋离场，180，IF（红持股，220，IF（急速超跌关注，150，100））））），NODRAW;
Q2：=CONST（IF（短买春，150，IF（秋离场，100，IF（红持股，0，IF（急速超跌关注，150，100））））），NODRAW;
Q3：=CONST（IF（短买春，0，IF（秋离场，50，IF（红持股，50，IF（急速超跌关注，150，100））））），NODRAW;
DRAWGBK（C》0，RGB（Q1，Q2，Q3），RGB（0，50，50），0，‘ ’，0）;
{彩色K线}
TYX3：=MA（REF（HHV（（C+L+O+H）/4，30），1），3）;
TYX4：=MA（（C+L+O+H）/4，13）;
TYX5：=EMA（（C+L+O+H）/4，21）;
{空心红}
STICKLINE（C《TYX5 AND C》O，H，L，0，0），COLORRED;
STICKLINE（C《TYX5 AND C》O，C，O，3，1），COLORRED;
{深绿}
STICKLINE（C《TYX5 AND C《O，H，L，0，0），COLOR007700;
STICKLINE（C《TYX5 AND C《O，C，O，3，0），COLOR005500;
STICKLINE（C《TYX5 AND C《O，C，O，2，0），COLOR006600;
STICKLINE（C《TYX5 AND C《O，C，O，1，0），COLOR007700;
{蓝}
STICKLINE（C》TYX5 AND C《O，H，L，0，0），COLORFFDD44;
STICKLINE（C》TYX5 AND C《O，C，O，3，0 ），COLORFF7700;
STICKLINE（C》TYX5 AND C《O，C，O，2，0 ），COLORFFAA22;
STICKLINE（C》TYX5 AND C《O，C，O，1 ，0 ），COLORFFDD44;
{黄}
STICKLINE（C》TYX5 AND C》O，H，L，0，0 ），COLOR00EEFF;
STICKLINE（C》TYX5 AND C》O，C，O，3，0 ），COLOR00AAFF;
STICKLINE（C》TYX5 AND C》O，C，O，2，0 ），COLOR00CCFF;
STICKLINE（C》TYX5 AND C》O，C，O，1，0 ），COLOR00EEFF;
{粉红}
STICKLINE（C》TYX4 AND C》O，H，L，0，0），COLORFF66AA;
STICKLINE（C》TYX4 AND C》O，C，O，3，0 ），COLORFF11FF;
STICKLINE（C》TYX4 AND C》O，C，O，2，0 ），COLORFF44FF;
STICKLINE（C》TYX4 AND C》O，C，O，1，0 ），COLORFF66FF;
{亮灰}
STICKLINE（C》TYX4 AND C《O，H，L，0，0），COLOR999999;
STICKLINE（C》TYX4 AND C《O，C，O，3，0），COLOR555555;
STICKLINE（C》TYX4 AND C《O，C，O，2，0），COLOR777777;
STICKLINE（C》TYX4 AND C《O，C，O，1，0），COLOR999999;
{深红}
STICKLINE（C》TYX3 AND C》O，H，L，0，0），COLOR0000DD;
STICKLINE（C》TYX3 AND C》O，C，O，3，0），COLOR000099;
STICKLINE（C》TYX3 AND C》O，C，O，2，0），COLOR0000BB;
STICKLINE（C》TYX3 AND C》O，C，O，1，0），COLOR0000DD;
MA5:MA（CLOSE，5），COLORWHITE，LINETHICK2;
MA10:MA（CLOSE，10），COLORYELLOW，LINETHICK2;
MA20:MA（CLOSE，20），COLORMAGENTA，LINETHICK2;
MA40:MA（CLOSE，40），COLORF0F000，LINETHICK2;
MA60:MA（CLOSE，60），COLORGREEN，LINETHICK2;
MA120:MA（CLOSE，120），COLORBROWN，LINETHICK2;
MA250:MA（CLOSE，250），COLORBLUE，LINETHICK2;
MA600:MA（CLOSE，300），COLORRED，LINETHICK2;
DRAWICON（CROSS（MA60，MA120），MA60，1）; {60日上穿120日做记号}
DRAWICON（CROSS（MA60，MA250），MA60，1）; {60日上穿250日做记号}
DRAWICON（CROSS（MA60，MA600），MA60，1）; {60日上穿600日做记号}
DRAWICON（CROSS（MA120，MA250），MA120，1）;{120日上穿250日做记号}
DRAWICON（CROSS（MA120，MA600），MA120，1）;{120日上穿600日做记号}
DRAWICON（CROSS（MA250，MA600），MA250，1）; {250日上穿600日做记号}
反弹托：=MA5》MA20 AND MA5》MA20 AND MA20《MA60 AND MA60《MA120 AND CROSS（MA10，MA20）;
月价托：=MA5》MA20 AND MA5》MA10 AND CROSS（MA10，MA20）;
季价托：=MA20》MA60 AND MA20》MA40 AND CROSS（MA40，MA60）;
短长价托：=MA5》MA60 AND MA5》MA10 AND CROSS（MA10，MA60）;
半年托：=MA60》MA120 AND CROSS（MA60，MA120）;
熊来：=MA60《MA120 AND CROSS（MA120，MA60）;
年托：=MA120》MA250 AND CROSS（MA120，MA250）;
月蜘蛛：=MA5》MA10 AND MA10》MA20 AND CROSS（MA5，MA20）AND CROSS（MA10，MA20）;
DRAWTEXT（CROSS（MA250，MA600），MA250，‘飞越彩泓’），COLORMAGENTA，LINETHICK4;
DRAWTEXT（月蜘蛛，L-0.12，‘金蜘蛛’），COLOR0011FF;
STICKLINE（月蜘蛛，H，L，0.5，1），COLOR0011FF;
STICKLINE（月蜘蛛，O，C，6，1），LINETHICK2，COLOR0011FF;
DRAWTEXT（反弹托，L-0.12，‘反弹托’），COLOR0055FF;
STICKLINE（反弹托，H，L，0.5，1），COLOR0055FF;
STICKLINE（反弹托，O，C，6，1），LINETHICK2，COLOR0055FF;
DRAWTEXT（月价托，L-0.12，‘月价托’），COLORYELLOW;
STICKLINE（月价托，H，L，0.5，1），COLORYELLOW;
STICKLINE（月价托，O，C，6，1），LINETHICK2，COLORYELLOW;
DRAWTEXT（季价托，L-0.12，‘季价托’），COLOR0099FF;
STICKLINE（季价托，H，L，0.5，1），COLOR0099FF;
STICKLINE（季价托，O，C，6，1），LINETHICK2，COLOR0099FF;
DRAWTEXT（短长价托，L-0.12，‘短长价托’），COLOR36C0C1;
STICKLINE（短长价托，H，L，0.4，1），COLOR36C0C1;
STICKLINE（短长价托，O，C，6，1），LINETHICK2，COLOR36C0C1;
DRAWTEXT（半年托，MA120-0.08，‘牛市来’），COLORRED;
DRAWTEXT（年托，MA250-0.08，‘年托’），COLORRED;
VOL5：=MA（VOL，5），COLORWHITE;
VOL10：=MA（VOL，10），COLORYELLOW;
VOL20：=MA（VOL，20），COLORFF00FF ;
量托：=VOL5》=VOL20 AND CROSS（VOL10，VOL20） AND REF（VOL10，1）《REF（VOL20，1）;
DRAWTEXT（量托，L-0.12，‘量托’），COLORWHITE;
STICKLINE（量托，H，L，0.4，1），COLORWHITE;
STICKLINE（量托，O，C，6，1），LINETHICK2，COLORWHITE;
AA：=BARSLAST（MA60》MA20 AND （MA20=MA10 OR MA20》MA10））;
BB：=REF（COUNT（C《MA60，AA）=AA，1）;
CC：=CROSS（C，MA60） AND VOL》MA（VOL，5） AND （C-REF（C，1））/REF（C，1）*100》3;
芙蓉出水：=BB AND CC，COLOR00FF00;
DRAWTEXT（芙蓉出水，H+0.12，‘芙蓉出水’），COLORFF00FF;
STICKLINE（芙蓉出水，H，L，0.5，1），COLORFF00FF;
STICKLINE（芙蓉出水，O，C，4，1），LINETHICK2，COLORFF00FF;
MA1：=MA（CLOSE，5）;
MA2：=MA（CLOSE，10）;
MA3：=MA（CLOSE，30）;
ZJ：=AMOUNT/10000;{资金}
TM：=V-MA（V，10）;{量填满}
一穿三：=MA1》O AND MA2》O AND MA3》O AND MA1《C AND MA2《C AND MA3《C AND CLOSE》OPEN ;
DRAWTEXT（一穿三，L-0.12，‘穿三线’），COLORFFFFFF;
STICKLINE（一穿三，H，L，0.5，1），COLORFFFFFF;
STICKLINE（一穿三，O，C，3，1），LINETHICK2，COLORFFFFFF;
C6：=REF（C，1）;
RSV：=（C-LLV（L，9））/（HHV（H，9）-LLV（L，9））*100;
K：=SMA（RSV，3，1）;
D：=SMA（K，3，1）;
J：=3*K-2*D;
X：=LLV（J，2）=LLV（J，8）;
Y：=IF（CROSS（J，REF（J+0.01，1）） AND X AND J《20，30，0）;
主力：=EMA（ （CLOSE-MA（CLOSE，3））/MA（CLOSE，3），2）;
散户：=EMA（ （CLOSE-MA（CLOSE，20））/MA（CLOSE，20），7）;
VVAR2：=LLV（LOW，10）;
VVAR3：=HHV（HIGH，25）;
DRAWTEXT（CROSS（J，REF（J+0.01，1）） AND X AND J《20，LOW，‘短进’），COLORFF00FF;
DRAWTEXT（CROSS（主力，散户） AND 主力《0 AND 散户《0，LOW，‘见底’），COLORRED;
DRAWICON（CROSS（主力，散户） AND 主力《0 AND 散户《0，LOW，1）;
V1：=ABS（（2*CLOSE+HIGH+LOW）/4-MA（CLOSE，20））/MA（CLOSE，20）;
V2：=（1-7/100）*（DMA（CLOSE，V1））;
V3：=（1+7/100）*（DMA（CLOSE，V1））;
支撑：REFDATE（V2，DATE），POINTDOT，LINETHICK3，COLORCC66FF;
阻力：REFDATE（V3，DATE），POINTDOT，LINETHICK3，COLORGREEN;STICKLINE（OPEN》=CLOSE，CLOSE，OPEN，3，0），COLORFF7700;
STICKLINE（OPEN》=CLOSE，CLOSE，OPEN，2.2，0），COLORFF9900;
STICKLINE（OPEN》=CLOSE，CLOSE，OPEN，1.5，0），COLORFFBB00;
STICKLINE（OPEN》=CLOSE，CLOSE，OPEN，0.5，0），COLORCYAN;
拉升线：IF（CURRBARSCOUNT=1 AND REF（C，1）《REF（C，2） AND C》REF（C，1） AND MA5》REF（MA5，1），CONST（REF（C，1）*1.01），DRAWNULL），COLORYELLOW;
M1:STICKLINE（CURRBARSCOUNT=1 AND C》=REF（C，1），拉升线，拉升线*0.998，20，0），COLORYELLOW;
DRAWTEXT（CURRBARSCOUNT=1 AND 拉升线=CONST（REF（C，1）*1.01），L*0.99，‘上穿此线介入’），COLORYELLOW;
DRAWKLINE（H，拉升线，L，C）;
{筹码突破}
筹码突破：C》TYX3 AND（C-REF（C，1））*100/REF（C，1）》=（10-0.01*100/REF（C，1）），COLORRED;
{45度异动}
X1：=（C+L+H）/3;
BB13：=ATAN（EMA（X1，13）-REF（EMA（X1，13），1））*3.1416*10;
EMA8：=EMA（C，8）;
DRAWTEXT（FILTER（BB13》1 AND EMA（X1，13）》REF（EMA（X1，8），1），10），
EMA8，‘∠45上升’），COLORYELLOW;
{底顶侦探}
VAR1：=（2*CLOSE+HIGH+LOW+OPEN）/5;
VAR2：=EMA（EMA（EMA（VAR1，4），4），4）;
SJ：=（VAR2-REF（VAR2，1））/REF（VAR2，1）*100， COLORSTICK;
SD：=MA（SJ，2）;
SK：=MA（SJ，1）;
VAR3：=CROSS（SK，SD） AND SK《0;
VAR4：=CROSS（SK，0）;
VAR6：=CROSS（SK，SD） AND SK》0;
BY：=VAR3， STICK;
DRAWICON（BY，L*0.96，23）;
BE：=VAR4 OR VAR6， STICK;
DRAWICON（BE，L*0.96，25）;
VAR7：=CROSS（SD，SK）;
MC：=VAR7， STICK;
{漓江}
VAR13：=（2*CLOSE+HIGH+LOW）/4;
T：=80， POINTDOT;
VAR14：=LLV（LOW，5）;
VAR15：=HHV（HIGH，4）;
SK1：=EMA（（VAR13-VAR14）/（VAR15-VAR14）*100，4）;
SD1：=EMA（0.667*REF（SK1，1）+0.333*SK1，2）;
{VAR4：=（HHV（HIGH，4）-VAR1）/（HHV（HIGH，4）-LLV（LOW，4））*100-72;
漓江倒影： SMA（VAR4，4，1）， LINESTICK;}
VAR17：=（VAR13-LLV（LOW，4））/（HHV（HIGH，4）-LLV（LOW，4））*100;
VAR18：=SMA（VAR17，2，1）;
桂林山水：=SMA（VAR18，2，1）， LINESTICK;
{顶底背离}
LC：=REF（CLOSE，1）;
RSI：=（（SMA（MAX（（CLOSE - LC），0），3，1） / SMA（ABS（（CLOSE - LC）），3，1）） * 100）;
FF：=EMA（CLOSE，3）;
MA15：=EMA（CLOSE，21）;
DRAWTEXT（CROSS（FF，MA15），（LOW * 0.99），‘底背离’），COLORRED;
{DRAWICON（CROSS（FF，MA15），（LOW * 0.99），7）; }
{顶背离}
RSI1：=（（SMA（MAX（（CLOSE - （REF（CLOSE，1））），0），3，1） / SMA（ABS（（CLOSE - （REF（CLOSE，1）））），3，1））* 100）;
DRAWTEXT（CROSS（88，RSI1） AND （MA（C，3））》（EMA（C，3）） ，（HIGH + 0.3），‘顶背离’），COLORGREEN;
{DRAWICON（CROSS（88，RSI1） AND （MA（C，3））》（EMA（C，3）） ，（HIGH + 0.3），8）; };
DRAWTEXT（REF（C，BARSLAST（REF（CROSS（“MACD.DIF”，“MACD.DEA”），1））+1）》C AND
REF（“MACD.DIF”，BARSLAST（REF（CROSS（“MACD.DIF”，“MACD.DEA”），1））+1）
《“MACD.DIF” AND CROSS（“MACD.DIF”，“MACD.DEA”）
》0，L-0.02，‘MACD底背离’），COLORRED;{MACD底背离}
DRAWTEXT（REF（C，BARSLAST（REF（CROSS（“KDJ.K”，“KDJ.D”），1））+1）》C AND
REF（“KDJ.K”，BARSLAST（REF（CROSS（“KDJ.K”，“KDJ.D”），1））+1）《“KDJ.K” AND
CROSS（“KDJ.K”，“KDJ.D”），L-0.10，‘KDJ底背离’），COLORBLUE;{KDJ底背离}
DRAWTEXT（REF（C，BARSLAST（REF（CROSS（“RSI.RSI1”，“RSI.RSI2”），1））+1）》C AND
REF（“RSI.RSI1”，BARSLAST（REF（CROSS（“RSI.RSI1”，“RSI.RSI2”），1））+1）
《“RSI.RSI1” AND CROSS（“RSI.RSI1”，“RSI.RSI2”）
》0，L-0.18，‘RSI底背离’）;{RSI底背离};
DRAWTEXT（REF（C，BARSLAST（REF（CROSS（“MACD.DEA”，“MACD.DIF”），1））+1）《C
AND REF（“MACD.DIF”，BARSLAST（REF（CROSS（“MACD.DEA”，“MACD.DIF”），1））+1）
》“MACD.DIF” AND CROSS（“MACD.DEA”，“MACD.DIF”）
》0，H+0.16，‘MACD顶背离’），COLORGREEN;{MACD顶背离};
DRAWTEXT（REF（C，BARSLAST（REF（CROSS（“KDJ.D”，“KDJ.K”），1））+1）《C
AND REF（“KDJ.K”，BARSLAST（REF（CROSS（“KDJ.D”，“KDJ.K”），1））+1）
》“KDJ.K” AND CROSS（“KDJ.D”，“KDJ.K”）》0，H+0.08，‘KDJ顶背离’）;{KDJ顶背离};
{涨跌提示}
涨停：=IF（（C-REF（C，1））*100/REF（C，1）》=（10-0.01*100/REF（C，1）），1，0）;
STICKLINE（涨停，OPEN，CLOSE，1.5，0），COLORYELLOW;
跌停：=IF（（REF（C，1）-C）*100/REF（C，1）》=（10-0.01*100/REF（C，1）），1，0）;
STICKLINE（跌停，OPEN，CLOSE，1.5，0），COLORWHITE;
