通达信神奇江恩系列主图选股指标公式源码

通达信神奇江恩系列主图选股指标公式源码

源码正文：

T01:=CONst(LLVBARS(LOW,10)){XG51};
T1HIGH:=CONST(REF(HIGH,T01)){XG51};
MM1:=CONST(CURRBARSCOUNT){XG51};
T02:=CONST(BArslAST(CURRBARSCOUNT>MM1+T01 AND H>T1HIGH)){XG51};
T2HIGH:=CONST(REF(HIGH,T02)){XG51};
T03:=CONST(BARSLAST(CURRBARSCOUNT>MM1+T02 AND HIGH>T2HIGH)){XG51};
T3HIGH:=CONST(REF(HIGH,T03)){XG51};
攻击线:DRAWLINE(CURRBARSCOUNT=T03+1, T3HIGH, ISLASTBAR, T3HIGH,1),LINETHICK1,COLOR80FF80{XG51};
DRAWTEXT(ISLASTBAR, T3HIGH, '洗盘杀入线')LINETHICK2,COLORWHITE{XG51};
VAR1:=REF(CLOSE,1){XG51};
VAR2:=SMA(maX(CLOSE-VAR1,0),6,1)/SMA(Abs(CLOSE-VAR1),6,1)*100{XG51};
STICKLINE(crOSS(76,VAR2),C,O,8,0) ,COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(CROSS(76,VAR2),H*1.05,'卖') ,COLORBLUE{XG51};
T:=180{XG51};
T1:=5{XG51};
DRAWKLINE(H,O,L,C){XG51};
HH:=REF(HHV(H,T),T1){XG51};
LL:=REF(LLV(L,T),T1){XG51};
H1:=HH-(HH-LL)*0.191{XG51};
H2:=HH-(HH-LL)*0.382{XG51};
H3:=HH-(HH-LL)*0.5{XG51};
H4:=HH-(HH-LL)*0.618{XG51};
H5:=HH-(HH-LL)*0.764{XG51};
H6:=HH-(HH-LL)*0.809{XG51};
H7:=HH-(HH-LL)*0.236{XG51};
顶1:=HH+(HH-LL)*0.191{XG51};
顶2:=HH+(HH-LL)*0.382{XG51};
顶3:=HH+(HH-LL)*0.618{XG51};
底1:=IF((HH-LL)<LL,LL-(HH-LL)*0.191,LL-LL*0.191){XG51};
底2:=IF((HH-LL)<LL,LL-(HH-LL)*0.382,LL-LL*0.382){XG51};
底3:=IF((HH-LL)<LL,LL-(HH-LL)*0.618,LL-LL*0.618){XG51};
高:=IF(CURRBARSCOUNT<=T+T1 AND CURRBARSCOUNT>T1,REFDATE(HH,DATE),DRAWNULL){XG51};
一:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H1,DATE),DRAWNULL){XG51};
二:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H2,DATE),DRAWNULL){XG51};
三:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H3,DATE),DRAWNULL){XG51};
四:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H4,DATE),DRAWNULL){XG51};
五:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H5,DATE),DRAWNULL){XG51};
六:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H6,DATE),DRAWNULL){XG51};
七:=IF(CURRBARSCOUNT<=T+T1,REFDATE(H7,DATE),DRAWNULL){XG51};
低:=IF(CURRBARSCOUNT<=T+T1 AND CURRBARSCOUNT>T1,REFDATE(LL,DATE),DRAWNULL){XG51};
NOTEXT1:高,COLOR007799{XG51};
AA:REFDATE(一,DATE),DOTLINE,COLOR555555{XG51};
BB:REFDATE(二,DATE),DOTLINE,COLOR005858{XG51};
CC:REFDATE(三,DATE),DOTLINE,COLOR777777{XG51};
DD:REFDATE(四,DATE),DOTLINE,COLOR005858{XG51};
EE:REFDATE(五,DATE),DOTLINE,COLOR555555{XG51};
FF:REFDATE(六,DATE),DOTLINE,COLOR555555{XG51};
GG:REFDATE(七,DATE),DOTLINE,COLOR555555{XG51};
NOTEXT8:低,COLOR668800{XG51};
TT:=INTPART(T*0.5)+T1{XG51};
TT1:=(CURRBARSCOUNT=TT){XG51};
TT2:=(CURRBARSCOUNT=TT-32){XG51};
TT3:=(CURRBARSCOUNT=TT-40){XG51};
DRAWTEXT(TT1 AND 高,高-(高-低)*0.025,STRCAT('  【高点】:　',CON2STR(HH,2))),COLOR007799{XG51};
DRAWTEXT(TT1 AND 一,一+(高-低)*0.020,STRCAT('191 (809):　',CON2STR(H1,2))),COLOR888888{XG51};
DRAWTEXT(TT1 AND 二,二+(高-低)*0.020,STRCAT('382 (618):　',CON2STR(H2,2))),COLOR008888{XG51};
DRAWTEXT(TT1 AND 三,三+(高-低)*0.020,STRCAT('  【中点】:　',CON2STR(H3,2))),COLOR000088{XG51};
DRAWTEXT(TT1 AND 四,四+(高-低)*0.020,STRCAT('618 (382):　',CON2STR(H4,2))),COLOR008888{XG51};
DRAWTEXT(TT1 AND 五,五+(高-低)*0.020,STRCAT('764 (236):　',CON2STR(H5,2))),COLOR888888{XG51};
DRAWTEXT(TT1 AND 六,六+(高-低)*0.020,STRCAT('809 (191):　',CON2STR(H6,2))),COLOR888888{XG51};
DRAWTEXT(TT1 AND 七,七+(高-低)*0.020,STRCAT('236 (764):　',CON2STR(H7,2))),COLOR888888{XG51};
DRAWTEXT(TT1 AND 低,低+(高-低)*0.020,STRCAT('  【低点】:　',CON2STR(LL,2))),COLOR668800{XG51};
DRAWTEXT(TT3 AND 高,高+(高-低)*0.040,''),COLOR007799;{XG51};
低点:=800{XG51};
高点:=800{XG51};
时间:=1{XG51};
价格:=1{XG51};
调点1:=1;
PURC:=CONST(FINDHIGH(H,0,高点*10,1)){XG51};
PLZ:=CONST(BARSLAST(PURC=H))+1{XG51};
顶X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1))){XG51};
QQT:=CONST(FINDLOW(L,0,低点*10,1)){XG51};
PLL:=CONST(BARSLAST(QQT=L))+1{XG51};
低X:=CONST(IF(PLL=1,L,REF(L,PLL-1))){XG51};
ATM:=时间=2 OR 时间=2{XG51};
QTM:=时间=1 OR 时间=1{XG51};
BTM:=时间=1 OR 时间=1 OR 时间=1{XG51};
AAZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.809),DRAWNULL){XG51};
ABZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.5),DRAWNULL){XG51};
acZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.618),DRAWNULL){XG51};
ADZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.382),DRAWNULL){XG51};
AEZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*0.236),DRAWNULL){XG51};
AFZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1),DRAWNULL){XG51};
AGZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.809),DRAWNULL){XG51};
AHZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.5),DRAWNULL){XG51};
AIZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.618),DRAWNULL){XG51};
AJZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.382),DRAWNULL){XG51};
AKZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1.236),DRAWNULL){XG51};
ALZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2),DRAWNULL){XG51};
AMZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.236),DRAWNULL){XG51};
ANZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.382),DRAWNULL){XG51};
aoZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.5),DRAWNULL){XG51};
APZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.618),DRAWNULL){XG51};
AQZ:=IF(ATM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2.809),DRAWNULL){XG51};
ARZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3),DRAWNULL){XG51};
ASZ:=IF(BTM,ROUND(IF(PLZ>PLL,PLZ,PLL)),DRAWNULL){XG51};
HXCS1:=CURRBARSCOUNT=AAZ OR CURRBARSCOUNT=ABZ OR CURRBARSCOUNT=ACZ OR CURRBARSCOUNT=ADZ
OR CURRBARSCOUNT=AEZ OR CURRBARSCOUNT=AFZ OR CURRBARSCOUNT=AGZ OR CURRBARSCOUNT=AHZ
OR CURRBARSCOUNT=AIZ OR CURRBARSCOUNT=AJZ OR CURRBARSCOUNT=AKZ OR CURRBARSCOUNT=ALZ
OR CURRBARSCOUNT=AMZ OR CURRBARSCOUNT=ANZ OR CURRBARSCOUNT=AOZ
OR CURRBARSCOUNT=APZ OR CURRBARSCOUNT=AQZ OR CURRBARSCOUNT=ARZ OR CURRBARSCOUNT=ASZ;
QAZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/8),DRAWNULL){XG51};
QBZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/8),DRAWNULL){XG51};
QCZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*3/8),DRAWNULL){XG51};
QDZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*4/3),DRAWNULL){XG51};
QEZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/8),DRAWNULL){XG51};
QGZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*6/8),DRAWNULL){XG51};
QHZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*7/8),DRAWNULL){XG51};
QIZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*9/8),DRAWNULL){XG51};
QJZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*1/3),DRAWNULL){XG51};
QKZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*2/3),DRAWNULL){XG51};
QMZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*10/8),DRAWNULL){XG51};
QNZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*11/8),DRAWNULL){XG51};
QOZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*5/3),DRAWNULL){XG51};
QPZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*13/8),DRAWNULL){XG51};
QQZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*14/8),DRAWNULL){XG51};
QRZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*15/8),DRAWNULL){XG51};
QSZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*17/8),DRAWNULL){XG51};
QTZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*18/8),DRAWNULL){XG51};
QUZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*19/8),DRAWNULL){XG51};
QVZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*21/8),DRAWNULL){XG51};
QWZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*22/8),DRAWNULL){XG51};
QXZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*23/8),DRAWNULL){XG51};
QYZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*7/3),DRAWNULL){XG51};
QZZ:=IF(QTM,ROUND(IF(PLZ>PLL,PLZ,PLL)-ABS(PLZ-PLL)*8/3),DRAWNULL){XG51};
HXCS2:=CURRBARSCOUNT=QAZ OR CURRBARSCOUNT=QBZ OR CURRBARSCOUNT=QCZ
OR CURRBARSCOUNT=QDZ OR CURRBARSCOUNT=QEZ OR CURRBARSCOUNT=QGZ
OR CURRBARSCOUNT=QHZ OR CURRBARSCOUNT=QIZ OR CURRBARSCOUNT=QJZ
OR CURRBARSCOUNT=QKZ OR CURRBARSCOUNT=QMZ OR CURRBARSCOUNT=QNZ
OR CURRBARSCOUNT=QOZ OR CURRBARSCOUNT=QPZ OR CURRBARSCOUNT=QQZ
OR CURRBARSCOUNT=QRZ
OR CURRBARSCOUNT=QSZ OR CURRBARSCOUNT=QTZ OR CURRBARSCOUNT=QUZ
OR CURRBARSCOUNT=QVZ OR CURRBARSCOUNT=QWZ OR CURRBARSCOUNT=QXZ
OR CURRBARSCOUNT=QYZ OR CURRBARSCOUNT=QZZ {XG51};
STICKLINE(HXCS1 OR HXCS2 ,顶X,低X,0,0),COLORLIMAGENTA{XG51};
DRAWKLINE(H,O,L,C){XG51};
天XX线:=IF(价格=5 AND 时间=5,DRAWNULL,顶X),COLORLIMAGENTA{XG51};
地XX线:=IF(价格=5 AND 时间=5,DRAWNULL,低X),COLORLIMAGENTA{XG51};
顶点:天XX线,COLORLIMAGENTA{XG51};
底点:地XX线,COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QAZ OR CURRBARSCOUNT=QIZ OR CURRBARSCOUNT=QSZ,顶X*0.98,'1/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QBZ OR CURRBARSCOUNT=QMZ OR CURRBARSCOUNT=QTZ,顶X*0.98,'2/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QCZ OR CURRBARSCOUNT=QNZ OR CURRBARSCOUNT=QUZ,顶X*0.98,'3/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QEZ OR CURRBARSCOUNT=QPZ OR CURRBARSCOUNT=QVZ,顶X*0.98,'5/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QGZ OR CURRBARSCOUNT=QQZ OR CURRBARSCOUNT=QWZ,顶X*0.98,'6/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QHZ OR CURRBARSCOUNT=QRZ OR CURRBARSCOUNT=QXZ,顶X*0.98,'7/8')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QJZ OR CURRBARSCOUNT=QDZ OR CURRBARSCOUNT=QYZ,顶X*0.98,'1/3')COLORLIMAGENTA{XG51};
DRAWTEXT(CURRBARSCOUNT=QKZ OR CURRBARSCOUNT=QOZ OR CURRBARSCOUNT=QZZ,顶X*0.98,'2/3')COLORLIMAGENTA{XG51};
上角度:=70{XG51};
下角度:=70{XG51};
HDAY:=600;LDAY:=600{XG51};
调点:=3{XG51};
角度:=100{XG51};
CURR:=CURRBARSCOUNT{XG51};
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1)){XG51};
GTT:=CONST(BARSLAST(TCH=H))+1{XG51};
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1))){XG51};
BCL:=CONST(FINDLOW(L,0,LDAY*10,1)){XG51};
DTT:=CONST(BARSLAST(BCL=L))+1{XG51};
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1))){XG51};
涨点:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=SX涨L)+1)){XG51};
跌点:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=SX跌H)+1)){XG51};
最低:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,涨点,跌点))){XG51};
L斜率:=下角度/IF(C<300,1000,10){XG51};
最高:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,跌点,涨点))){XG51};
H斜率:=上角度/IF(C<300,1000,10){XG51};
天线:=SX跌H;
地线:=SX涨L{XG51};
K:=(天线-地线)/(IF(跌点>=涨点,跌点,涨点)-IF(跌点>=涨点,涨点,跌点)){XG51};
上斜线:=IF(地线+CONST(L斜率*4.00)*最低>=地线,地线+CONST(L斜率*4.00)*最低,DRAWNULL){XG51};
上斜线0:=IF(地线+CONST(L斜率*2.00)*最低>=地线,地线+CONST(L斜率*2.00)*最低,DRAWNULL){XG51};
上斜线1:=IF(地线+CONST(L斜率*1.5)*最低>=地线,地线+CONST(L斜率*1.5)*最低,DRAWNULL){XG51};
上斜线2:=IF(地线+CONST(L斜率*1.00)*最低>=地线,地线+CONST(L斜率*1.000)*最低,DRAWNULL){XG51};
上斜线3:=IF(地线+CONST(L斜率*0.70)*最低>=地线,地线+CONST(L斜率*0.70)*最低,DRAWNULL){XG51};
上斜线4:=IF(地线+CONST(L斜率*0.50)*最低>=地线,地线+CONST(L斜率*0.50)*最低,DRAWNULL){XG51};
上斜线5:=IF(地线+CONST(L斜率*0.365)*最低>=地线,地线+CONST(L斜率*0.365)*最低,DRAWNULL){XG51};
上斜线6:=IF(地线+CONST(L斜率*0.250)*最低>=地线,地线+CONST(L斜率*0.250)*最低,DRAWNULL){XG51};
上斜线7:=IF(地线+CONST(L斜率*0.165)*最低>=地线,地线+CONST(L斜率*0.165)*最低,DRAWNULL){XG51};
上斜线8:=IF(地线+CONST(L斜率*0.123)*最低>=地线,地线+CONST(L斜率*0.123)*最低,DRAWNULL){XG51};
上斜线9:=IF(地线+CONST(L斜率*0.06)*最低>=地线,地线+CONST(L斜率*0.06)*最低,DRAWNULL){XG51};
上9:IF(上斜线9<=天线*1.05,上斜线9,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上8:IF(上斜线8<=天线*1.05,上斜线8,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上7:IF(上斜线7<=天线*1.05,上斜线7,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上6:IF(上斜线6<=天线*1.05,上斜线6,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上5:IF(上斜线5<=天线*1.05,上斜线5,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上4:IF(上斜线4<=天线*1.05,上斜线4,DRAWNULL),COLOR0000FF,COLORBLUE{XG51};
上3:IF(上斜线3<=天线*1.05,上斜线3,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上2:IF(上斜线2<=天线*1.05,上斜线2,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上1:IF(上斜线1<=天线*1.05,上斜线1,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上0:IF(上斜线0<=天线*1.05,上斜线0,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
上:IF(上斜线<=天线*1.05,上斜线,DRAWNULL),COLORAA00AA,COLORWHITE{XG51};
下斜线:=IF(天线-CONST(H斜率*4.00)*最高<=天线,天线-CONST(H斜率*4.00)*最高,DRAWNULL){XG51};
下斜线0:=IF(天线-CONST(H斜率*2.00)*最高<=天线,天线-CONST(H斜率*2.00)*最高,DRAWNULL){XG51};
下斜线1:=IF(天线-CONST(H斜率*1.500)*最高<=天线,天线-CONST(H斜率*1.500)*最高,DRAWNULL){XG51};
下斜线2:=IF(天线-CONST(H斜率*1.000)*最高<=天线,天线-CONST(H斜率*1.000)*最高,DRAWNULL){XG51};
下斜线3:=IF(天线-CONST(H斜率*0.70)*最高<=天线,天线-CONST(H斜率*0.70)*最高,DRAWNULL){XG51};
下斜线4:=IF(天线-CONST(H斜率*0.50)*最高<=天线,天线-CONST(H斜率*0.50)*最高,DRAWNULL){XG51};
下斜线5:=IF(天线-CONST(H斜率*0.365)*最高<=天线,天线-CONST(H斜率*0.365)*最高,DRAWNULL){XG51};
下斜线6:=IF(天线-CONST(H斜率*0.250)*最高<=天线,天线-CONST(H斜率*0.250)*最高,DRAWNULL){XG51};
下斜线7:=IF(天线-CONST(H斜率*0.165)*最高<=天线,天线-CONST(H斜率*0.165)*最高,DRAWNULL){XG51};
下斜线8:=IF(天线-CONST(H斜率*0.123)*最高<=天线,天线-CONST(H斜率*0.123)*最高,DRAWNULL){XG51};
下斜线9:=IF(天线-CONST(H斜率*0.06)*最高<=天线,天线-CONST(H斜率*0.06)*最高,DRAWNULL){XG51};
下9:IF(下斜线9>=地线*0.95,下斜线9,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下8:IF(下斜线8>=地线*0.95,下斜线8,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下7:IF(下斜线7>=地线*0.95,下斜线7,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下6:IF(下斜线6>=地线*0.95,下斜线6,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下5:IF(下斜线5>=地线*0.95,下斜线5,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下4:IF(下斜线4>=地线*0.95,下斜线4,DRAWNULL),COLOR0000FF,COLORBLUE{XG51};
下3:IF(下斜线3>=地线*0.95,下斜线3,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下2:IF(下斜线2>=地线*0.95,下斜线2,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下1:IF(下斜线1>=地线*0.95,下斜线1,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下0:IF(下斜线0>=地线*0.95,下斜线0,DRAWNULL),COLORAAAAAA,COLORCYAN{XG51};
下:IF(下斜线>=地线*0.95,下斜线,DRAWNULL),COLORAAAAAA,COLORCYAN{X-G-5+1-C-N-{};