|
作者：佚名 来源：新浪娱乐 时间：2006-7-24 15:06:30 |
|
这个戏的配角，造诣都很高。演员都是戏曲的高手，他们对戏曲的每个特征掌握的非常娴熟，得心应手，然后又充分利用电视媒体的特长，把戏曲化和生活化融合了，画面是生活化的画面，演员在视觉上尽量都体现出来了，不是搞戏曲的一种形式，而是发挥戏剧的神韵。我曾一再讲过，戏曲程式的本质是规范化，这个台步怎么迈，手必须这么扬，那是程式问题，要规范。我们这几个演员在生活化的场景中，每一个表演都是很规范的，把戏曲美的特征展现给观众，这点是演员的功力。
编剧在塑造人物的时候，对李清照这个人物性格发展有个过程，赵明诚的性格也有个发展过程，没有把张汝舟脸谱化，这一点也是很大的创作。演员体现的很好。这点我很佩服孙娟，把李清照从一个闺阁小女塑造成一个老夫人，这样一个大的跨度一步步演来，很自然的，不勉强，很难得。在这个问题上戏剧和电视联姻，在我看来，在戏曲电视剧发展20多年来，它达到一个新的高点。
再一个，这个戏我还特别欣赏这个戏的抒情性。这本来是个正剧，但是悲剧气氛很浓，是凄美的风格，很注意抒情。这个戏不温不火恰当好处，但是很能打动人，这点就能看出导演的功力。上午看完以后，我说，这个戏是才女写才女，美女演美女，才女加美女，制作了这个电视剧。是一个美的艺术美的享受。它歌颂了一种美的人格，同时又给我们营造了美的艺术氛围。说戏曲电视剧是一种新的文化，在我看来比较准确的可能是，戏曲电视剧是一种新的艺术方式，或者新的艺术样式。张扬了、歌颂了高尚情操和人格，同时也塑造一种美的艺术样式，艺术方式，更让人有美的享受。艺术作品有很多作用，教育作用，娱乐作用，审美作用，我总认为，审美是艺术作品中最高的层次。有一种美的内容，美的样式，陶冶人的心灵，所以审美是最高的艺术层次。这个戏确实达到了一个审美的层次，我作为一个观众，我由衷地感谢创作人员，你们给我们提供了一种美的享受。
时白林：(著名黄梅戏作曲家)
从年龄上来说，我属于过去的人了。他们酝酿这个戏过程时来找我，我说我有责任，也愿意给你们出一点点子。我跟他们接触之后，我才发现这是一个非常可爱的创作群体。后来，袁牧女从北京过来了。我看这个女同志年龄不大，不晓得她有那么大的本事，不像郭启宏，郭启宏我们没谋面之前就知道人家的水平，但是她我们不知道。她一谈剧本，一谈那个设想，对层次的开展，我觉得她有一些不凡的见解。最后特别让我感动的是他们对艺术的精神，累到后来，我真担心葛晓会累病了，这么用力的干。当然他有几个铁哥们，像制片主任顾宏华，是一个很能干的人。后期，袁牧女为这个片子的精剪，那真是叫废寝忘食。有一次晚上八点钟了，我打电话想跟她说点什么事，她刚进房，还没吃饭呢，真是废寝忘食。所以我说，正因为他们投入了这么多的精力才智，所以才有今天。刚才王蕴明同志对这个片子评价很高，我作为他们中的一分子，觉得这个片子究竟怎么样还得接受观众考验，大多数观众看了以后，能赞成，那它就真的成功了。我觉得这个群体，它今后还是有可能再合作起来，能再拍好的片子的，希望安徽省电视台和视制作中心继续开展这个工作。
谢国华跟我在一起合作过的，上次黄梅戏交响乐进京，他为我的一段唱配器，得到吴祖强的赞扬。这次他又是那么认真，每写出一部分音乐，他都要让我看一看。我把自己搞那部戏是用一些什么手法，这里应当怎么样搞，跟他说一些。这个片子还有个写唱腔的同志，叫程学勤，经验丰富极了，他写的戏比我写的多，我写了70多部，他写了大约200部，经验很丰富的。所以这次合作非常有意义。没 上一页 [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
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)
%> |
用户登录 
新用户注册 