咨詢內(nèi)容:
請老師修改黃金分割線公式中的畫線語句
HH1:=HHV(H,N);
LL1:=LLV(L,M);
HHH:=H=HH1;
LLL:=L=LL1;
DRAWLINE(HHH, H,LLL,L,0),COLORGREEN;
DRAWLINE(LLL,L,HHH,H,0),COLORLIRED;
H191:=IF(N>M,(HH1-LL1)*0.191+LL1,HH1-(HH1-LL1)*0.191);
H236:=IF(N>M,(HH1-LL1)*0.236+LL1,HH1-(HH1-LL1)*0.236);
H382:=IF(N>M,(HH1-LL1)*0.382+LL1,HH1-(HH1-LL1)*0.382);
H5:=IF(N>M,(HH1-LL1)*0.5+LL1,HH1-(HH1-LL1)*0.5);
H618:=IF(N>M,(HH1-LL1)*0.618+LL1,HH1-(HH1-LL1)*0.618);
H809:=IF(N>M,(HH1-LL1)*0.809+LL1,HH1-(HH1-LL1)*0.809);
STICKLINE(ISLASTBAR,HH1,HH1,300,1),COLORRED;
STICKLINE(ISLASTBAR,H809,H809,300,1),COLORRED;
STICKLINE(ISLASTBAR,H618,H618,300,1),COLORRED;
STICKLINE(ISLASTBAR,H5,H5,300,1),COLORRED;
STICKLINE(ISLASTBAR,H382,H382,300,1),COLORRED;
STICKLINE(ISLASTBAR,H236,H236,300,1),COLORRED;
STICKLINE(ISLASTBAR,LL1,LL1,300,1),COLORRED;

?
<!--
咨詢內(nèi)容: 附件 :
-->
?
?來源:程序化99網(wǎng)( www.tumamayizhan.com )
博易技術(shù)人員:
N:=10;
M:=10;
HH1:=HHV(H,N);
LL1:=LLV(L,M);
HHH:=H=HH1;
LLL:=L=LL1;
DRAWLINE(HHH, H,LLL,L,0),COLORGREEN;
DRAWLINE(LLL,L,HHH,H,0),COLORRED;
H191:=IF(N>M,(HH1-LL1)*0.191+LL1,HH1-(HH1-LL1)*0.191);
H236:=IF(N>M,(HH1-LL1)*0.236+LL1,HH1-(HH1-LL1)*0.236);
H382:=IF(N>M,(HH1-LL1)*0.382+LL1,HH1-(HH1-LL1)*0.382);
H5:=IF(N>M,(HH1-LL1)*0.5+LL1,HH1-(HH1-LL1)*0.5);
H618:=IF(N>M,(HH1-LL1)*0.618+LL1,HH1-(HH1-LL1)*0.618);
H809:=IF(N>M,(HH1-LL1)*0.809+LL1,HH1-(HH1-LL1)*0.809);
STICKLINE(ISLASTBAR,HH1,HH1,300,1),COLORRED;
STICKLINE(ISLASTBAR,H809,H809,300,1),COLORRED;
STICKLINE(ISLASTBAR,H618,H618,300,1),COLORRED;
STICKLINE(ISLASTBAR,H5,H5,300,1),COLORRED;
STICKLINE(ISLASTBAR,H382,H382,300,1),COLORRED;
STICKLINE(ISLASTBAR,H236,H236,300,1),COLORRED;
STICKLINE(ISLASTBAR,LL1,LL1,300,1),COLORRED;
謝謝老師的修改。我還有一個問題。下圖是上證60分圖。我想從2733到3042畫連線,我的畫線公式:DRAWLINE(HHH,H,LLL,L,0),COLORGREEN;??DRAWLINE(LLL,L,HHH,H,0),COLORRED;實現(xiàn)不了。請老師賜教。
來源 程序化久久網(wǎng)