|
作者:唐雪薇 来源:北京娱乐信报 时间:2006-5-21 17:44:56 |
|
“巴蜀鬼才”魏明伦的川剧剧本《变脸》,已经被收入人民教育出版社最新版的初中语文教材。刚刚知道这个消息的魏明伦欣喜地说:“6000字的原文几乎全部收录,这应该是川剧剧本首次进入中学教材。”
魏明伦也是刚刚才收到这个消息,他告诉记者:“在义务教育课程标准实验教科书《语文》九年级下册的第四单元中,川剧剧本《变脸》选段被收录其中。这个单元还有莎士比亚的《威尼斯商人》、孙鸿的《枣儿》和勒曼的《音乐之声》。这应该是川剧剧本首次入选中学教材,也意味着每年都有几百万学生知道《变脸》,川剧《变脸》演出也可以借此推广到中学,让学生看看他们书上学的东西是如何演出来的。”
魏明伦认为,川剧剧本入选中学课文,对川剧的发展是一件喜事,是用教科书的审美标准来推动川剧发展,应该成为振兴川剧的一个坐标。他透露,目前《语文》教科书有人民教育出版社和北京师范大学出版社两个版本,保守估计全国有三分之一的中学生用人教社版本,那么一年接触《变脸》的学生应该不少于800万人。
记者了解到,这个戏剧单元中的文章均为剧本节选,《变脸》是该单元的第二篇课文,占据13个页码。语文书对《变脸》的出处进行了详细注释,告诉学生,该节选出自《魏明伦剧作精品集》,而且精练概括了《变脸》的故事梗概。教科书对课文中出现的类似“糍粑”这样的四川俗语,都做了详细注释。针对课文中的部分场景还配了插图。
<%
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)
%> |