IFi_mseg
-charg<>
''
.
"字符串长度
CLEARlv_len
.
lv_len
=
strlen
(i_mseg
-charg
)
.
IFlv_len<
8
.
MESSAGEe005
(zmigo
)
.
ENDIF
.
“字符串是否包含空格
IFlv_len>
0
.
IFi_mseg+0
(lv_len
)
CAspace
.
MESSAGEe006
(zmigo
)
.
ENDIF
.
ENDIF
.
”字符串前两位是否为字幕
CLEARlv_batch
.
lv_batch
=i_mseg
-charg+0
(
2
)
.
REPLACE
ALL
OCCURRENCES
OFREGEX
'[A-Z]'
INlv_batch
WITH
'*'
.
REPLACE
ALL
OCCURRENCES
OFREGEX
'[a-z]'
INlv_batch
WITH
'*'
.
IFlv_batch<>
'**'
.
MESSAGEe004
(zmigo
)
.
ENDIF
.
ENDIF
. 原文链接:https://www.f2er.com/regex/358461.html