支撑阻力策略（TS版）

支撑阻力策略（TS版）在交易过程中，支撑位（WSO，但通常更常用的是SupportLevel，简称SL）和阻力位（WRO，但通常更常用的是ResistanceLevel，简称RL）是两个非常重要的概念，它们对于分析价格走势和制定交易策略至关重要。支撑位（SupportLevel,SL）：定义：支撑位是指在下跌趋势中，某一价格水平多次阻止了价格的进一步下跌，形成了一个“支撑”区域。当价格跌至此水平时，买方力量增强，推动价格反弹。作用：支撑位是投资者判断市场底部的重要依据，也是潜在买入点。当价格回调到支撑位附近时，如果得到确认（即价格在此位置反弹），则可能意味着市场即将反转或至少会出现一段上涨行情。阻力位（ResistanceLevel,RL）：定义：阻力位是指在上涨趋势中，某一价格水平多次阻止了价格的进一步上涨，形成了一个“阻力”区域。当价格上涨至此水平时，卖方力量增强，导致价格回落。作用：阻力位是投资者判断市场顶部的重要依据，也是潜在卖出点。当价格上涨到阻力位附近时，如果无法得到突破（即价格在此位置遇阻回落），则可能意味着市场即将出现回调或反转。需要注意的是，支撑位和阻力位并不是固定不变的，它们可以随着市场情况的变化而发生变化。例如，如果一个支撑位被有效跌破，那么它可能会转变为未来的阻力位；同样，如果一个阻力位被成功突破，那么它可能会转变为未来的支撑位。此外，在实际交易中，投资者还会利用其他技术分析工具（如趋势线、移动平均线、成交量等）来辅助判断支撑位和阻力位的有效性，以及制定更为精细的交易策略。本策略使用整数运算的公式来判断收盘价与特定水平的关系，以及如何通过绘制支撑位（WSO）和阻力位（WRO）来观察价格行为。定义和识别图表上的高峰和低谷，并提到了几种不同的方法。核心观点：1.整数运算公式用于判断收盘价与水平的关系，其中INT()函数返回下一个最低的整数值。2.WSO和WRO分别代表支撑位和阻力位，通过比较当前收盘价与多个支撑/阻力位来确定。3.绘制支撑位和阻力位时，可以使用点代替线以避免图表过于杂乱。4.定义了高峰和低谷的几种不同方法，包括基于周期、反应性和孤立性的方法。5.支撑位和阻力位的变化反映了价格行为，对于交易决策有重要意义。函数名称：WSO代码解释：描述：计算基于SwingLow的支撑强度振荡器（SupportOscillator）输入参数：Strength(Numeric)：用于检测SwingLow的周期强度Length(Numeric)：用于计算支撑线强度的周期长度变量：SCalc(0)：用于累积计算支撑线相对收盘价的整数部分数组：Support[100](0)：存储最近的支撑线值，最多100个//检测是否形成了SwingLowCondition1=SwingLow(1,Low,Strength,Strength+1)<>-1;//如果形成了SwingLow，则更新支撑线数组IFCondition1ThenBegin//将Support数组中的值向后移动一位Forvalue1=100DownTo2BeginSupport[value1]=Support[value1-1];End;//将最新的SwingLow设置为Support数组的第一个值Support[1]=Low[Strength];End;//如果指定长度的支撑线不为0，则计算支撑强度IFSupport[Length]<>0ThenBeginSCalc=0;//累加Support数组中每个值相对于收盘价的整数部分Forvalue1=1ToLengthBeginSCalc=SCalc+IntPortion(Support[value1]/Close);End;//计算并返回支撑强度振荡器的值WSO=100*(1-(SCalc/Length));EndElse//如果没有形成支撑线，则返回0WSO=0;End;函数:WRO中文注解描述：计算基于SwingHigh的阻力强度振荡器（ResistanceOscillator）输入参数：Strength(Numeric)：用于检测SwingHigh的周期强度Length(Numeric)：用于计算阻力线强度的周期长度变量：RCalc(0)：用于累积计算阻力线相对收盘价的整数部分数组：Resist[100](0)：存储最近的阻力线值，最多100个//检测是否形成了SwingHighCondition1=SwingHigh(1,High,Strength,Strength+1)<>-1;//如果形成了SwingHigh，则更新阻力线数组IFCondition1ThenBegin//将Resist数组中的值向后移动一位Forvalue1=100DownTo2BeginResist[value1]=Resist[value1-1];End;//将最新的SwingHigh设置为Resist数组的第一个值Resist[1]=High[Strength];End;//如果指定长度的阻力线不为0，则计算阻力强度IFResist[Length]<>0ThenBeginRCalc=0;//累加Resist数组中每个值相对于收盘价的整数部分Forvalue1=1ToLengthBeginRCalc=RCalc+IntPortion(Resist[value1]/Close);End;//计算并返回阻力强度振荡器的值WRO=100*(1-(RCalc/Length));EndElse//如果没有形成阻力线，则返回0WRO=0;End;指标名称：支撑-阻力中文注解描述：在图表上绘制WSO和WRO两个振荡器的值输入参数：Strength(4)：用于检测SwingLow和SwingHigh的周期强度Length(6)：用于计算支撑和阻力线强度的周期长度//绘制WSO振荡器的值，标签为"SupportOsc"Plot1(WSO(Strength,Length),"SupportOsc");//绘制WRO振荡器的值，标签为"ResistOsc"Plot2(WRO(Strength,Length),"ResistOsc");```策略信号中文注解：描述：根据WSO和WRO振荡器的值及其移动平均值发出交易信号。输入参数：-Strength(4)：力量指标，计算过去4个时间单位的强度。-Length(6)：长度参数，用于计算指标的时间窗口长度。-AvgLen(30)：平均长度，用于计算平均值的时间窗口长度。-BuyLen(4)：购买长度，表示触发购买的信号长度。-BuyLev(95)：购买水平，表示一个特定的阈值。策略逻辑：1.`IFMRO(WSO(Strength,Length)>Average(WSO(Strength,Length),AvgLen),BuyLen,1)<>-1ThenBuyThisBaronClose;`-`WSO(Strength,Length)`：计算基于力量指标和长度参数的某种指标（加权平均值）。-`Average(WSO(Strength,Length),AvgLen)`：计算上述指标在过去AvgLen个时间单位内的平均值。-`MRO`：比较操作，这里比较的是`WSO(Strength,Length)`是否大于其平均值。-`BuyLen`：如果条件成立，则使用购买长度（购买信号的时间长度）。-`1`：如果条件不成立，则使用1。-`<>-1`：判断上述比较操作的结果是否不等于-1。-`BuyThisBaronClose`：如果在收盘时满足条件，则执行购买操作。整个条件可以理解为：如果基于力量和长度计算的加权指标大于其过去30个时间单位的平均值，并且满足特定的购买长度条件，则在收盘时购买。2.`IFAverage(WRO(Strength,Length),AvgLen)CrossesAboveBuyLevThenBuyThisBaronClose;`-`WRO(Strength,Length)`：计算基于力量指标和长度参数的另一种指标（加权平均值）。-`Average(WRO(Strength,Length),AvgLen)`：计算上述指标在过去AvgLen个时间单位内的平均值。-`CrossesAboveBuyLev`：判断这个平均值是否刚刚超过购买水平（95）。-`BuyThisBaronClose`：如果在收盘时满足条件，则执行购买操作。整个条件可以理解为：如果基于力量和长度计算的加权指标的平均值刚刚超过95这个阈值，则在收盘时购买。策略函数指标信号函数:WSO代码：Inputs:Strength(Numeric),Length(Numeric);Vars:SCalc(0);Array:Support[100](0);Condition1=SwingLow(1,Low,Strength,Strength+1)<>-1;IFCondition1ThenBeginForvalue1=100DownTo2BeginSupport[value1]=Support[value1-1];End;Support[1]=Low[Strength];End;IFSupport[Length]<>0ThenBeginSCalc=0;Forvalue1=1ToLengthBeginSCalc=SCalc+IntPortion(Support[value1]/Close);End;WSO=100*(1-(SCalc/Length));EndElseWSO=0;函数:WRO代码：Inputs:Strength(Numeric),Length(Numeric);Vars:RCalc(0);Array:Resist[100](0);Condition1=SwingHigh(1,High,Strength,Strength+1)<>-1;IFCondition1ThenBeginForvalue1=100DownTo2BeginResist[value1]=Resist[value1-1];End;Resist[1]=High[Strength];End;IFResist[Length]<>0ThenBeginRCalc=0;Forvalue1=1ToLengthBeginRCalc=RCalc+IntPortion(Resist[value1]/Close);End;WRO=100*(1-(RCalc/Length));EndElseWRO=0;指标名称：支撑-阻力代码：Inputs:Strength(4),Length(6);Plot1(WSO(Strength,Length),“SupportOsc”);Plot2(WRO(Strength,Length),“ResistOsc”);策略信号代码:Inputs:Streng