編程思路破譯 RSV1賦值:100*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值) K1賦值:1日前的RSV1的3日簡單移動平均+(RSV1-1日前的RSV1的3日簡單移動平均)/3 D1賦值:1日前的K1的3日簡單移動平均+(K1-1日前的K1的3日簡單移動平均)/3 J1賦值:3*K1-2*D1 AA1賦值:J1的5日指數(shù)移動平均 AA2賦值:1日前的AA1 輸出J27:AA1,畫紅色,線寬為2 當滿足條件AA1>AA2時,在AA1和AA2位置之間畫柱狀線,寬度為8/3,0不為0則畫空心柱.,COLOR0055AA 當滿足條件AA1>AA2時,在AA1和AA2位置之間畫柱狀線,寬度為5/3,0不為0則畫空心柱.,COLOR0077CC 當滿足條件AA1>AA2時,在AA1和AA2位置之間畫柱狀線,寬度為3/3,0不為0則畫空心柱.,COLOR0099DD 當滿足條件AA1>AA2時,在AA1和AA2位置之間畫柱狀線,寬度為1/3,0不為0則畫空心柱.,畫白色 當滿足條件AA1<=AA2時,在AA1和AA2位置之間畫柱狀線,寬度為8/3,0不為0則畫空心柱.,COLOR006600 當滿足條件AA1<=AA2時,在AA1和AA2位置之間畫柱狀線,寬度為5/3,0不為0則畫空心柱.,COLOR009900 當滿足條件AA1<=AA2時,在AA1和AA2位置之間畫柱狀線,寬度為3/3,0不為0則畫空心柱.,COLOR00BB00 當滿足條件AA1<=AA2時,在AA1和AA2位置之間畫柱狀線,寬度為1/3,0不為0則畫空心柱.,畫白色 RSV2賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 K2賦值:1日前的RSV2的3日簡單移動平均+(RSV2-1日前的RSV2的3日簡單移動平均)/3 D2賦值:1日前的K2的3日簡單移動平均+(K2-1日前的K2的3日簡單移動平均)/3 J2賦值:3*K2-2*D2 BB1賦值:J2的5日指數(shù)移動平均 BB2賦值:1日前的BB1 輸出J9:BB1 當滿足條件BB1>BB2時,在BB1和BB2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR000045 當滿足條件BB1>BB2時,在BB1和BB2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR000085 當滿足條件BB1>BB2時,在BB1和BB2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000C5 當滿足條件BB1>BB2時,在BB1和BB2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000E5 當滿足條件BB1<=BB2時,在BB1和BB2位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR353500 當滿足條件BB1<=BB2時,在BB1和BB2位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR555500 當滿足條件BB1<=BB2時,在BB1和BB2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR757500 當滿足條件BB1<=BB2時,在BB1和BB2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR858500 DD賦值:AA1>AA2 AND BB1>BB2 輸出注意賣出:1日前的DD=1 AND 取反,NODRAW,畫綠色 當滿足條件注意賣出時,在105位置書寫文字,畫綠色 VAR01賦值:J27>1日前的J27 VAR02賦值:J9>1日前的J9 XG賦值:VAR01>0 AND VAR02>0 AND (1日前的VAR01=0 OR 1日前的J9=0) AND J9<35 AND J27<35 輸出底部共振:15*XG,線寬為2 N賦值:27 M1賦值:9 M2賦值:5 M3賦值:3 A賦值:6 B賦值:49 VAR2賦值:(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100 VAR3賦值:VAR2的M1日[1日權重]移動平均 VARA賦值:(收盤價-21.55日內最低價的最低值)/(21.55日內最高價的最高值-34日內最低價的最低值)*80 VARB賦值:VARA的9日[1日權重]移動平均 VARC賦值:VARB的5日[1日權重]移動平均 LC賦值:1日前的收盤價 山賦值:收盤價-LC和0的較大值的A日[1日權重]移動平均/收盤價-LC的絕對值的A日[1日權重]移動平均*100 花賦值:山上穿14 底1賦值:如果VARB上穿VARCANDVARB<13,返回20,否則返回0 輸出頂:如果68上穿山,返回81,否則返回100,線寬為1,畫綠色 輸出底:如果(底1OR花),返回30,否則返回0,線寬為1,畫黃色 輸出短趨勢線:收盤價的13日簡單移動平均,畫紅色,線寬為2 輸出漲:如果短趨勢線>1日前的短趨勢線,返回短趨勢線,否則返回無效數(shù),畫紅色,線寬為2 平賦值:如果短趨勢線=1日前的短趨勢線,返回短趨勢線,否則返回無效數(shù),COLOR00FFFF,線寬為2 輸出跌:如果短趨勢線<1日前的短趨勢線,返回短趨勢線,否則返回無效數(shù),COLOR80FF00,線寬為2 程序源碼 RSV1:=100*(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)); K1:=REF(MA(RSV1,3),1)+(RSV1-REF(MA(RSV1,3),1))/3; D1:=REF(MA(K1,3),1)+(K1-REF(MA(K1,3),1))/3; J1:=3*K1-2*D1; AA1:=EMA(J1,5); AA2:=REF(AA1,1); J27:AA1,COLORRED,LINETHICK2; STICKLINE(AA1>AA2,AA1,AA2,8/3,0),COLOR0055AA; STICKLINE(AA1>AA2,AA1,AA2,5/3,0),COLOR0077CC; STICKLINE(AA1>AA2,AA1,AA2,3/3,0),COLOR0099DD; STICKLINE(AA1>AA2,AA1,AA2,1/3,0),COLORWHITE; STICKLINE(AA1<=AA2,AA1,AA2,8/3,0),COLOR006600; STICKLINE(AA1<=AA2,AA1,AA2,5/3,0),COLOR009900; STICKLINE(AA1<=AA2,AA1,AA2,3/3,0),COLOR00BB00; STICKLINE(AA1<=AA2,AA1,AA2,1/3,0),COLORWHITE; RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K2:=REF(MA(RSV2,3),1)+(RSV2-REF(MA(RSV2,3),1))/3; D2:=REF(MA(K2,3),1)+(K2-REF(MA(K2,3),1))/3; J2:=3*K2-2*D2; BB1:=EMA(J2,5); BB2:=REF(BB1,1); J9:BB1; STICKLINE(BB1>BB2,BB1,BB2,7,0),COLOR000045; STICKLINE(BB1>BB2,BB1,BB2,5,0),COLOR000085; STICKLINE(BB1>BB2,BB1,BB2,3,0),COLOR0000C5; STICKLINE(BB1>BB2,BB1,BB2,1,0),COLOR0000E5; STICKLINE(BB1<=BB2,BB1,BB2,7,0),COLOR353500; STICKLINE(BB1<=BB2,BB1,BB2,5,0),COLOR555500; STICKLINE(BB1<=BB2,BB1,BB2,3,0),COLOR757500; STICKLINE(BB1<=BB2,BB1,BB2,1,0),COLOR858500; DD:=AA1>AA2 AND BB1>BB2; 注意賣出:REF(DD,1)=1 AND NOT(DD),NODRAW,COLORGREEN; DRAWTEXT(注意賣出,105,'S'),COLORGREEN; VAR01:=J27>REF(J27,1); VAR02:=J9>REF(J9,1); XG:=VAR01>0 AND VAR02>0 AND (REF(VAR01,1)=0 OR REF(J9,1)=0) AND J9<35 AND J27<35; 底部共振:15*XG,LINETHICK2; N:=27; M1:=9; M2:=5; M3:=3; A:=6; B:=49; VAR2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; VAR3:=SMA(VAR2,M1,1); VARA:=(CLOSE-LLV(LOW,21.55))/(HHV(HIGH,21.55)-LLV(LOW,34))*80; VARB:=SMA(VARA,9,1); VARC:=SMA(VARB,5,1); LC:=REF(CLOSE,1); 山:=SMA(MAX(CLOSE-LC,0),A,1)/SMA(ABS(CLOSE-LC),A,1)*100; 花:=CROSS(山,14); 底1:=IF(CROSS(VARB,VARC) AND VARB<13,20,0); 頂:IF(CROSS(68,山),81,100),LINETHICK1,COLORGREEN; 底:IF((底1 OR 花),30,0),LINETHICK1,COLORYELLOW; 短趨勢線:MA(CLOSE,13),COLORRED,LINETHICK2; 漲:IF(短趨勢線>REF(短趨勢線,1),短趨勢線,DRAWNULL),COLORRED,LINETHICK2; 平:=IF(短趨勢線=REF(短趨勢線,1),短趨勢線,DRAWNULL),COLOR00FFFF,LINETHICK2; 跌:IF(短趨勢線<REF(短趨勢線,1),短趨勢線,DRAWNULL),COLOR80FF00,LINETHICK2; 注: 館內各種公式為學習編程而保存,實戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率,決不能依據(jù)公式名稱的描述和形容去投資,據(jù)此入市造成投資損失由投資者自己承擔。 發(fā)文不易,如獲益,歡迎贊賞,贊賞必復! |
|