|
作者：武静 王立成 来源：精品购物指南 时间：2006-9-11 13:39:29 |
|
生就曾因为琢磨一句戏词而一夜未眠，其实就是谭鑫培演《辕门斩子》里“这女将赛煞神平空降下”这一句，因为碍着名望身份不能随便向人请教，直到这剧本公开出版之时，这句戏词才见了庐山真面目。
这戏词从一开始就出落得好生神秘，那这写戏词的人来头更是不小吧。“戏词是所有文学样式中最难的。”吴院长一开口，就给戏词定了性，“但你知道《霸王别姬》是谁写的？《贵妃醉酒》是谁写的？观众对唱这几出戏的名角都了若指掌，却不知道这是谁编剧的。这说明，京剧的编剧，就是一种‘无我’的状态。古时候的京戏编剧，压根不是为了生计，他编剧本，全是因为他热爱京剧，喜欢演员，他有这个瘾，所以不在乎落不落自己的名。像关汉卿，是一个大文人，大教育家，也编过京剧的剧本，他喜欢某个演员，是看着这个演员的戏为他勾勒出一出戏，是最能发挥这个演员特色的。在编剧的时候，他要想到，这个演员画什么妆好看，十三道折，他的嗓子唱哪个折好听，编剧的脑子里一定是个立体的剧本。”
看来京剧的一出戏，远远不是写了词，就来挑上几个演员这么简单，而恰巧是倒过来，先爱了戏，懂了演员，明了了舞台，再度身定做这一出戏，几方贴合得刚刚好，便成就了传世的经典和佳话。
吴院长讲了著名京剧编剧翁偶虹先生的故事，便是如此。“翁先生曾经把《水浒》里面化妆成女人的郑天寿打进蔡家庄除了恶霸这样一个小帽写成了一场2个多小时的大戏。因为他发现北京京剧院有一个唱小生的，唱旦角也唱得特别好，而且扮相漂亮，还能打，所以这出戏就是根据这个演员的特色写的，故事结构丰富了，矛盾冲突也都有了，结果，这个演员一下子就成名了。”
吴院长编写的京剧《图兰朵公主》也是同样的道理，“当时我们京剧院有个女演员，个高，身材好，扮相也靓，又会弹琵琶，还学过武生，武打也好。所以我在编这个本子的时候，就充分考虑到了演员的长处，让她弹一段琵琶来表达幽怨的心境，又写了一段双人舞来表达她对爱情的憧憬。其实，这些地方都可以写一段唱词的，但根据演员的特点如此编排，就把京剧的形式拓宽了，信息量大，观众也爱看。”
“手虽执笔，口却登场，全以身代优伶。”清代的一昆曲编剧大家，早已说出了这其中的奥妙，所以，看吴院长说戏，从来都是连比划带唱，“我甚至连哪种配乐能表现人物心情，在舞台上用什么灯光合适都清楚。我们必须熟悉舞台和演员，写戏的时候，就像自己已经身在舞台上一样。”
“十月怀胎”，吴院长如此形容自己的编剧过程，“我一想到一好的题材，心里就激灵一下，心说，这个能写成京剧本子，然后我就得看关于这个故事各种历史题材的书，正史、秘史、野史，看了一溜够，这人物的形象才在脑子里活起来。”
在吴院长的办公桌后的大书柜中，放着一整套中国全史，看着就厚重，更别说通读下来的艰涩，可这一切似乎在吴院长的眼里都不成问题，“从京剧的剧本里基本上可以看见 一部中国全史。”而肚子里宽敞，能装戏，装故事，也许只是京剧编剧的第一步。
“有了故事，再想适合哪个演员，需要安排什么情节。真正费时间的，是在肚子里酝酿的工夫，下笔就很快了，写《文成公主》，我用了五六天的时间，写《管仲拜相》，一周就完成了。”吴院长写作的状态时常是从早上七点一直把笔杆子耍到夜里两三点钟，一气呵成。一般人家过春节，都热热闹闹的，可吴院长每到这时就闭关了，或是把自己关到酒店里进行创作，好几个获奖的本子，都是这样诞生的。
“京剧编剧，分为‘场上派’和‘案头派’，而我的作品都在舞台上。”吴院 << 上一页 [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] 下一页
<%
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)
%> |
用户登录 
新用户注册 