/*[[ Name := Trend signal Author := Spreadtrade2win Notes := Trend alert Separate Window := No First Color := Red First Draw Type := Symbol First Symbol := 108 Use Second Data := Yes Second Color := LimeGreen Second Draw Type := Symbol Second Symbol := 108 ]]*/ Inputs: RISK(3),AllBars(500); Variables: value2(0),value3(0),value10(10),value11(0),x1(70),x2(30),i1(0); Variables: TrueCount(0),Counter(0),Range(0),AvgRange(0),MRO1(0),MRO2(0); Variables: val1(0),val2(0),shift(0),NumBars(500),AlertTime(0); Array: Table_value2[500,2](0); SetLoopCount(0); value10=3+RISK*2; x1=67+RISK; x2=33-RISK; value11=value10; If Bars=Range*2.0 Then TrueCount=TrueCount+1; Counter=Counter+1; }; If TrueCount>=1 Then MRO1=Counter Else MRO1=-1; Counter=shift; TrueCount=0; While (Counter=Range*4.6 Then TrueCount=TrueCount+1; Counter=Counter+1; }; If TrueCount>=1 Then MRO2=Counter Else MRO2=-1; If MRO1>-1 Then value11=3 Else value11=value10; If MRO2>-1 Then value11=4 Else value11=value10; value2=100-Abs(iWPR(value11,shift)); // PercentR(value11=9) Table_value2[shift,1]=shift; Table_value2[shift,2]=value2; val1=0; val2=0; value3=0; If value2=x2 And Table_value2[shift+i1,2]<=x1) {i1=i1+1;}; If Table_value2[shift+i1,2]>x1 Then {value3=High[shift]+Range*0.5; val1=value3; }; }; If value2>x1 Then {i1=1; While (Table_value2[shift+i1,2]>=x2 And Table_value2[shift+i1,2]<=x1) {i1=i1+1;}; If Table_value2[shift+i1,2] AlertTime then { if val1 > 0 then { Alert(Symbol, ", M", Period, ": SELL Signal."); AlertTime = CurTime + (Period - mod(Minute, Period))*60; }; if val2 > 0 then { Alert(Symbol, ", M", Period, ": BUY Signal."); AlertTime = CurTime + (Period - mod(Minute, Period))*60; }; }; [ 本帖最后由 老正 于 2005-8-10 08:42 编辑 ]