{类顾比均线}
MID:=(C+O+H+L)/4;
MA21:=(21*MID+20*REF(MID,1)+19*REF(MID,2)+18*REF(MID,3)+17*REF(MID,4)+16*REF(MID,5)
+15*REF(MID,6)+14*REF(MID,7)+13*REF(MID,8)+12*REF(MID,9)+11*REF(MID,10)+10*REF(MID,11)+
9*REF(MID,12)+8*REF(MID,13)+7*REF(MID,14)+6*REF(MID,15)+5*REF(MID,16)+4*REF(MID,17)+
3*REF(MID,18)+2*REF(MID,19)+1*REF(MID,20))/231,COLOR009900;
MA20:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)
+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+
8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+
2*REF(MID,18)+REF(MID,19))/210,COLOR00A100;
MA19:=(19*MID+18*REF(MID,1)+17*REF(MID,2)+16*REF(MID,3)+15*REF(MID,4)+14*REF(MID,5)
+13*REF(MID,6)+12*REF(MID,7)+11*REF(MID,8)+10*REF(MID,9)+9*REF(MID,10)+8*REF(MID,11)+
7*REF(MID,12)+6*REF(MID,13)+5*REF(MID,14)+4*REF(MID,15)+3*REF(MID,16)+2*REF(MID,17)
+1*REF(MID,18))/190,COLOR00A500;
MA18:=(18*MID+17*REF(MID,1)+16*REF(MID,2)+15*REF(MID,3)+14*REF(MID,4)+13*REF(MID,5)
+12*REF(MID,6)+11*REF(MID,7)+10*REF(MID,8)+9*REF(MID,9)+8*REF(MID,10)+7*REF(MID,11)+
6*REF(MID,12)+5*REF(MID,13)+4*REF(MID,14)+3*REF(MID,15)+2*REF(MID,16)+1*REF(MID,17))
/171,COLOR00B100;
MA17:(17*MID+16*REF(MID,1)+15*REF(MID,2)+14*REF(MID,3)+13*REF(MID,4)+12*REF(MID,5)
+11*REF(MID,6)+10*REF(MID,7)+9*REF(MID,8)+8*REF(MID,9)+7*REF(MID,10)+6*REF(MID,11)+
5*REF(MID,12)+4*REF(MID,13)+3*REF(MID,14)+2*REF(MID,15)+1*REF(MID,16))/153,COLOR00B500;
MA16:(16*MID+15*REF(MID,1)+14*REF(MID,2)+13*REF(MID,3)+12*REF(MID,4)+11*REF(MID,5)
+10*REF(MID,6)+9*REF(MID,7)+8*REF(MID,8)+7*REF(MID,9)+6*REF(MID,10)+5*REF(MID,11)+
4*REF(MID,12)+3*REF(MID,13)+2*REF(MID,14)+1*REF(MID,15))/136,COLOR00C100;
MA15:(15*MID+14*REF(MID,1)+13*REF(MID,2)+12*REF(MID,3)+11*REF(MID,4)+10*REF(MID,5)
+9*REF(MID,6)+8*REF(MID,7)+7*REF(MID,8)+6*REF(MID,9)+5*REF(MID,10)+4*REF(MID,11)+
3*REF(MID,12)+2*REF(MID,13)+1*REF(MID,14))/120,COLOR00C500;
MA14:(14*MID+13*REF(MID,1)+12*REF(MID,2)+11*REF(MID,3)+10*REF(MID,4)+9*REF(MID,5)
+8*REF(MID,6)+7*REF(MID,7)+6*REF(MID,8)+5*REF(MID,9)+4*REF(MID,10)+3*REF(MID,11)+
2*REF(MID,12)+1*REF(MID,13))/105,COLOR00D100;
MA13:(13*MID+12*REF(MID,1)+11*REF(MID,2)+10*REF(MID,3)+9*REF(MID,4)+8*REF(MID,5)
+7*REF(MID,6)+6*REF(MID,7)+5*REF(MID,8)+4*REF(MID,9)+3*REF(MID,10)+2*REF(MID,11)+
1*REF(MID,12))/91,COLOR00D500;
MA12:(12*MID+11*REF(MID,1)+10*REF(MID,2)+9*REF(MID,3)+8*REF(MID,4)+7*REF(MID,5)
+6*REF(MID,6)+5*REF(MID,7)+4*REF(MID,8)+3*REF(MID,9)+2*REF(MID,10)+1*REF(MID,11))/78,COLOR00E100;
MA11:(11*MID+10*REF(MID,1)+9*REF(MID,2)+8*REF(MID,3)+7*REF(MID,4)+6*REF(MID,5)
+5*REF(MID,6)+4*REF(MID,7)+3*REF(MID,8)+2*REF(MID,9)+1*REF(MID,10))/66,COLOR00E500;
MA10:(10*MID+9*REF(MID,1)+8*REF(MID,2)+7*REF(MID,3)+6*REF(MID,4)+5*REF(MID,5)
+4*REF(MID,6)+3*REF(MID,7)+2*REF(MID,8)+1*REF(MID,9))/55,COLOR00F100;
MA9:(9*MID+8*REF(MID,1)+7*REF(MID,2)+6*REF(MID,3)+5*REF(MID,4)+4*REF(MID,5)
+3*REF(MID,6)+2*REF(MID,7)+1*REF(MID,8))/45,COLOR00F500;
MA8:(8*MID+7*REF(MID,1)+6*REF(MID,2)+5*REF(MID,3)+4*REF(MID,4)+3*REF(MID,5)
+2*REF(MID,6)+1*REF(MID,7))/36,COLOR0000CC;
MA7:(7*MID+6*REF(MID,1)+5*REF(MID,2)+4*REF(MID,3)+3*REF(MID,4)+2*REF(MID,5)
+1*REF(MID,6))/28,COLOR0000DD;
MA6:(6*MID+5*REF(MID,1)+4*REF(MID,2)+3*REF(MID,3)+2*REF(MID,4)+1*REF(MID,5))/21,COLOR0000EE;
MA5:(5*MID+4*REF(MID,1)+3*REF(MID,2)+2*REF(MID,3)+1*REF(MID,4))/15,COLOR0000FF;
{IF(MA21>=REF(MA21,1),MA21,DRAWNULL),COLOR000099;
IF(MA20>=REF(MA20,1),MA20,DRAWNULL),COLOR0000A1;
IF(MA19>=REF(MA19,1),MA19,DRAWNULL),COLOR0000A5;
IF(MA18>=REF(MA18,1),MA18,DRAWNULL),COLOR0000B1;}
IF(MA17>=REF(MA17,1),MA17,DRAWNULL),COLOR0000B5;
IF(MA16>=REF(MA16,1),MA16,DRAWNULL),COLOR0000C1;
IF(MA15>=REF(MA15,1),MA15,DRAWNULL),COLOR0000C5;
IF(MA14>=REF(MA14,1),MA14,DRAWNULL),COLOR0000D1;
IF(MA13>=REF(MA13,1),MA13,DRAWNULL),COLOR0000E1;
IF(MA12>=REF(MA12,1),MA12,DRAWNULL),COLOR0000E5;
IF(MA11>=REF(MA11,1),MA11,DRAWNULL),COLOR0000F1;
IF(MA10>=REF(MA10,1),MA10,DRAWNULL),COLOR0000F5;
IF(MA9>=REF(MA9,1),MA9,DRAWNULL),COLOR0000FF;
IF(MA8<=REF(MA8,1),MA8,DRAWNULL),COLOR00DD00;
IF(MA7<=REF(MA7,1),MA7,DRAWNULL),COLOR00E500;
IF(MA6<=REF(MA6,1),MA6,DRAWNULL),COLOR00EE00;
IF(MA5<=REF(MA5,1),MA5,DRAWNULL),COLOR00F100;
MA60:SMA(MID,60,1),COLOR333388;
MA65:SMA(MID,65,1),COLOR444499;
MA70:SMA(MID,70,1),COLOR4444AA;
MA75:SMA(MID,75,1),COLOR5555BB;
MA80:SMA(MID,80,1),COLOR6666CC;
MA85:SMA(MID,85,1),COLOR6666DD;
IF(MA60<=REF(MA60,1),MA60,DRAWNULL),COLOR004400;
IF(MA65<=REF(MA65,1),MA65,DRAWNULL),COLOR005500;
IF(MA70<=REF(MA70,1),MA70,DRAWNULL),COLOR336600;
IF(MA75<=REF(MA75,1),MA75,DRAWNULL),COLOR337700;
IF(MA80<=REF(MA80,1),MA80,DRAWNULL),COLOR338800;
IF(MA85<=REF(MA85,1),MA85,DRAWNULL),COLOR339900;
MA160:SMA(MID,160,1),COLOR440044;
MA165:SMA(MID,165,1),COLOR550055;
MA170:SMA(MID,170,1),COLOR660066;
MA175:SMA(MID,175,1),COLOR770077;
MA180:SMA(MID,180,1),COLOR880088;
IF(MA160<=REF(MA160,1),MA160,DRAWNULL),COLOR00A000;
IF(MA165<=REF(MA165,1),MA165,DRAWNULL),COLOR33A500;
IF(MA170<=REF(MA170,1),MA170,DRAWNULL),COLOR33B000;
IF(MA175<=REF(MA175,1),MA175,DRAWNULL),COLOR33B500;
IF(MA180<=REF(MA180,1),MA180,DRAWNULL),COLOR33B900;
 |
