优化版神奇主图源码及其用法(大智慧)

优化版神奇主图源码及其用法(大智慧)

源码正文：

神奇主图用法：
1、操作线与支撑线粘合在一起（等值）向下，坚决持币观望。待操作线突然上升，则是较好底部买点。
2、操作线与拉升线粘合在一起（等值）向上，坚决持股不卖。待操作线突然下降，则是较好顶部卖点。
3、操作线上升而拉升线下降，有可能出现诱多或洗盘；操作线下降而拉升线上升，表明将有大行情。出现这种情况时以观望为主，然后根据其他指示果断操作。股价突破庄压，同时，庄压与操作线同时向上，为快速行情，可大胆持股。
4、如果股价突破庄压后，庄压线下降，须提防诱多，可能会有较大幅度下跌。拉升线与庄压线高位横向延伸，为盘整或下跌行情，尽量避免操作。
5、k线图上之黄色圆圈为涨停先锋短线买点，准确率在75%左右，可规矩其他指标综合判断，确定是否买入。操作线转折向上、黄圈正好压在k线上的买点准确率极高，为极佳中长线买入点。
6、k线为红色持股，k线为蓝色持币。
7、粉色“买”为拉升型买点；黄色“买”和白色“荐”为探底型买点；红色“买”为长线买点。当“买”与黄色圆圈重合以及副图的“涨停先锋”时，准确率在 90%以上。
8、绿脸和黄色“卖”为短线卖点，蓝色“减”为中线卖点，可结合其他指标综合判断。

说明：我不会发图，大家可以引入公式验证一下（注意要设置为“主图叠加”）：我2009年1月5日根据指标买入600491 龙元建设，期间一直根据指标的提示反复做波段，到2009年11月26日彻底清仓。我的资金翻了几倍，大家可以算一下。建议大家一年只炒一只股，反复做波段，这样操作比打一枪换一炮要好得多！
卖出600491后，我于2009年12月24日已根据指标买入000710 天兴仪表，准备2010年一年用这个股反复做波段。

操作: ma((LOW+HIGH+CLOSE)/3,5),LINETHICK2,COLORRED{XG51};
拉升:HHV(操作,13),COLORWHITE,LINETHICK1{XG51};
压力:=HHV(操作,60),COLORWHITE{XG51};
支撑:LLV(操作,13),LINETHICK1,COLOR00FF00{XG51};
底部支撑:= LLV(LOW,60)*1.02,COLOR00CCFF{XG51};
顶部:= HHV(HIGH,60)*0.98,COLORFFFFCC;

VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
stICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,0),COLORWHITE{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66{XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORBLUE{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORred{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF;

Pr2:=(2*CLOSE+HIGH+LOW)/4{XG51};
Pr4:=llv(LOW,5){XG51};
Pr5:=hhv(HIGH,4){XG51};
散户:=ema((Pr2-Pr4)/(Pr5-Pr4)*100,4){XG51};
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2){XG51};
涨停先锋1:=if(crOSS(散户,庄家) AND 散户<50 AND 29<散户 AND
C>O,20,0),COLORwhite;

f:=c>o or (c=o and c>ref(c,1)){XG51};
支撑价:=llv(LOW,19){XG51};
阻力价:=hhv(HIGH,19){XG51};
PPr1:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
PPr2:=EMA(PPr1,9){XG51};
PPr3:=(CLOSE*2.5/100+CLOSE){XG51};
PPr4:=EMA(C,3){XG51};
PPr5:=llv(HIGH,240){XG51};
PPr6:=100*(CLOSE-PPr5)/PPr5{XG51};
PPr7:=REF(llv(CLOSE,480),1){XG51};
PPr8:=REF(hhv(CLOSE,480),1){XG51};
PPr9:=100*(CLOSE-PPr7)/(PPr8-PPr7){XG51};
PPrA:=(CLOSE-llv(CLOSE,981))/(hhv(CLOSE,981)-llv(CLOSE,981))*100{XG51};
PPrB:=(CLOSE-llv(CLOSE,393))/(hhv(CLOSE,393)-llv(CLOSE,393))*100{XG51};
PPrC:=(CLOSE-llv(LOW,981))/(hhv(HIGH,981)-llv(LOW,981))*100{XG51};
PPrD:=(CLOSE-llv(LOW,393))/(hhv(HIGH,393)-llv(LOW,393))*100{XG51};
PPrE:=PPrC>98.5 OR PPrD>98.5{XG51};
PPrF:=EMA(100*(CLOSE-llv(LOW,100))/(hhv(HIGH,100)-llv(LOW,100)),5)/4{XG51};
PPr13:=PPrA=0 AND PPrC=0 AND PPr6<0{XG51};
PPr14:=PPrA=100 AND PPrC=100{XG51};
PPr15:=PPrB=0 OR PPrD=0 AND PPr9<0{XG51};
PPr16:=PPrB=100 AND PPrD=100{XG51};
PPr17:=PPr6<0 AND PPr9<0{XG51};
PPr18:=PPr13 AND PPr15{XG51};
PPr19:=PPr14 AND PPr16{XG51};
PPr1B:=SMA(MAX(CLOSE-REF(CLOSE,1),0),49,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),6,1)*100{XG51};
PPr1C:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1)*100{XG51};
PPr1D:=BARSCOUNT(CLOSE){XG51};
PPr1E:=PPr1B<20 AND PPr1C<23 AND PPr1D>35{XG51};
PPr1F:=PPr1E AND COUNT(PPr1E,1)=1{XG51};
PPr20:=REF(CLOSE,1){XG51};
PPr21:=SMA(MAX(CLOSE-PPr20,0),34,1)/SMA(ABS(CLOSE-PPr20),7,1)*100{XG51};
PPr22:=SMA(MAX(CLOSE-PPr20,0),13,1)/SMA(ABS(CLOSE-PPr20),13,1)*100{XG51};
PPr23:=BARSCOUNT(CLOSE){XG51};
PPr24:=PPr21<20 AND PPr22<23 AND PPr23>35{XG51};
PPr25:=PPrA=0 AND PPrF<1.2 AND PPr17{XG51};
PPr27:=PPr18 AND PPrF<1.2 AND PPr17{XG51};
PPr29:=SUM(HIGH-OPEN,77)/SUM(OPEN-LOW,77)*100{XG51};
PPr2A:=SUM(MAX(0,HIGH-REF(CLOSE,1)),77)/SUM(MAX(0,REF(CLOSE,1)-LOW),77)*100{XG51};
PPr2B:=CROSS(PPr29,69) AND CROSS(PPr2A,80)<150{XG51};
PPr2C:=PPr24 AND PPr1F AND COUNT(PPr24,30)=1{XG51};
PPr2D:=PPr1F AND PPr2C AND PPr25{XG51};
短买:=(CLOSE/REF(CLOSE,1)>1.04 AND (CLOSE>10.8 AND CLOSE<10.83 OR CLOSE>6.86 AND CLOSE<6.88 OR CLOSE>13.82 AND CLOSE<13.84 OR CLOSE>7.28 AND CLOSE<7.3 OR CLOSE>12.4 AND CLOSE<12.42 OR CLOSE>22.33 AND CLOSE<22.35 OR CLOSE>4.68 AND CLOSE<4.7 OR CLOSE>26.29 AND CLOSE<26.31 OR CLOSE>7.65 AND CLOSE<7.67 OR CLOSE>13.4 AND CLOSE<13.42 OR CLOSE>7.58 AND CLOSE<7.6 OR CLOSE>20.43 AND CLOSE<20.45 OR CLOSE>19.57 AND CLOSE<19.59 OR CLOSE>6.26 AND CLOSE<6.28 OR CLOSE>7.14 AND CLOSE<7.16 OR CLOSE>6.61 AND CLOSE<6.63 OR CLOSE>11.9 AND vol<11.92 OR CLOSE>6.7 AND CLOSE<6.72 OR CLOSE>8.19 AND CLOSE<8.21)){XG51};
股海万元:=(COUNT(REF(PPr4,1)<REF(PPr4,2),5)=5 AND PPr4>REF(PPr4,1))*20,colorwhite;

PARL0:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4;
PARL1:=C/REF(C,1)<1.05 AND C/REF(C,1)>1;
PARL2:=hhv(C/REF(C,1),60)>1.06 OR llv(C/REF(C,1),60)<0.94;
PARL3:=C>O AND C<30;
LOWP:=llv(LOW,9){XG51};
HIGHP:=hhv(HIGH,9);
RSP:=EMA((CLOSE-LOWP)/(HIGHP-LOWP)*100,3);
X:=EMA(RSP,3);
Y:=MA(X,3),COLORWHITE;
PARL4:=CROSS(X,Y) AND X<70;
三天:=(CROSS(PARL0,REF(PARL0,2)) OR (PARL4 AND PARL0>REF(PARL0,2))) AND PARL1 AND PARL2 AND PARL3 AND X>Y AND X<70;

P1:=llv(LOW,10){XG51};
P2:=hhv(H,25);
价位线:=EMA((C-P1)/(P2-P1)*4,4);
ss:=CROSS(价位线,0.3){XG51};
极点买入:=ss*20,colorwhite{XG51};
涨停先锋:=(涨停先锋1 or 极点买入 or 股海万元 or 三天){XG51};
DRAWTEXT(涨停先锋=1,支撑,'○'),coloryellow;

多:=EMA(C,3),COLORBLUE{XG51};
空:=EMA(C,5),COLOR00FF00{XG51};
均衡:=EMA(空,5),COLORRED,{XG51};
vFFF1:=COUNT(CROSS(多,均衡),2)=1{XG51};
vFFF2:=COUNT(CROSS(空,均衡),2)=1{XG51};
ZAI:=FILTER(vFFF1 AND vFFF2,2){XG51};
DRAWTEXT(ZAI,均衡*0.98,'买'),colorFF00ff{XG51};
VV2:=REF(CLOSE,1){XG51};
VV3:=SMA((CLOSE-VV2),6,1)/SMA(ABS(CLOSE-VV2),6,1)*100{XG51};
DRAWICON(REF(VV3,1)>81 AND VV3<80,HIGH,2){XG51};
DRAWTEXT(REF(VV3,1)>81 AND VV3<80,HIGH,'卖'),COLORBLUE{XG51};
VF1:=MA(CLOSE,60)-MA(CLOSE,5)/3.2{XG51};
DRAWTEXT(IF(CLOSE<VF1 AND VOL/240>MA(VOL,5)/240 AND CLOSE>=REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'买'),COLORWHITE{XG51};
vFFA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100{XG51};
vFFB:=EMA(0.667*REF(vFFA,1)+0.333*vFFA,5){XG51};
DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(vFFA>=vFFB AND vFFA<-17,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'买'){XG51};
vFFR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100{XG51};
DRAWICON(CROSS(82,vFFR1),HIGH,2){XG51};
DRAWTEXT(CROSS(82,vFFR1),HIGH,'卖'),COLORBLUE{XG51};
vFF1:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
vFF2:=REF(vFF1,1){XG51};
vFF3:=SMA(MAX(vFF1-vFF2,0),10,1)/SMA(ABS(vFF1-vFF2),10,1)*100{XG51};
HY3:=IF(COUNT(vFF3<20,5)>=1 AND COUNT(vFF1=LLV(vFF1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0){XG51};
DRAWTEXT(HY3,LOW,'买'),COLORyellow{XG51};
S:=MA(VOL,5)/MA(VOL,60),COLORWHITE,,LINETHICK2{XG51};
A:=MA(S,5),COLORCYAN,,LINETHICK2{XG51};
bias:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100{XG51};
Fg:=MA(S,121){XG51};
RSV:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100{XG51};
K:=SMA(RSV,15,1){XG51};
D:=SMA(K,15,1){XG51};
J:=3*K-2*D{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
DRAWTEXT(CROSS(84,RSI) , HIGH,'卖'),COLORBLUE {XG51};
S1:=IF((J<11 AND BIAS>-11 AND CROSS( S,Fg) AND (S-Fg)>0.010),2,0),STICK,LINETHICK3,COLOR00ff00;

庄压:HHV(MA(H,13),13),COLOryellow,LINETHICK2{XG51};
趋势:=LLV(MA(H,13),1),COLORCYAN,LINETHICK2;

LCe:=REF(CLOSE,1){XG51};
RSI5:=((SMA(MAX((CLOSE - LCe),0),5,1) / SMA(ABS((CLOSE - LCe)),5,1)) * 100){XG51};
TR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10){XG51};
HD:=(HIGH - REF(HIGH,1)){XG51};
LD:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10){XG51};
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10){XG51};
pdi:=((DMP * 100) / TR){XG51};
mdi:=((DMM * 100) / TR){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5){XG51};
AV:=(RSI5 + ADX){XG51};
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5){XG51};
0,colorFF00ff{XG51};
wr10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10))){XG51};
NEWVOL:=(RSI5 - WR10){XG51};
阶段底部:=(AV + NEWVOL);

趋势线:=llv(阶段底部,1);

DRAWTEXT(cross(趋势线,0),支撑*0.95,'荐'), COLORwhite{XG51};
DRAWTEXT(cross(230,趋势线),拉升*1.02,'减'), COLORblue{XG51};
 {X_G_5_1_C_N_{};

超赢BS买卖系统还有潜力可挖(大智慧)

源码正文：

由于大智慧提供的bs系统引用了能量概念且源码较少，很适合补充开发一些新功能，因此我认为该系统还有进一步开发的潜力可挖。下图是我自己根据需要添加一些源码产生的新效果，大家按照这个思路可去试一试。

注意看提示内容变化
如果有兴趣请把下面这段源码贴上看看。
ye:=(high+low+close)/3{XG51};
ye1:=if(high=low,1,HIGH-max(OPEN,CLOSE)){XG51};
ye2:=if(high=low,1,max(CLOSE,OPEN)-ye){XG51};
ye3:=if(high=low,1,Min(OPEN,CLOSE)-LOW){XG51};
ye4:=if(high=low,1,ye-min(close,open)){XG51};
ye5:=vol/(if(high=low,4,HIGH-LOW)*200000){XG51};
主买:0.85* (ABS(SUM((ye4*ye5)+5*HHVALL(HIGH)/6,1))),LINETHICK1,COLORff00ff,stICK3D{XG51};
主卖:0.85* (ABS(SUM((ye2*ye5)+5*HHVALL(HIGH)/6,1))),LINETHICK1,COLORffff00,STICK3D{XG51};
散买:0.85* (ABS(SUM((ye3*ye5)+5*HHVALL(HIGH)/6,1))),LINETHICK1,COLOR0000ff,STICK3D{XG51};
散卖:0.85* (ABS(SUM((ye1*ye5)+5*HHVALL(HIGH)/6,1))),LINETHICK1,COLOR00ff00,STICK3D{XG51};
 

 

{X_G_5=1_C_N_{}