|
|
发表于 2019-6-10 22:47:02
|
显示全部楼层
来自： 中国广东东莞
本帖最后由 YY904321475 于 2019-6-10 22:48 编辑 # m& n; V& e7 S( {
( `$ r5 A0 ` U& i% ?; r# n; kdjc : 01 V+ }4 U/ ^* s) f* e
dcd : 0
. N" y9 {1 q6 |2 P; v1 j' rn1 : 0
9 ^4 r8 F+ t$ }$ o9 {; H1 ~! R* tn2 : 0
2 m. N: q- ]. `1 O9 L7 s: ]- {* Mswb1 : ""
1 Z; M! f) c; {2 Yswb2 : ""
; c1 J' i" o% F, Gsch : ""
E4 c/ y& z/ h( i1 B) e9 Rs2 : "[0-9 A-Za-z\-+*/~！@#￥%……&*]"
1 y& U; n3 x* ks0 : ""3 L1 g/ y: L: D2 }& b( b" { S
pchina
+ d: ?" `6 `. P @ n1 = 0
% I6 e/ K* X! h djc = 0
" w/ u B' X5 ^3 D! G% J6 y. f n2 = 0. p2 r8 R/ @* y+ w' Z) L; h' {1 _
s0 = ""
6 C- C6 R+ r$ L2 m A6 G dcd = strlen(sch)
D8 X2 b; c8 f3 n8 K6 G$ S. _ while djc <> dcd ,
7 @% y+ T7 t1 Q. T6 F) m, U% r [) F2 K8 R" t1 N; K- H: r& {
swb1 = brksps(dcd-djc,sch)
7 ?5 n% r1 ^5 O" T* n- o4 g# ^ swb2 = regex(s2,swb1,0)
! U* R( e( d6 w6 M if swb1 = swb2,n1 = n1 +1! g2 W1 @1 Z8 q N* ]! k9 x& m
djc = djc + 1
% x F9 M4 o* s: [) G: e1 ?* R ]! O2 P% R+ f3 T. z
n1 = dcd - n1 - 1
* |/ i" C2 ^) k" x$ K# K if n1 > 0,
* f8 z8 l/ `' G- C1 `( w [* `+ `* q2 H0 K2 z
while n2 < n1,' n- R$ _: k% ?
[
2 g& r7 S5 Z- H6 C! ` s0 = s0 + " "
: `& d0 E5 v5 o8 ]! R n2 = n2 + 1
4 ^: `# \% f" g4 |' W x3 d2 y; z ]
5 d( f; z, y6 g* E dcd = strlen(s0)
5 r' {; E2 E1 n" w; d+ |: f( p, D6 @ s0,e$
* O |- Y6 H. K& e2 S4 U ]
; e1 q/ } H' { *e$
$ d6 w9 _) D7 \% P" N$ b# H( B7 o) B+ C3 H% ?; D
; S! X, J: X$ j3 A0 Y1 ^
7 v8 l3 e* {" P/ G, l
pstrtool #Comment for tool ( q. q) L7 M, \- \4 }. e
if strtool$ <> sblank,% q% P! Y% j2 u5 ^- @& ~7 s2 }2 m
[3 P6 b5 Z% o% a% R
strtool$ = ucase(strtool$): B# j( @* U b* \: V
sch = strtool$
" {' t4 L( i$ A& [ *strtool$
# [7 V6 l" |" F" T+ a ]搞这个代码的方法己经正常用好几天了 |
|
:lol:不管你是从哪弄来的后处理，在这几个位置加上这个就行，特简单，注意换刀指令有两处哦
楼主
，因为我是直接用你的后处理出的程序