几段程序分享

xieeyawen · 发表于 5 天前

本帖最后由 xieeyawen 于 2025-5-8 09:45 编辑

ln=" origin-xy: (20.1870 60.6400) \n"
a=rexMatchList("^[0-9]" parseString(ln, "(: \n)")) ;==>("20.1870" "60.6400")
a=buildString(a " ") ;==>"20.1870 60.6400"

b=strcat(car(cdr(parseString(ln, ": \n"))) " " cadr(cdr(parseString(ln, ": \n")))) ;==>"(20.1870 60.6400)"
b=parseString(b "( )") ;==>("20.1870" "60.6400")
b=buildString(b " ") ;==>"20.1870 60.6400"

LiuTao · 发表于昨天 08:44

感谢分享

帐号		自动登录	找回密码
密码			立即注册

[讨论] 几段程序分享