<% Set conn = Server.CreateObject("ADODB.Connection") conn.ConnectionString ="Provider=SQLOLEDB.1;Password=sctelecomtemp;User ID=sctelecom3;Persist Security Info=True;Initial Catalog=SCtelecom;Data source=localhost;Connect Timeout=15" conn.Open %> <% '我自己写的一些函数 '======================================================================================================== '比较两个字符串Str1和Str2,如果Str1包含Str2返回True,否则返回False Function CompString(Str1,Str2) If Instr(1,Str1,Str2,1) Then CompString=True Else CompString=False End If End Function '======================================================================================================== 'Str 要分解的String 'FirstLinkStr 第一个分解后的字符串的连接字符串前部 'LastLinkStr 最后一个分解后的字符串的连接字符串前部 'LinkStr1 非第一个分解后的字符串的连接字符串前部 'LinkStr2 分解后的字符串的连接字符串后部 '返回一个新的字符串 Function DeleaveString(Str,FirstLinkStr,LinkStr1,LinkStr2,LastLinkStr,Char) TempStr=Str If TempStr<>"" Then If Instr(1,TempStr,Char,1)<1 Then DeleaveString=FirstLinkStr&TempStr&LastLinkStr Else E=Instr(1,TempStr,Char,1) Strtmp=Left(TempStr,E-1) TempStr=Replace(TempStr,"","",E+1,1) DeleaveString=FirstLinkStr&Trim(Strtmp)&LinkStr2 Do While Instr(E,TempStr,Char,1) E=Instr(1,TempStr,Char,1) Strtmp=Left(TempStr,E-1) TempStr=Replace(TempStr,"","",E+1,1) DeleaveString=DeleaveString&LinkStr1&Trim(Strtmp)&LinkStr2 Loop DeleaveString=DeleaveString&LinkStr1&Trim(TempStr)&LastLinkStr End If End If End Function '======================================================================================================== '比较两个字符串,把相同的保留一个,组成一个新的字符串返回 Function CompLinkString(Str1,Str2,Char) TempStr1=Str1 TempStr2=Str2 If TempStr1<>"" Then If TempStr2<>"" Then If Instr(1,TempStr2,Char,1)<1 Then If Instr(1,TempStr1,TempStr2,1)<1 Then TempStr1=TempStr1&Char&TempStr2 End If Else Do While Instr(1,TempStr2,Char,1) E=Instr(1,TempStr2,Char,1) Str=Left(TempStr2,E-1) If Instr(1,TempStr1,Str,1)<1 Then TempStr1=TempStr1&Char&Trim(Str) End If TempStr2=Replace(TempStr2,"","",E+1,1) Loop Str=TempStr2 If Instr(1,TempStr1,Str,1)<1 Then TempStr1=TempStr1&","&Trim(Str) End If End If End If Else TempStr1=TempStr2 End If CompLinkString=TempStr1 End Function '======================================================================================================== '统计字符串中元素个数 Function CountElements(Str,Char) TempStr=Str If TempStr<>"" Then Count=0 If Instr(1,TempStr,Char,1)<1 Then CountElements=1 Else Do While Instr(1,TempStr,Char,1) Count=Count+1 TempStr=Replace(TempStr,Char,"",1,1) Loop CountElements=Count+1 End If Else CountElements=0 End If End Function '======================================================================================================== '取指定位置的字符串 Function GetElement(Str,Char,Num) TempStr=Replace(Str,"","") If TempStr<>"" Then Count=0 If Instr(1,TempStr,Char,1)<1 Then Count=1 Else Do While Instr(1,TempStr,Char,1) Count=Count+1 TempStr=Replace(TempStr,Char,"",1,1) Loop Count=Count+1 End If TempStr=Replace(TempStr,"",Char) If Count>1 Then If Num<1 Then GetElement="" End If If Num=1 Then GetElement=Left(TempStr,Instr(1,TempStr,Char,1)-1) End If If Num=Count Then For i=1 to Num-1 TempStr=Replace(TempStr,"","",Instr(1,TempStr,Char,1)+1,1) Next GetElement=TempStr End If If Num>Count Then GetElement="" End If If Num>1 And NumCountElements(Str,Char) Then GetElements="" Else If Total>=CountElements(Str,Char) Then GetElements=Replace(Str,Char,ChangeChar) Else GetElements="" For i=Start To Total+Start-1 GetElements=GetElements&GetElement(Str,Char,i)&ChangeChar Next GetElements=Left(GetElements,Len(GetElements)-1) End If End If End If End Function '======================================================================================================== '生成“全选”和“清除”按钮 'ForName 表单中Form的名字 'ElementName 表单中元素的名字 'Parameter 为1时只有“全选”按钮,为2时只有“清除”按钮,为3时有“全选”和“清除”按钮 Function ChkButton(FormName,ElementName,Parameter) If Parameter<=1 Or Parameter>=3 Then Response.Write "" Response.Write "" End If If Parameter>=2 Then Response.Write "" Response.Write "" End If End Function '======================================================================================================== '取指定两字符串之间的字符串 Function GetString(Str,FrontStr,BackStr) TempStr=Str If TempStr="" Then GetString="" Else If FrontStr="" Then If BackStr="" Then GetString=Trim(TempStr) Else If Instr(1,TempStr,BackStr,1) Then GetString=Trim(Left(TempStr,Instr(1,TempStr,BackStr,1)-1)) Else GetString="" End If End If Else If Instr(1,TempStr,FrontStr,1) Then If BackStr="" Then GetString=Trim(Mid(TempStr,Instr(TempStr,FrontStr,1)+1,Len(TempStr))) Else TempStr=Replace(TempStr,FrontStr,"",Instr(1,TempStr,FrontStr,1),1) If Instr(1,TempStr,BackStr,1) Then GetString=Trim(Left(TempStr,Instr(1,TempStr,BackStr,1)-1)) Else GetString="" End If End If Else GetString="" End If End If End If End Function '======================================================================================================== '日期和时间 'Parameter<=1 返回日期 'Parameter>1 返回日期和星期 'Parameter2 为2时返回的月、日长度为2 Function WeekDate(LinkString,Parameter,Parameter2) Y=Year(Date()) M=Month(Date()) D=Day(Date()) If Parameter2=2 Then If Len(M)=1 Then M="0"&M End If If Len(D)=1 Then D="0"&D End If End If Select Case WeekDay(Date()) Case 1 Week="星期日" Case 2 Week="星期一" Case 3 Week="星期二" Case 4 Week="星期三" Case 5 Week="星期四" Case 6 Week="星期五" Case 7 Week="星期六" End Select If Parameter="" Or Parameter<=1 Then If LinkString="" Then WeekDate=Y&"年"&M&"月"&D&"日" Else WeekDate=Y&LinkString&M&LinkString&D End If Else If LinkString="" Then WeekDate=Y&"年"&M&"月"&D&"日  "&Week Else WeekDate=Y&LinkString&M&LinkString&D&"  "&Week End If End If End Function '======================================================================================================== '取得明天的日期 'LinkStr 年月日之间的连接字符串 Function Tomorrow(LinkStr) ThisYear=Year(Date()) ThisMonth=Month(Date()) ThisDay=Day(Date()) If LinkStr="" Then LinkStr1="年" LinkStr2="月" LinkStr3="日" Else LinkStr1=LinkStr LinkStr2=LinkStr LinkStr3="" End If Select Case ThisMonth Case 1,3,5,7,8,10,12 If ThisDay+1<=31 Then Tomorrow=ThisYear&LinkStr1&ThisMonth&LinkStr2&ThisDay+1&LinkStr3 Else If ThisMonth=12 Then Tomorrow=ThisYear+1&LinkStr1&"1"&LinkStr2&"1"&LinkStr3 Else Tomorrow=ThisYear&LinkStr1&ThisMonth+1&LinkStr2&"1"&LinkStr3 End If End if Case 2 If ThisYear\4=0 Then If ThisDay+1>29 Then Tomorrow=ThisYear&LinkStr1&"3"&LinkStr2&"1"&LinkStr3 Else Tomorrow=ThisYear&LinkStr1&"2"&LinkStr2&ThisDay+1&LinkStr3 End If Else If ThisDay+1>28 Then Tomorrow=ThisYear&LinkStr1&"3"&LinkStr2&"1"&LinkStr3 Else Tomorrow=ThisYear&LinkStr1&"2"&LinkStr2&ThisDay+1&LinkStr3 End If End If Case 4,6,9,11 If ThisDay+1<=30 Then Tomorrow=ThisYear&LinkStr1&ThisMonth&LinkStr2&ThisDay+1&LinkStr3 Else Tomorrow=ThisYear&LinkStr1&ThisMonth+1&LinkStr2&"1"&LinkStr3 End if End Select End Function '======================================================================================================== Function FormatNum(Number) If Number<0 Then If Instr(1,Cstr(Number),".")=2 Then Number="-0."&Right(Cstr(Number),Len(Cstr(Number))-2) End If Else If Number<1 And Number>0 Then If Instr(1,Cstr(Number),".")=1 Then Number="0"&Cstr(Number) End If Else Number=Number End If End If FormatNum=Number End Function '======================================================================================================== '格式化日期 Function FormatDate(Str,Char,ChangeChar) If Str<>"" Then FormatDate="" For i=1 To CountElements(Str,Char) TmpStr=GetElement(Str,Char,i) If Len(TmpStr)<2 Then TmpStr="0"&TmpStr End If if i - CountElements(Str,Char)=0 then FormatDate=FormatDate&TmpStr else FormatDate=FormatDate&TmpStr&ChangeChar end if Next Else FormatDate="" End If End Function '======================================================================================================== Function IsSelected(Str,Str2,Out) If Str=Str2 Then IsSelected=Out End Function '======================================================================================================== Function NoSpac(Str) If Str="" Then NoSpac=" " Else NoSpac=Str End If End Function '======================================================================================================== '显示文本格式! function Text(strTemp) if strtemp<>"" then MessageText = server.htmlencode(strTemp) MessageText = replace(MessageText,"<","<") MessageText = replace(MessageText,">",">") MessageText = replace(MessageText,""","""") MessageText = replace(MessageText,chr(13),"
") MessageText = replace(MessageText,chr(32)," ") text=Messagetext end if end function '======================================================================================================== '-年-月-日的日期格式 Function DateCH(strTemp) if isdate(strTemp) then YYYY=Year(strTemp) MM=Month(strTemp) DD=Day(strTemp) DateCH=YYYY&"年"&MM&"月"&DD&"日" else DateCH=strTemp end if End Function '======================================================================================================== %> <% ID=trim(request("ID")) if not isnumeric(id) then response.write "您输入了错误的ID号" response.end end if set rs=Server.CreateObject("ADODB.RecordSet") %> 四川省电信有限公司
  首页 关于我们 企业动态 电信业务 网上客服中心 技术前沿 总经理信箱 品牌管理系统 English
LMDS系统调制方式及载波带宽的选择

 

  对于LMDS系统而言,调制方式对系统性能有着很大的影响,因此,选择适当的调制技术十分关键。以下我们将以大唐LMDS产品为例探讨采用QPSK和16QAM自适应调制技术的合理性。此外,系统载波带宽的选择也对系统的性能有着重要的影响,因为,不同的载波带宽会有传输性能上的差异及制造成本上的不同,如何根据业务的需要从多个方面进行权衡选择是值得探讨的问题。

  调制方式的选择

  多数LMDS系统产品采用QPSK(或4QAM)和16QAM自适应调制方式,部分产品仅使用QPSK(或4QAM)一种调整方式。大唐无线通信公司的R3000LMDS系统采用了QPSK和16QAM自适应调制技术及RS前向纠错,接收机门限在BER=10-9

  时分别是-77dBm/16QAM和-83.3dBm/QPSK,两种调制方式在系统参数相同的情况下,衰落储备差6.3dB。有人认为从抗雨衰能力的角度出发,16QAM技术并不可取,这种看法是片面的。因为,对一个特定的降雨区要求可用性指标达到99.99%时,最大通信距离必然是按QPSK调制方式下估算的,如果同样在这个距离上使用16QAM调制方式时,可用性指标将劣化到95%,这就意味着LMDS系统可以在95%的时间内工作在16QAM方式下,也就是在95%的时间内在14MHz带宽上可传输36Mbps速率信号,仅在5%的时间段因降雨调整到QPSK方式下工作,此时,在14MHz带宽上仅可传输16Mbps速率信号,相比之下,单纯采用QPSK(或4QAM)调制方式的系统,在同样距离上99.99%的时间,在14MHz带宽上,都只能传输16Mbps速率信号,两者的优劣自然是十分清楚的。当然上面在16QAM方式下的可用性数据仅是一个设计期望值,实际情况会因不同气候区而异,大唐无线通信公司的R3000LMDS系统16QAM与QPSK自适应转换的判决区间是SNR=(16~25)dB。

  在考虑到16QAM与QPSK两种调制方式下,传输速率相差一倍的因素时,凡具有这种性能的LMDS系统对用户业务的QoS保证应有相应的策略。有的LMDS系统设计时,规定了一个载波允许IP业务应用的带宽上限,其他带宽用于最高优先级的专线业务,有的LMDS系统设有安排IP业务的带宽上限,在这种情况下,网络规划时需要小心。即当以专线业务为主的应用时,其可用带宽应以QPSK方式下的传输速率为依据,或当既有专线业务,又有IP业务时,可以在一个载波上,按QPSK条件下安排一定的专线业务带宽,在16QAM条件下,按CoS等级为不同用户的IP业务分配带宽,如果专线业务带宽不足,或承诺带宽业务较多时,可通过增加扇区载波数量的方法予以解决。当然,在不同降雨区,业务带宽分配策略可以灵活运用。

  在合理的安排策略下,在降雨期间,随降雨强度的逐渐增加,IP业务将会根据业务优先级的设置自动调整其吞吐量,而专线业务带宽仍会得到保证,但误码性能会逐渐变差,直到因降雨强度过大,因SNR恶化到QPSK门限以下,则所有业务将会中断。

  载波带宽的选择

  根据YD/T1186-2002《接入网技术要求-26GHzLMDS本地多点分配系统》的规定,LMDS系统的载波带宽可以选择3.5MHz、7MHz、14MHz和28MHz,选择哪种载波带宽主要是根据业务需要而定,不同的载波带宽除了可支持业务的能力不同外,还会影响到传输性能上的差异及制造成本上的不同,运营商可以根据实际需要从多个方面进行权衡。以14MHz和28MHz两种载波带宽进行比较时,如果两个产品均在QPSK调制方式下,14MHz可支持16Mbps传输净速率,而28MHz可支持32Mbps传输净速率;若均在16QAM方式下,则14MHz可支持36Mbps传输净速率,28MHz可支持52Mbps传输速率。当单个远端站接口需要的业务速率高于40Mbps时,当然采用28MHz/16QAM方式的产品是合适的。但值得注意的是,如果载波带宽采用28MHz,且只能工作在QPSK方式下,那么14MHz/16QAM与28MHz/QPSK两者在业务速率上是相同的。若在14MHz/16QAM和28MHz/QPSK两种方式上权衡,可以考虑的因素大致如下。

  1.与可用性相关的接收机门限。

  在数字调制解调技术中,门限比特差错率BER=10-3

  条件下,归一化信噪比(Eb/No)16QAM要比QPSK差约7dB,那么,在接收机噪声系数和噪声带宽相同情况下,16QAM调制方式比QPSK调制方式的接收机门限电平要恶化约7dB。如果用16QAM@14MHz与QPSK@28MHz两者比较,在相同的接收机噪声系数下,后者的噪声带宽增加了一倍,因此两者的接收机门限仅差约4dB。这也就是说,当考虑采用QPSK以适应雨衰引起的不可用性问题,再将占用带宽提高一倍以提高传输速率的权衡设计中,实际上付出了接收机门限比QPSK@14MHz方式恶化了3dB的代价,与16QAM@14MHz方式相比对抗雨衰性能上的改善并不十分明显。这种情况下,只有在采用QPSK@28MHz方式的同时,发信功率相应比16QAM@14MHz系统再提高3dB才是有意义的。

  2.16QAM@28MHz方式的选择。

  如果选用28MHz载波带宽,采用QPSK/16QAM自适应调制方式开展设计,那么,QPSK@28MHz方式前面已经作过详细说明。而16QAM@28MHz方式,显然又比16QAM@14MHz方式接收机门限恶化了3dB,如果LMDS系统在16QAM/14MHz方式下接收机门限为-77dBm的话,那么16QAM/28MHz方式下接收机门限仅为-74dBm,与QPSK@14MHz相比接收机门限有近10dB的差距,这对在沿海地区LMDS系统应用的抗雨衰特性带来严重威胁。

  16QAM@28MHz在内陆地区雨衰不十分严重的环境下是可以考虑采用的。因为在这种方式下,单载波可支持52Mbps接入速率,对于大客户要求一个端口接入速率大于40MHz的应用是有利的。但在目前运营商的业务需求中,这种单端口要求如此高带宽的情况并不多见。

  3.单载波28MHz带宽与频谱规划的关系。

  在LMDS系统商用试验期间,运营商可获得的频率资源约为2×56MHz。随着业务扩展,频率资源不足时获得2×112MHz资源的条件是有可能达到的。在2×56MHz可用带宽条件下,基站扇区之间及小区之间的频谱规划可以有两种方式。

  载波带宽14MHz的频谱规划:将56MHz带宽分为4个载频F1,F2,F3,F4,将4个载频分为两个载频组,即F1F3或F2F4,相邻扇区采用不同载频组。在一个基站内载频组可以复用。

  载波带宽28MHz的频谱规划:56MHz带宽只能支持两个载频工作,相邻扇区采用不同载频,在一个基站内载频可以复用。

  在频谱规划方面,到底采用14MHz载波好些,还是采用28MHz载波好些,一个直观的评估是,28MHz载波带宽其接收机滤波器的噪声带宽必然比14MHz载波带宽的接收机滤波器的噪声带宽要大一倍,无论在抗同频干扰,还是抗邻频干扰的能力上必然也要差。根据国外一些知名公司的研究报告分析,在LMDS系统的频谱规划中,为了解决同城域不同运营商之间的邻频干扰问题,建议两个运营商在相邻载频上,各自留出14MHz的保护带以支持28MHz载频带宽的业务应用,这就充分说明了应用28MHz载频带宽对频谱规划所带来的影响。

  当然,在保证门限电平恶化1dB的条件下,同频信干比与邻频信干比的指标是与制造商的发射频谱及接收滤波器指标密切相关的,针对每个制造商的LMDS产品实际测试指标去进行频谱规划设计才是可靠的。

 
中国电信
<%set rs=nothing%> <% conn.close set conn=nothing %>

版权所有-四川省电信有限公司 
Copyright(C) SICHUAN TELECOM COMPANY LIMITED. All rights reserved
本网站由
天府热线设计制作