|
作者：金石 来源：西安晚报 时间：2006-12-27 21:43:22 |
|
陕西话相对普通话去声多。伍永尚研究结果认为，虽然陕西话有把普通话其他声调变为四声的，但也有把普通话四声调变为其他声调的。关中话与普通话声调之间变换规律如下：
普通话变关中话：一声换成三，二声不用变，三声转为四，四声往一返。
关中话变普通话：一声四上换，二声都不变，三声转一声，四声换成三。
伍永尚说，根据他的研究，上述变换规律准确度达百分之八九十。
其二是语音的变换，也有一定规律。如在关中东部一些县和西安东郊、南郊及长安区的大部地方，与d相拼的韵母不管长短，第一个字母为i时，di读音就变为j。关中西部，zh、ch、sh、r做声母的字，后面韵母的韵不论长短，第一个字母是u时，u不发音，或变成i。如“出”发“吃”音，“事”发“死”音。
其三，陕西方言与普通话的词组有许多颠倒使用的现象，有的意思不变，有的产生另外涵义。如“诚实”，颠倒后的陕西话“实诚”，意思相近，但“传言”变为陕西话“言传”，将流传的话的涵义变成了说话的意思。
他还发现了《现代汉语词典》里没有的陕西常用语音，bia、pia、chua、mia、biang、rua。如陕西方言将“扁”读为bià。
秦朝未建成阿房宫
伍永尚从陕西方言的角度提出，秦朝时没有建起过阿房宫。
在研究陕西方言时，伍永尚想起少年时期听老人讲的一个传说：当年秦始皇因渭河北岸的秦宫太小，要建一个大的新皇宫，宰相李斯问秦始皇建在何处，起什么名。秦始皇想等宫殿建成后再起名，所以光用手指渭河南岸的上林苑说了建宫的方位：“阿傍个。”李斯是河南人，没有听清，听成了“阿房宫”。后来由于宫没有建起来，所以一直延用了“阿房宫”这个名。
果真如此吗？伍永尚查阅《史记》，《秦始皇本纪》中有“阿房宫未成；成，欲更择令名名之。作宫阿房，故天下谓之阿房宫”。“二世还至咸阳，曰：‘先帝为咸阳朝廷小，故营阿房宫。为室堂未就，会上崩，罢其作者，复土郦山。郦山事大毕，今释阿房宫弗就，则是章先帝举事过也。’复作阿房宫。”
伍永尚认为，这些都是说“阿房宫”是临时取的名字，因没有建好，所以一直没有取正式名。不仅文字清楚表明秦始皇在世时没有建好，到了秦二世手里，也不可能建起来，因为秦始皇不久，秦朝就被推翻了。《史记·项羽本纪》：“项羽 上一页 [1] [2] [3] [4] 下一页
<%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
If IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
End If
resArray = Split(screenRes, delimiter, 2)
If (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
End If
End Function
Function googleDcmguid()
Dim dcmguid
dcmguid = Request.ServerVariables("HTTP_X_DCMGUID")
If Not IsEmpty(dcmguid) Then
googleDcmguid = "&dcmguid=" & dcmguid
End If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=" &_
"&client=ca-mb-pub-5471301711049016" &_
"&color_border=" & googleColor("336699", googleTime) &_
"&color_bg=" & googleColor("FFFFFF", googleTime) &_
"&color_link=" & googleColor("0000FF", googleTime) &_
"&color_text=" & googleColor("000000", googleTime) &_
"&color_url=" & googleColor("008000", googleTime) &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes() &_
googleDcmguid()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%><%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
if IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
end If
resArray = Split(screenRes, delimiter, 2)
if (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
end If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
if StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=6495040935" &_
"&client=ca-mb-pub-9595218071455095" &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%> |
用户登录 
新用户注册 