麻烦哪位高手帮忙把下面公式改为底买选股公式源码？

可以将这个指标中的底买出现改为选股，提示位置效果如图。

这个公式看起来是一个股票技术分析的脚本，其中包含了头部和底部的判断条件，并且使用了一些绘图和文本标注功能。我将其改为一个简单的底部选股公式的源码，如下所示：
//===================================================
// 底部选股公式
//===================================================
// 计算J值
VAR1:=(2*CLOSE+HIGH+LOW)/40;
VAR2:=EXPMA(EXPMA(EXPMA(VAR1,4),4),4);
J:=(VAR2-REF(VAR2,1))/REF(VAR2,1)*100;
// 计算D和K值
D:MA(J,3);
K:MA(J,1);
// 计算底部信号
BOTTOM:(TROUGHBARS(J,15,3)<=3) AND (J>REF(J,1)) AND (J>REF(J,2));
// 画出底部信号
DRAWICON(BOTTOM=1, 60, "★");
// 返回底部信号
BOTTOM;
这个公式使用了TROUGHBARS函数来判断当前是否出现底部信号，判断的条件是J值在过去的15个周期中至少有3个周期的最低值，并且当前的J值比前两个周期的J值都要高，同时也比底部选股公式中常见的3均线组合更为简单。
需要注意的是，底部选股公式只是股票选股的一个方面，不能保证股票的盈利和风险，需要结合其他的因素进行综合分析和决策。同时，本人并非专业股票投资人士，以上仅供参考，请自行谨慎决策。

以下是底买选股公式的源码：
VAR1:=(2CLOSE+HIGH+LOW)/40;
VAR2:=EXPMA(EXPMA(EXPMA(VAR1,4),4),4);
J:(VAR2-REF(VAR2,1))/REF(VAR2,1)100, COLORSTICK;
D:MA(J,3);
K:MA(J,1);
PW1:=EMA(((VOL(CLOSE-OPEN)240/FROMOPEN)/(CLOSE+OPEN)),38);
ME:=EMA(PW1,8)0.1,COLORSTICK;
MEE:=ABS(J);
V10:=PEAKBARS(3,15,1)<10;
V12:=IF(V10=1,50,0);
头部:=IF(V12=50,100,0);
TOB:=J<=REF(J,1) OR K<=D;
卖:IF(头部>REF(头部,1){ AND TOB},MEE,0),COLORGREEN,LINETHICK3;{逃顶}
V9:=TROUGHBARS(3,15,1)<10;
V11:=IF(V9=1,50,0);
底部:=IF(V11=50,50,0);
买底:IF(底部>REF(底部,1),MEE,0),COLORRED,LINETHICK2;
STICKLINE(买底,0,MEE0.9,1,0),COLORRED;
STICKLINE(卖,0,MEE0.9,1,0),COLORBLUE;
STICKLINE(卖,0,MEE0.9,0.6,0),COLORRED;
DRAWTEXT(底部>REF(底部,1),MEE,'★底买'),COLORRED;
DRAWTEXT(头部>REF(头部,1),MEE,'▲顶卖！'),COLORRED;
DRAWTEXT(头部>REF(头部,1),MEE1.04,'▲'),COLORRED;
DRAWTEXT(头部>REF(头部,1),MEE1.08,'▲'),COLORRED;
注：该源码是一段TradingView中的Pine Script代码，用于股票分析。因为该代码需要的指标和函数可能不是所有财经软件都有，所以并不能直接在其他软件中运行。

100.VAR1:=(2*CLOSE+HIGH+LOW)/40; VAR2:=EXPMA(EXPMA(EXPMA(VAR1,4),4),4); J:(VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK; D:MA(J,3); K:MA(J,1); PW1:=EMA(((VOL*(CLOSE-OPEN)*240/FROMOPEN)/(CLOSE+OPEN)),38); ME:=EMA(PW1,8)*0.1,COLORSTICK; MEE:=ABS(J); V10:=PEAKBARS(3,15,1)<10; V12:=IF(V10=1,50,0); 头部:=IF(V12=50,100,0); TOB:=J<=REF(J,1) OR K<=D; 卖:IF(头部>REF(头部,1){ AND TOB},MEE,0),COLORGREEN,LINETHICK3;{逃顶}.V9:=TROUGHBARS

15654425338：璇楂樻墜甯垜鎶婅嚜缂鍏紡鏀规垚鏉′欢閫夎偂鍏紡(閫氳揪淇)
仍彼：绛旓細VAR26:=EMA(CLOSE,2)-EMA(CLOSE,150);VAR27:=EMA(VAR26 ,100);VAR28:=2*(VAR26-VAR27);VAR29:=POW(VAR28,3)*0.1+POW(VAR28,1);榛戦┈绾:=IF( VAR28>0.1,VAR29,0)*3;浣庝拱:=IF(TROUGHBARS(3,6,1)=0 AND HIGH>LOW+0.04,50,0);楂樺崠:=IF(PEAKBARS(3,6,1)<1.0=1,...

15654425338：璇疯佸笀甯垜鏀浠ヤ笅鍏紡涓閫夎偂鍏紡濂藉悧?瑕佹眰鏈堢嚎閫夊嚭鈥滃簳鈥濆瓧
仍彼：绛旓細鐩存帴搴鑳岀:=(CL1<CL2 ) AND (MDIFB2>MDIFL2) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB2<=REF(MDIFB2,1);闅斿嘲搴曡儗绂:=(CL1<CL3 AND CL3<CL2 ) AND (MDIFB3>MDIFL3) AND (MACD<0 AND REF(MACD,1)<0) AND MDIFB3<=REF(MDIFB3,1);B:=鐩存帴搴曡儗绂 OR 闅斿嘲搴曡儗绂;BG...

15654425338：楹荤儲鍚勪綅楂樻墜甯垜鎶婁笅闈鎸囨爣鍏紡鏀逛负閫夎偂鍏紡
仍彼：绛旓細A01:=DYNAINFO(7);A03:=BARSCOUNT(CLOSE);A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100);A05:=IF((A03 > 20),A04,0);A06:=IF((LOW > A01),0,IF((HIGH < A01),1,(((A01 - LOW) + 0.009) / ((HIGH - LOW) + 0.009)));A07:=DMA(A06,(VOL / CAPITAL)) * ...

15654425338：璇楂樻墜鎶婁笅鍒楀叕寮忔敼鎴 鐭拱閫夎偂鍏紡!
仍彼：绛旓細AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));鐭拱:REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;...

15654425338：璇疯佸笀甯繖鎶杩欎釜鍏紡鏀规垚涔板叆鏉′欢閫夎偂
仍彼：绛旓細V6:=CLOSE/REF(CLOSE,3)>=1.1;V7:=BACKSET(V6,3);澶ф定鑲＄エ涔:=IF((V7 AND COUNT(V7,3)=1),50,0);V9:=TROUGHBARS(3,15,1)<10;V11:=IF(V9=1,50,0);搴曢儴:= IF(V11=50,50,0);鑲＄エ涔:=IF( 搴曢儴>REF(搴曢儴,1),40,0);X:澶ф定鑲＄エ涔 OR 鑲＄エ涔;涓嶈繃杩欎釜鎸囨爣閲屾湁鏈潵鍑芥暟 ...

15654425338：璇楂樻墜甯繖鎶婁笅闈鐨勯氳揪淇℃寚鏍鏀规垚閫夎偂鎸囨爣
仍彼：绛旓細AND BTJ3,13);BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);BTJ82 OR (BTJ81 AND TIME>10) OR (BTJ811 AND TIME>10);鎶婂垎鍎跨粰涓婇潰閭ｄ綅鍝ヤ滑鍎垮惂銆備粬鍋氱殑姣旀垜缁嗐傛垜绾负2鍒嗗洖绛斿垎銆傘傘傝繕鏈夛紝鎮ㄤ娇鐢ㄨ繖鍏紡鐨勬椂鍊欒灏忓績銆

15654425338：璇楂樻墜鎶婁笅闈鐨鍏紡鏀瑰啓涓 褰撲笅闈㈢殑涓夎鍑虹幇鐨勬椂鍊 涔熷氨鏄 涔板叆淇″彿鍑...
仍彼：绛旓細RSV:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;K:=SMA(RSV,9,1);D:=SMA(K,3,1);瓒嬪娍J1:=3*K-2*D;瓒嬪娍J2:=EMA(K,3);WH:=DRAWLINE(D>=HHV(D,21),D,D<=LLV(D,21),D,1);涓夎鍑虹幇:CROSS(瓒嬪娍J1,WH) AND CROSS(瓒嬪娍J2,WH);--- 娉ㄦ剰:WH鍙ュ叿鏈変竴瀹...

15654425338：璇楂樻墜鎶婁笅鍒閫氳揪淇鍏紡鏀逛负閫夎偂鍏紡,瑕佹眰閫夊嚭鈥滀拱鈥
仍彼：绛旓細VAR2:=REF(LOW,1);VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);VAR5:=LLV(LOW,34);VAR6:=HHV(VAR4,34);VAR7:=IF(LLV(LOW,56),1,0);VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/...

15654425338：璇楂樻墜甯繖鎶婁笅闈鐨鍏紡鏀逛负閫夎偂鍏紡,璋㈣阿!
仍彼：绛旓細MA5:MA(CLOSE,5);MA10:MA(CLOSE,10);MA20:MA(CLOSE,20);MA60:MA(CLOSE,60);MA120:MA(CLOSE,120);DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;DRAWICON((ZIG(3...

15654425338：璇烽珮浜鎶婁笅闈鐨勫悓鑺遍『鍏紡鏀逛负閫夎偂鍏紡 Var3:=(CLOSE-MA(CLOSE,6))/...
仍彼：绛旓細DRAWTEXT((VARC=1),(-14),'涔'),COLOR0000FF;STICKLINE((VARD=1),14,0,2,0),COLOR00FF00;DRAWTEXT((VARD=1),18,'鍗'),COLOR00FF00;VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(...