|
5、 评剧,清末在河北滦县一带的小曲“对口莲花落”基础上形成,先是在河北农村流行,后进入唐山,称“唐山落子”。20世纪20年代左右流行于东北地区,出现了一批女演员。20世纪30年代以后,评剧在表演上在京剧、河北梆子等剧种影响下日趋成熟,出现了白玉霜、喜彩莲、爱莲君等流派。1950年以后,以《刘巧儿》、《花为媒》、《杨三姐告状》、《秦香莲》等剧目在全国产生很大影响,出现新凤霞、小白玉霜、魏荣元等著名演员。现在评剧仍在河北、北京一带流行。
6、 河北梆子,即流行于河北、北京一带的梆子戏,它源于山、陕交界处的山陕梆子,经由山西传至河北,结合河北与北京方言而形成。它保持了梆子腔以梆击节的特点,唱腔高亢激越,善于表演悲剧情节。河北梆子著名剧目有《蝴蝶杯》、《辕门斩子》、《杜十娘》等 .
7、 晋剧,又名“中路梆子”,系由山西、陕西交界的山陕梆子发展至山西,结合山西语言特点而形成。现流行于山西中部及内蒙、河北一带。它保持了梆子腔以梆击节的特点,音乐风格在高亢之余,也有柔婉细腻的一面。表演通俗质朴。著名剧目有《打金枝》、《小宴》、《卖画劈门》等 .
8、 蒲剧,又名“蒲州梆子”,系由山西、陕西交界的山陕梆子发展而成,一说此即为原来的山陕梆子。现流行于山西西南部及陕西、河南一带,在声腔上近似于秦腔,语言也用陕西方言。著名剧目有《挂画》、《杀狗》、《杀驿》等。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>
<%
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)
%> |