全面诊断书(大智慧)

全面诊断书(大智慧)

源码正文：

c1:=c/ref(ema(c,30),30){XG51};
c2:=indexc/ref(ema(indexc,30),30){XG51};
l1:=c1/c2*10-10{XG51};
c3:=c/ma(c,60){XG51};
c4:=indexc/ma(indexc,60){XG51};
L2:=c3/c4*10-10{XG51};
c5:=c/ma(c,120){XG51};
c6:=indexc/ma(indexc,120){XG51};
l3:=c5/c6*10-10{XG51};
L4:=MA(L1+L2+L3,5){XG51};
诊断3:='【走势强弱诊断】 '+IFS(REF(L4,1)>0 AND REF(L4,1)>REF(L4,2),'该股中长期走势强于大盘，且近期继续走强。','')+
IFS(REF(L4,1)>0 AND REF(L4,1)<=REF(L4,2),'该股中长期走势强于大盘，但近期有所走弱。','')+
IFS(REF(L4,1)<=0 AND REF(L4,1)>REF(L4,2),'该股中长期走势弱于大盘，但近期有所转强。','')+
IFS(REF(L4,1)<=0 AND REF(L4,1)<=REF(L4,2),'该股中长期走势弱于大盘，且近期继续走弱。','');

诊断4:='【基本面诊断】 '+'该股为'+IFS( FINANCE2(33)>=50/100,'绩优、','')+IFS(FINANCE2(33)<50/100 AND FINANCE2(33)>=10/100,'中等业绩、','')+IFS(FINANCE2(33)<10/100 AND FINANCE2(33)>=0,'绩差、','')+
IFS(FINANCE2(33)<0,'亏损、','')+IFS(DYNAINFO(39)<=20 AND DYNAINFO(39)>0,'低市盈率、','')+IFS(DYNAINFO(39)>20 AND DYNAINFO(39)<=50,'中等市盈率、','')+IFS(DYNAINFO(39)>50,'高市盈率、','')+
IFS(FINANCE2(37)>=30000,'大盘股。','')+IFS(FINANCE2(37)<30000 AND FINANCE2(37)>=10000,'中盘股。','')+IFS(FINANCE2(37)<10000,'小盘股。','');

MA5:=MA(C,5){XG51};
MA10:=MA(C,10){XG51};
MA30:=MA(C,30){XG51};
MA60:=MA(C,60){XG51};
MA120:=MA(C,120){XG51};
MA250:=MA(C,250){XG51};
诊断5:='【均线诊断】 '+IFS((MA5>MA10 and MA10>MA30 and MA5>MA30),'短期均线多头排列;','')+
IFS((MA5<MA10 and MA10<MA30 and MA5<MA30),'短期均线空头排列;','')+
IFS((MA30>MA60 and MA30>MA120 and MA60>MA120),'中期均线多头排列;','')+
IFS((MA30<MA60 and MA30<MA120 and MA60<MA120),'中期均线空头排列;','')+
IFS((MA60>MA120 and MA120>MA250 and MA60>MA250),'长期均线多头排列;','')+
IFS((MA60<MA120 and MA120<MA250 and MA60<MA250),'长期均线空头排列;','')+
IFS((crOSS(MA5,MA10)),'短期均线5日10日金叉;','')+
IFS((CROSS(MA10,MA5)),'短期均线5日10日死叉;','')+
IFS((CROSS(C,MA120)),'今日股价上穿半年线;','')+
IFS((CROSS(MA120,C)),'今日股价跌破半年线;','')+
IFS((CROSS(C,MA250)),'今日股价上穿一年线;','')+
IFS((CROSS(MA250,C)),'今日股价跌破一年线;','')+
IFS((CROSS(C,MA60) and CROSS(C,MA120) and CROSS(C,MA250)),'股价一阳上穿三线;','')+
IFS((MA30>REF(MA30,1)),'30日均线趋势向上;','')+
IFS((MA30>REF(MA30,1) AND MA30<REF(MA30,1)*1.001),'30日均线趋势走平;','')+
IFS((MA30<REF(MA30,1)),'30日均线趋势向下;','')+
IFS((MA5>REF(MA5,1)*1.015),'5日均线强劲向上;','')+
IFS((MA5>REF(MA5,1) AND MA5<REF(MA5,1)*1.005),'5日均线方向不明;','')+
IFS((MA5<REF(MA5,1)*0.985),'5日均线快速向下;','');

PT := REF(HIGH,1)-REF(LOW,1){XG51};
重心:=(HIGH + LOW + CLOSE)/3{XG51};
压力Ⅰ:= 2*重心-LOW{XG51};
压力Ⅱ:= 重心 + PT{XG51};
支撑Ⅰ:= 2.002*重心-HIGH{XG51};
支撑Ⅱ:= 重心 - PT{XG51};
诊断6:='【压力/支撑诊断】 '+
IFS(压力Ⅰ=压力Ⅰ and 压力Ⅰ>0,'第一压力位：'+numtostr(压力Ⅰ),'')+
IFS(支撑Ⅰ=支撑Ⅰ and 支撑Ⅰ>0,' 第一支撑位：'+numtostr(支撑Ⅰ),'')+
IFS(压力Ⅱ=压力Ⅱ and 压力Ⅱ>0,' 第二压力位：'+numtostr(压力Ⅱ),'')+
IFS(支撑Ⅱ=支撑Ⅱ and 支撑Ⅱ>0,' 第二支撑位：'+numtostr(支撑Ⅱ),'');

difF:="macd.DIFF"(26,12,9){XG51};
DEA:="MacD.DEA"(26,12,9){XG51};
MACD:="MACD.MACD"(26,12,9){XG51};
诊断1:='【MACD诊断】 '+IFS(DIFF>=0,'MACD指标显示该股处于多头行情中','MACD指标显示该股处于空头行情中 ')+
IFS(DIFF>=0 AND MACD>=0 AND MACD>REF(MACD,1),'且有加速上涨趋势。','')+
IFS(DIFF>=0 AND MACD>=0 AND MACD<=REF(MACD,1),'但上涨趋势有所减缓，短线投资者可逢高卖出，但当回落至均线或其他支撑位时应及时回补。','')+
IFS(DIFF>=0 AND MACD<0 AND MACD>=REF(MACD,1),'，目前正处于回落整理阶段，但整理即将结束，可在均线或其他支撑位附近逢低买入，但当整理完成后选择再次向下突破时应注意及时止损。','')+
IFS(DIFF>=0 AND MACD<0 AND MACD<REF(MACD,1),'，目前正处于回落整理阶段，且回落有加速趋势。','')+
IFS(DIFF<0 AND MACD<=0 AND MACD<REF(MACD,1),'且有加速下跌趋势。','')+
IFS(DIFF<0 AND MACD<=0 AND MACD>=REF(MACD,1),'但下跌趋势有所减缓，可在W&R指标大于90时逢低买入，但有可能再次加速下跌，注意及时止损。 ','')+
IFS(DIFF<0 AND MACD>0 AND MACD>REF(MACD,1),'，目前正处于反弹阶段,投资者应保持谨慎。','')+
IFS(DIFF<0 AND MACD>0 AND MACD<REF(MACD,1),'，短线反弹已经结束，应继续坚持谨慎原则。','')+
IFS(CROSS(DIFF,0),'该股今日从空头市场转换为多头行情。','')+
IFS(CROSS(0,DIFF),'该股今日从多头市场转换为空头行情。','');

K:="kd.K"(9,3,3){XG51};
D:="KD.D"(9,3,3){XG51};
诊断2:='【kdj诊断】 '+IFS(K>80 AND CROSS(D,K)=0,'KD指标提示该股已经处于超买状态，如果KD指标死叉应及时卖出。','')+
IFS(K<20 AND CROSS(K,D)=0,'KD指标提示该股已经处于超卖状态，如果KD指标金叉应及时买入。','')+
IFS(CROSS(K,D) AND LLV(K,3)<40,'KD低位金叉，建议买入。','')+
IFS(CROSS(D,K) AND HHV(K,3)>80,'KD高位死叉，建议卖出。','');

LC := REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100{XG51};
RSII:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
货币比:=SUM(IF(TYP>REF(TYP,1),TYP*vol,0),14)/SUM(IF(TYP< REF(TYP,1),TYP*VOL,0),14){XG51};
mfi:=100-(100/(1+货币比)){XG51};
a1:=count(cross(mfi,80),20){XG51};
a2:=count(cross(20,mfi),20){XG51};
wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)){XG51};
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100{XG51};
bias := (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100{XG51};
ARN := SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26){XG51};
obv:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),34){XG51};
W3:=MA(V,5)<=MA(V,10);

诊断7:='【技术解盘】 '+
IFS(W3,'5日均量死叉10日均量,做多能量枯竭,卖出;','')+
IFS(ARN>1.5,'注意价格将进入回挡下跌,可准备卖出;','')+
IFS(ARN<0.4,'股价已达到低点,可考虑介入;','')+
IFS(obv>0,'OBV多头信号;','')+
IFS(obv<0,'OBV空头信号;','')+
IFS(CROSS(BIAS,10),'BIAS超买，短线即将见顶，应及时卖出;','')+
IFS(CROSS(-10,BIAS),'BIAS超卖，短线即将见底，应伺机买进;','')+
IFS(WR>-20,'W&R超买，短线即将见顶，应及时卖出;','')+
IFS(WR<-80,'W&R超卖，短线即将见底，应伺机买进;','')+
IFS(PSY<20,'心理压力小，应及时买入;','')+
IFS(PSY>80,'心理压力大，应及时卖出;','')+
ifs(mfi<20,'mfi指标在20以下处于超卖信号区,不久将要上涨;','')+
ifs(mfi>80,'mfi指标在80以上处于超买信号区,股价将要下跌;','')+
ifs(a1,'mfi指标在两月前曾发出超买信号,表明股价将会下跌;','')+
ifs(a2,'mfi指标在两月前曾发出超卖信号,表明股价将会上涨;',''){XG51};
诊断8:='【RSI解盘】 '+
ifs(rsi1<15 AND (BArslAST(rsi1<15)>=1),'RSI超卖--买入信号;','')+
ifs(RSI1>85 AND (BARSLAST(RSI1>85)>=1),'RSI超买--卖出信号;','')+
ifs((((LLV(LOW,20)=LOW) AND (NOT(LLV(RSI1,20)=RSI1))) OR (COUNT(CLOSE<REF(CLOSE,1),30)>18 AND (COUNT(RSI1>REF(RSI1,1),30)>18))) AND (RSI1<20),'RSI底背离--买入信号;','')+
ifs((((HHV(HIGH,20)=HIGH) AND (NOT(HHV(RSI1,20)=RSI1))) OR (COUNT(CLOSE>REF(CLOSE,1),30)>18 AND (COUNT(RSI1<REF(RSI1,1),30)>18))) AND (RSI1>80),'RSI顶背离--卖出信号;','')+
ifs(CROSS(RSI1,RSI2) AND (RSI1<50),'RSI金叉--买入信号;','')+
ifs(CROSS(RSI2,RSI1) AND (RSI1>50),'RSI死叉--卖出信号;','')+
ifs(RSI1<5 ,'RSI极低位--强买入信号;','')+
ifs(RSI1>93,'RSI极高位--强卖出信号;','');

kk:=150{XG51};
DRAWTEXTREL(50 ,10, 诊断4+' '+诊断3),colorred{XG51};
DRAWTEXTREL(50 ,10+kk, 诊断6),colorbrown{XG51};
DRAWTEXTREL(50 ,10+2*kk, 诊断5),colorblue{XG51};
DRAWTEXTREL(50 ,10+3*kk , 诊断7),color000999{XG51};
DRAWTEXTREL(50 ,10+4*kk , 诊断1),colore66878{XG51};
DRAWTEXTREL(50 ,10+5*kk , 诊断8+' '+诊断2),colorbrown{X^G*5=1^C^N^{};

集成资讯全线主图加四度空间解盘主图(大智慧)

源码正文：

INPUT:M(10,3,250,3);均线:(ma(CLOSE,M) * 1),Colorred,linethick2;早晨之星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND Abs(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2){XG51};
黄昏之星:=REF(CLOSE,2)/REF(OPEN,2)>1.03 AND REF(OPEN,1)>REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2){XG51};
长十字:=CLOSE=OPEN AND HIGH/LOW >1.03{XG51};
垂死十字:=CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH{XG51};
早晨十字星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2){XG51};
黄昏十字星:=REF(CLOSE,2)/REF(OPEN,2)>1.05 AND REF(OPEN,1)>REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2){XG51};
射击之星:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE>MA(CLOSE,5){XG51};
倒转锤头:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE<MA(CLOSE,5){XG51};
锤头:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE<MA(CLOSE,5){XG51};
吊颈:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5){XG51};
穿头破脚:=(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1))
OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1)){XG51};
乌云盖顶:=REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97 AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1){XG51};
曙光初现:=REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1){XG51};
身怀六甲:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND
MAX(CLOSE,OPEN)<MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)>MIN(REF(CLOSE,1),REF(OPEN,1)){XG51};
十字胎:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04 AND CLOSE=OPEN AND
CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1),REF(OPEN,1)){XG51};
平顶:=ABS(HIGH-REF(HIGH,1))/HIGH<0.001{XG51};
平底:=(ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)-REF(LOW,2))/REF(LOW,1)<=0.001){XG51};
大阳烛:=CLOSE/OPEN>1.05 AND HIGH/LOW<CLOSE/OPEN+0.018{XG51};
三个白武士:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN
AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1){XG51};
双飞乌鸦:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98{XG51};
孕育线:=REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1) AND
(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN AND
(CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100{XG51};
多方炮:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN{XG51};
出水芙蓉:=(OPEN<ema(C,20) OR OPEN<EMA(C,40) OR OPEN<EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))
AND (V/MA(V,30)>1.2 AND C/REF(C,1)>1.049){XG51};
上升三部曲:=REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND
REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND
REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4){XG51};
下跌三部曲:= REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND
REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND
CLOSE<REF(CLOSE,4){XG51};
跳空缺口:=HIGH<REF(LOW,1) OR LOW>REF(HIGH,1){XG51};
三只乌鸦:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1){XG51};
光脚阴线:=LOW=CLOSE AND HIGH<>LOW{XG51};
光头阳线:=HIGH=CLOSE AND HIGH<>LOW{XG51};
分离:=OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))<0{XG51};
长下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667{XG51};
长上影:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667{XG51};
十字星:=CLOSE=OPEN AND HIGH<>LOW{XG51};
大阴烛:=OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018{XG51};
好友反攻:=(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002)
OR (REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002){XG51};
倾盆大雨:=REF(C,1)/REF(O,1)>=1.03 AND O<REF(C,1) AND O>REF(O,1) AND C<REF(O,1){XG51};
解盘:='【解盘】'+
IFs(倾盆大雨,'★倾盆大雨,见顶信号;','')+
IFs(大阴烛,'★大阴烛,后市向淡,发生逆转;','')+
IFs(好友反攻,'★好友反攻,底部反转;','')+
IFs(跳空缺口,'★跳空缺口,注意向上还是向下跳空;','')+
IFs(光脚阴线,'★光脚阴线,下跌信号;','')+
IFs(光头阳线,'★光头阳线,后市看涨;','')+
IFs(三只乌鸦,'★三只乌鸦,可能见顶回落;','')+
IFs(分离,'★分离,注意看涨分离和看跌分离;','')+
IFs(长下影,'★长下影,持续下跌后出现,有可能止跌回升;在升势末期出现,须多加留意;','')+
IFs(长上影,'★长上影,表明行情上档压力沉重,升势受阻;','')+
IFs(下跌三部曲,'★下跌三部曲,下跌信号;','')+
IFs(上升三部曲,'★上升三部曲,上涨信号;','')+
IFs(早晨之星,'★早晨之星,见底回升;','')+
IFs(黄昏之星,'★黄昏之星,见顶回落;','')+
IFs(十字星,'★十字星,有转向意味,注意股价位置在顶部还是底部;','')+
IFs(长十字,'★长十字,注意在顶部还是底部;','')+
IFs(垂死十字,'★垂死十字,下跌信号;','')+
IFs(早晨十字星,'★早晨十字星,上涨信号,见底回升;','')+
IFs(黄昏十字星,'★黄昏十字星,下跌信号,见顶回落;','')+
IFs(射击之星,'★射击之星,可能见顶回落,可靠性低;','')+
IFs(倒转锤头,'★倒转锤头,可能见底回升;','')+
IFs(锤头,'★锤头,可能见底回升,如有量配合,信号强烈;','')+
IFs(吊颈,'★吊颈,上升行情中见顶回落,顶部出现,见顶信号;','')+
IFs(平顶,'★平顶,温和的反转;','')+
IFs(穿头破脚,'★穿头破脚,顶部出现,见顶回落信号;','')+
IFs(乌云盖顶,'★乌云盖顶,见顶回落信号;','')+
IFs(曙光初现,'★曙光初现,后市见底回升;','')+
IFs(身怀六甲,'★身怀六甲,出现在底部,是见底回升信号;出现在顶部,是见顶回落信号;','')+
IFs(十字胎,'★十字胎;','')+
IFs(平底,'★平底,温和的反转;','')+
IFs(大阳烛,'★大阳烛,看涨;','')+
IFs(三个白武士,'★三个白武士,每日收盘价上移,表示可能见底回升;','')+
IFs(双飞乌鸦,'★双飞乌鸦,行情将见顶回落;','')+
IFs(孕育线,'★孕育线,注意股价位置;','')+
IFs(多方炮,'★多方炮,在底部出现有上涨意味,在中间出现有可能是上涨中继,顶部出现是复合见顶信号;','')+
IFs(出水芙蓉,'★出水芙蓉,见底回升;',''){XG51};
DRAWTEXTABS(0,0,解盘){XG51};
MA5:MA(C,5),COLORF00FF0{XG51};
MA21:MA(C,21),COLORE66878{XG51};
MA30:MA(C,30),COLORBLUE; MA55:MA(CLOSE,55),LINETHICK1,ColorGREEN{XG51};
半年线:MA(C,120),COLOR399C7F,POINTDOT{XG51};
年线:MA(C,240),COLOR000999,POINTDOT;X1:=(C+L+H)/3{XG51};
X2:=EMA(X1,6){XG51};
X3:=EMA(X2,5){XG51};
DRAWICON(crOSS(X2,X3),L*0.98,7){XG51};
DRAWICON(CROSS(X3,X2),H*1.02,8){XG51};
DRAWGBKLAst(C>0,STRIP(RGB(10,10,50),RGB(50,10,10),0));

均价:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+
4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36{XG51};
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3{XG51};
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1{XG51};
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1{XG51};
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1{XG51};
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1)
AND CLOSE>VAR2 AND CLOSE<VAR1{XG51};
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1)
AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1)
AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);{XG51};
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2{XG51};
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)
AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2){XG51};
XD2:=VAR1=VAR2 AND CLOSE>VAR1{XG51};
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)){XG51};
量能饱和度:=IF(SAT>1,1,SAT)*100{XG51};
IF BARSTATUS=2 AND SZ1 THEN BEGIN
DRAWTEXTABS(390,25,'调整结束短线介入'),LINETHICK2,COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ2 THEN BEGIN
DRAWTEXTABS(390,25,'上升通道走势良好'),LINETHICK2,COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ3 THEN BEGIN
DRAWTEXTABS(390,25,'股价偏离注意调整'),LINETHICK2,COLORWHITE{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ4 THEN BEGIN
DRAWTEXTABS(390,25,'上升通道调整洗盘'),LINETHICK2,COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ5 THEN BEGIN
DRAWTEXTABS(390,25,'转向特征注意离场'),LINETHICK2,COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND SZ6 THEN BEGIN
DRAWTEXTABS(390,25,'通道改变坚决离场'),LINETHICK2,COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND XD1 THEN BEGIN
DRAWTEXTABS(390,25,'下跌通道只宜观望'),LINETHICK2,COLORCYAN{XG51};
END
ELSE
IF BARSTATUS=2 AND XD2 THEN BEGIN
DRAWTEXTABS(390,25,'短期底部准备进入'),LINETHICK2,COLORBLUE{XG51};
END{XG51};
;a:="LTFunc5@FORLT2"{XG51};
s1:="LTFunc5@LT_S1"{XG51};
hs:="LTFunc5@LT_HS"{XG51};
ls:="LTFunc5@LT_LS"{XG51};
p1:="LTFunc5@LT_P1"{XG51};
upp:="LTFunc5@LT_UPP"{XG51};
udd:="LTFunc5@LT_UDD";

{XG51};
买入:p1=1 and ref(p1,1)=0,LineThick0,Precis0,ColorRed{XG51};
d1:=ema(abs("ddx.ddx"),60){XG51};
d2:=max("ddx.ddx"/d1+7.5,7.5){XG51};
d3:=min("ddx.ddx"/d1,10){XG51};
fb:=if(s1=0,hs,ls){XG51};
tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价> '+numtostrn(upp,2)+',出现B点\n'){XG51};
tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价> '+numtostrn(hs,2)+'短线买入机会'){XG51};
tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币')){XG51};
tr3:=ifs(s1=0,'向下,','向上,'){XG51};
tr4:='3.能量级别:'+numtostrn(d3,1)+'级';

bs:=''+datestr(date)+'买卖点决策系统提示\n'+'1.bs点:'+tr2+','+tr0+'2.短线:'+tr3+tr1+'\n'+tr4{XG51};
drawflagtext(1,fb,bs);

STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff{XG51};
STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack{XG51};
STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff{XG51};
STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff{XG51};
STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff{XG51};
STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff{XG51};
STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff{XG51};
STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;

STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54{XG51};
STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54{XG51};
STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;

drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0{XG51};
drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;

drawbmp(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0{XG51};
drawbmp(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2;闪:EMA(c+(h- l)*0.618,3),Color0099FF,LINETHICK0; 进:EMA((o+h+l)/3,4),COLORGREEN,LINETHICK0;

预测明日买点:=EMA((o+h+l)/3,4)+((h+l)/2-ref((o+h+l)/3,3))/4{XG51};
DRAWTEXTREL(800,950,'测今日低点：'+NUMTOSTRN(ref(预测明日买点,1),2 )),ColorGREEN{XG51};
预测明日卖点:=EMA(c+(h-l)*0.618,3)+(EMA(c+(h-l)*0.618,3)-进)*0.618{XG51};
DRAWTEXTREL(580,950,'测今日高点：'+NUMTOSTRN(ref(预测明日卖点,1),2 )),Colorred;gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100){XG51};
明日阻力:=l+(gj-l)+(c-l){X-G-5_1-C-N-{};