一个数据窗口的脚本帮帮忙注解下

[WZNANGONLINE]

请问能那位高手帮我注解下下面的脚本语言吗？
if this.Object.DataWindow.Print.Preview="yes" or this.rowcount()=0 then return
string ls_AddPict, ls_CurObj, ls_Picture, ls_CurCol
integer li_LinePos,li_colpos,li_PictPos


ls_CurObj = String(dwo.Name)
if left(ls_CurObj,2)="l_" or right(ls_CurObj,2)="_t" then
ls_CurCol = Left(ls_CurObj,Len(ls_CurObj) - 2)
If is_OrderCol <> ls_CurCol and left(ls_CurObj,2)<>"l_" Then
li_LinePos = Integer(This.Describe(ls_CurObj + ".X"))+ (Integer(This.Describe(ls_CurObj + ".Width")) - 40)
li_colpos=Integer(This.Describe(ls_CurObj + ".Y")) + 16
This.Modify(is_ordercol+"_t.alignment=2")
is_OrderCol = Left(ls_CurObj,Len(ls_CurObj) - 2)
This.Modify(ls_CurCol+"_t.alignment=0")
of_asc(li_linePos,li_colpos)
is_SortType = "A"
This.SetSort(is_OrderCol + " " + is_SortType)
This.Sort()
Else
li_LinePos = Integer(This.Describe(is_OrderCol + "_t.X"))+ (Integer(This.Describe(is_OrderCol + "_t.Width")) - 40)
li_colpos=Integer(This.Describe(is_OrderCol + "_t.Y")) + 16
If is_SortType = "A" Then
li_LinePos += 20
of_des(li_LinePos,li_colpos)
is_SortType = "D"
Else
of_asc(li_LinePos,li_colpos)
is_SortType = "A"
End If
This.SetSort(is_OrderCol + " " + is_SortType)
This.Sort()
End If

elseif This.Describe(dwo.name+ ".Band") = "detail" then
this.SelectRow(0,FALSE)
this.SelectRow(row,TRUE)
End If

[gongbei]

我不能 你可以看看帮助！

[Thinkinger]

你等着

[zijiezhuang]

你至少应该把你懂的注释上，或者把你认为的大概意思注上，
再让别人给你提示。你这样想让人给你做工作一般是没有
人会愿意帮你的

[hosts]

应该是排序用的

[jjoulejcc]

这么乱，没人帮你看的