請(qǐng)老師修改下程序

作者：文華財(cái)經(jīng) 來源：cxh99.com 發(fā)布時(shí)間：2019年08月23日

咨詢內(nèi)容： 老師，我想把標(biāo)注到K線上的數(shù)字做兩步修改：
第一：在數(shù)字的前面顯示它的倍數(shù)值
第二：光標(biāo)點(diǎn)擊某一根K線作為最新的一根K線按原來的方式進(jìn)行重新計(jì)算，包括向前移動(dòng)K線的根數(shù)：如圖例：
A:=DEA0+0.15*CZ,COLORGREEN;
B:=DEA0-0.05*CZ,COLORGREEN;
CC:=DEA0-0.10*CZ,COLORGREEN;
D:=DEA0-0.15*CZ,COLORGREEN;
E:=DEA0-0.20*CZ,COLORGREEN;
F:=DEA0-0.25*CZ,COLORGREEN;
G:=DEA0-0.30*CZ,COLORGREEN;
HH:=DEA0-0.35*CZ,COLORGREEN;
I:=DEA0-0.40*CZ,COLORGREEN;
J:=DEA0-0.45*CZ,COLORGREEN;
K:=DEA0-0.50*CZ,COLORGREEN;
LL:=DEA0-0.55*CZ,COLORGREEN;
當(dāng)天收盤價(jià):=(945/52)*DEA0-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)A:=(945/52)*A-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)B:=(945/52)*B-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)CC:=(945/52)*CC-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)D:=(945/52)*D-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)E:=(945/52)*E-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)F:=(945/52)*F-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)G:=(945/52)*G-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)HH:=(945/52)*HH-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)I:=(945/52)*I-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)J:=(945/52)*J-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)K:=(945/52)*K-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)LL:=(945/52)*LL-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
DRAWNUMBER(REFX1(BARPOS,9999)-BARPOS=7,DIFF,REFX1(當(dāng)天收盤價(jià)A,9999),1,COLORMAGENTA),FONTSIZE15;
DRAWNUMBER(REFX1(BARPOS,9999)-BARPOS=7,DIFF,REFX1(當(dāng)天收盤價(jià),9999),1,COLORWHITE),FONTSIZE15,VALIGN0;
DRAWNUMBER(REFX1(BARPOS,9999)-BARPOS=12,DIFF,REFX1(當(dāng)天收盤價(jià)B,9999),1,COLORCYAN),FONTSIZE15;
DRAWNUMBER(REFX1(BARPOS,9999)-BARPOS=12,DIFF,REFX1(當(dāng)天收盤價(jià)CC,9999),1,COLORGREEN),FONTSIZE15,VALIGN0;
DRAWNUMBER(REFX1(BARPOS,9999)-BARPOS=16,

文件名：ED842DCF-4F8F-4B56-A706-B97686D36D37.jpeg
?
?來源:程序化99
文華技術(shù)人員：
思路2實(shí)現(xiàn)不了，編寫取不到光標(biāo)所在位置

?

另外，思路1可以實(shí)現(xiàn)，但是1樓源碼不全，您復(fù)制完整源碼我們看下

?

?來源: www.kzuj.com.cn
文華客服： DIFF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),NOTEXT;
DEA1:EMA(DIFF,M),NOTEXT;
MACD:=1*(DIFF-DEA1),COLORSTICK,NODRAW;
CZ:=REF(DEA1,1)-REF(DEA1,2),NODRAW;//差值
DEA0:=REF(DEA1,1)+CZ,NODRAW,COLORWHITE;
DRAWLINE3(ISLASTBAR,DEA0,0,1,REF(DEA1,1),1,0),COLORRED,SOLID;
TN:=(DEA1-DEA0)/CZ;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-0.79&&TN<=-0.60,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-0.79&&TN<=-0.60,DEA1,'ICO5'),VALIGN0;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-1.1&&TN<=-0.90,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-1.1&&TN<=-0.90,DEA1,'ICO5'),VALIGN0;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-1.45&&TN<=-1.34,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-1.45&&TN<=-1.34,DEA1,'ICO5'),VALIGN0;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-1.96&&TN<=-1.74,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-1.96&&TN<=-1.74,DEA1,'ICO5'),VALIGN0;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-2.35&&TN<=-2.1,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-2.35&&TN<=-2.1,DEA1,'ICO5'),VALIGN0;
DRAWICON(ISLASTBAR&&CZ>0&&TN>=-2.82&&TN<=-2.55,DEA1,'ICO4');
DRAWICON(ISLASTBAR&&CZ<0&&TN>=-2.82&&TN<=-2.55,DEA1,'ICO5'),VALIGN0;
X:=2;//移動(dòng)距離
AA:=BACKSET(ISLASTBAR,4);
DRAWNUMBER(CROSS(AA,0.5)&&REFX1(TN,10000)>0,REFX1(DEA0,10000)+0,REFX1(TN,10000),2,COLORRED),FONTSIZE15;
DRAWNUMBER(CROSS(AA,0.5)&&REFX1(TN,10000)<0,REFX1(DEA0,10000)+0,REFX1(TN,10000),2,COLORGREEN),FONTSIZE15;
?
網(wǎng)友回復(fù)： T1:0.10,PRECIS2,NODRAW;
TA1:=DEA0+CZ*T1;
TB1:=DEA0-CZ*T1;
IF(TN>0&&CZ>0,(945/52)*TA1-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;//兩個(gè)判斷條件，并列編寫即可
IF(TN<0&&CZ>0,(945/52)*TA1-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN>0&&CZ<0,(945/52)*TA1-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN<0&&CZ<0,(945/52)*TA1-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
T2:0.15,PRECIS2,NODRAW;
TA2:=DEA0+CZ*T2;
TB2:=DEA0-CZ*T2;
IF(TN>0&&CZ>0,(945/52)*TA2-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;//兩個(gè)判斷條件，并列編寫即可
IF(TN<0&&CZ>0,(945/52)*TA2-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN>0&&CZ<0,(945/52)*TA2-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN<0&&CZ<0,(945/52)*TA2-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
T3:0.20,PRECIS2,NODRAW;
TA3:=DEA0+CZ*T3;
TB3:=DEA0-CZ*T3;
IF(TN>0&&CZ>0,(945/52)*TA3-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;//兩個(gè)判斷條件，并列編寫即可
IF(TN<0&&CZ>0,(945/52)*TA3-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN>0&&CZ<0,(945/52)*TA3-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN<0&&CZ<0,(945/52)*TA3-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
T4:0.25,PRECIS2,NODRAW;
TA4:=DEA0+CZ*T4;
TB4:=DEA0-CZ*T4;
IF(TN>0&&CZ>0,(945/52)*TA4-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;//兩個(gè)判斷條件，并列編寫即可
IF(TN<0&&CZ>0,(945/52)*TA4-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1),NULL),COLORRED,NODRAW;
IF(TN>0&&CZ<0,(945/52)*TA4-(245/52)*REF(EMA(C,8)
?
網(wǎng)友回復(fù)： A:=DEA0+0.15*CZ,COLORGREEN;
B:=DEA0-0.05*CZ,COLORGREEN;
CC:=DEA0-0.10*CZ,COLORGREEN;
D:=DEA0-0.15*CZ,COLORGREEN;
E:=DEA0-0.20*CZ,COLORGREEN;
F:=DEA0-0.25*CZ,COLORGREEN;
G:=DEA0-0.30*CZ,COLORGREEN;
HH:=DEA0-0.35*CZ,COLORGREEN;
I:=DEA0-0.40*CZ,COLORGREEN;
J:=DEA0-0.45*CZ,COLORGREEN;
K:=DEA0-0.50*CZ,COLORGREEN;
LL:=DEA0-0.55*CZ,COLORGREEN;
當(dāng)天收盤價(jià):=(945/52)*DEA0-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)A:=(945/52)*A-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)B:=(945/52)*B-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)CC:=(945/52)*CC-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)D:=(945/52)*D-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)E:=(945/52)*E-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)F:=(945/52)*F-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);
當(dāng)天收盤價(jià)G:=(945/52)*G-(245/52)*REF(EMA(C,8),1)+(297/52)*REF(EMA(C,34),1)-(315/26)*REF(DEA1,1);

人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

請(qǐng)老師修改下程序