我目前使用gbt7714-2005.bst，但是参考文献中的作者姓名全为大写，
格式如“PENG H”。
我修改.bst文件中的format.names函数，将其中的"u" change.case$改为了"t" change.case$，但是格式变为了只有姓氏的首字母大写了，
格式如“Peng h”。
我希望姓名格式如“Peng H”，应该怎么改。
目前的format.names函数如下：
FUNCTION {format.names}
{ 's :=
#1 'nameptr :=
s num.names$ 'numnames :=
numnames 'namesleft :=
{ namesleft #0 > }
{ s nameptr "{vv~}{ll}{, jj}{, ff}" format.name$ 't :=
nameptr max.num.authors >
{ bbl.et.al
#1 'namesleft :=
}
{ t "others" =
{ bbl.et.al }
{ t get.str.lang 'name.lang :=
name.lang lang.en =
{ t #1 "{vv~}{ll}{~f{~}}" format.name$
uppercase.name
{ "t" change.case$ }
'skip$
if$
t #1 "{, jj}" format.name$ *
}
{ t #1 "{ll}{ff}" format.name$ }
if$
}
if$
}
if$
nameptr #1 >
{ ", " swap$ * * }
'skip$
if$
nameptr #1 + 'nameptr :=
namesleft #1 - 'namesleft :=
}
while$
}