一次偶然机会，得到如下源码，据说是李君壮的君氏系统中的
个人感觉还不错
特此和大家分享，也求各位老师鉴定和意见

{5分钟ma}
a1:ma(c,12);a2:ma(c,24);a3:ma(c,48),COLORRED;a4:ma(c,144);a5:ma(c,240);a6:ma(c,480);
dk:=a3;
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorred;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorred;
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorgreen;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorgreen;

5分利用

对5分钟系统线的有效应用

5分钟系统线为你提供研判股指、股票或权证强弱的有力依据。如果要做到高抛低吸，必须在其系统线各线距离较大的情况下才能实施，首先你要确认股指或股票价咯处于5分钟的6、7号线之上，当1、2号线与3号线的距离较大时，短线高点出现，即不能再创新高，此时抛出，跌破1、2号线后有可能在3号线获得支撑，依此类推，当3号线和4、5号线的距离较大时，抛出后跌破3号线，有可能在4、5号线获得支撑。如果系统线各线距离不大，则不能做高抛低吸，因为跌破3号线后可能下跌不多，很快在4号线获得支撑后返身而上，没什么短差，所以均线距离不大时只能作为关注股指或股价的压力或支撑，向上放量突破密集的均线区域时将有可能快速上涨，向下跌破密集均线区域时将出现快速下跌。特别要结合5分钟的OBV能量，和5分钟的均量线，才能更有效地判断走势。OBV不断创新高就是好事情，股指或股票向上时，5分钟成交量连续两个时间段（2个5分钟）上穿5分钟的1、2号线均量线，说明股指或股票有向上攻击的欲望，连续站在1、2号均量线之上，则上涨得以延续。5分钟BOLL也是研判的主要依据，股指或股价，能不断上穿上轨，通道向上，就是好事情，如果被中轨所压，则弱势，要小心。

{15分钟ma}
a1:ma(c,8);a2:ma(c,16),COLORRED;a3:ma(c,48),COLORRED;a4:ma(c,80);a5:ma(c,112);a6:ma(c,160);a7:ma(c,245);a8:ma(c,320);
dk:=a2;
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorred;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorred;
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorgreen;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorgreen;

{30分钟ma}
a1:ma(c,4);a2:ma(c,8),COLORRED;a3:ma(c,24),COLORRED;a4:ma(c,40);a5:ma(c,80);a6:ma(c,160);
dk:=a2;
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorred;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorred;
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorgreen;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorgreen;

{60分钟ma}
a1:ma(c,4);a2:ma(c,12);a3:ma(c,20),COLORRED;a4:ma(c,40);a5:ma(c,80);a6:ma(c,120);a7:ma(c,240);
dk:=a3;
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorred;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorred;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorred;
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorgreen;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorgreen;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorgreen;


翻倍黑马主图（日线）
a5:ma(c,5);
a24:ma(c,24);
a72:ma(c,72);
a133:ma(c,133);
a200:ma(c,200);
DK:=a24;
A1:=a5;
STICKLINE(DK<=A1 AND CLOSE>=OPEN,HIGH,LOW,0.1,1),COLORRED;
STICKLINE(DK<=A1 AND CLOSE>=OPEN,CLOSE,OPEN,8,1),COLORRED;
STICKLINE(DK<=A1 AND CLOSE<OPEN,HIGH,LOW,0.1,0),COLORRED;
STICKLINE(DK<=A1 AND CLOSE<OPEN,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(DK>A1 AND CLOSE>=OPEN,HIGH,LOW,0.1,1),COLORGREEN;
STICKLINE(DK>A1 AND CLOSE>=OPEN,CLOSE,OPEN,8,1),COLORGREEN;
STICKLINE(DK>A1 AND CLOSE<OPEN,HIGH,LOW,0.1,0),COLORGREEN;
STICKLINE(DK>A1 AND CLOSE<OPEN,CLOSE,OPEN,8,0),COLORGREEN;
DRAWICON(CROSS(A1,DK),LOW*0.99,4);
DRAWICON(CROSS(DK,A1),HIGH*1.01,5);
IF(CLOSE>SAR(10,2,20),SAR(10,2,20),CLOSE),CIRCLEDOT,COLORMAGENTA;
IF(CLOSE<SAR(10,2,20),SAR(10,2,20),CLOSE),CIRCLEDOT,COLORGREEN;
CLOSE,CIRCLEDOT,COLORBLACK;