回到未来58所发三角形面积,偶改动后形成大小三角形形态,在此感谢回到未来的思路。DH:=(MIN(C,O)+2*H)/3;XL:=(MAX(C,O)+2*l)/3;重心:=(DH+XL)/2;均价:=AMOUNT/(VOL*100);折价:=if(INDEXC=C,重心,(重心+均价)/2);高价线:=(24*H+23*REF(H,1)+22*REF(H,2)+21*REF(H,3)+20*REF(H,4)+19*REF(H,5)+18*REF(H,6)+17*REF(H,7)+16*REF(H,8)+15*REF(H,9)+14*REF(H,10)+13*REF(H,11)+12*REF(H,12)+11*REF(H,13)+10*REF(H,14)+9*REF(H,15)+8*REF(H,16)+7*REF(H,17)+6*REF(H,18)+5*REF(H,19)+4*REF(H,20)+3*REF(H,21)+2*REF(H,22)+REF(H,23))/300,COLORBLUE,LINETHICK1;低价线:=(24*L+23*REF(L,1)+22*REF(L,2)+21*REF(L,3)+20*REF(L,4)+19*REF(L,5)+18*REF(L,6)+17*REF(L,7)+16*REF(L,8)+15*REF(L,9)+14*REF(L,10)+13*REF(L,11)+12*REF(L,12)+11*REF(L,13)+10*REF(L,14)+9*REF(L,15)+8*REF(L,16)+7*REF(L,17)+6*REF(L,18)+5*REF(L,19)+4*REF(L,20)+3*REF(L,21)+2*REF(L,22)+REF(L,23))/300;G90:=EMA(高价线,72);D90:=EMA(低价线,72);高低线:=(G90+D90)/2;M3:=MA(折价,3);LM9:=REF(LLV(M3,9),1);金叉点:=BARSLAST(CROSS(M3,LM9));XP:=IF(M3>LM9,金叉点,0);LMX:=LLV(M3,XP);高:=M3-LMX;底长:=XP/10;小三角:底长*高/2,COLORWHITE,LINETHICK2;FILLRGN(小三角>0,0,小三角),COLORBROWN;大金:=BARSLAST(CROSS(M3,高低线));XP1:=IF(M3>高低线,大金,0);高2:=M3-REF(高低线,XP1);底长2:=XP1/100;大三角:底长2*高2/2,COLORRED,LINETHICK;STICKLINE(大三角>0,0,大三角,6,1),COLORGRAY;MS2:MA(小三角,2),COLORGREEN;M1:=MA(折价,1);高1:=M1-LMX;底长1:=XP/10;S三角:=底长1*高1/2,COLORWHITE,LINETHICK1;STICKLINE(C>=REF(C,1),REF(S三角,1),S三角,3,0),COLORRED;STICKLINE(C<REF(C,1),REF(S三角,1),S三角,3,0),COLORCYAN; |