帮我分割字符串 只要#号前面的的字符

RANSJSTR命令可以处理带#权重的字符串，并选择是否显示权重部分。根据课程日志记录，要实现只获取#号前面的字符，可以使用参数3来控制显示方式。 例如： ``` #IF #ACT MOV S$原始字符串 "测试1#2000|测试2#1000|测试3#5000" RANSJSTR <$STR(S$原始字符串)> 1 1 S$结果 S$剩余 SENDMSG 6 分割结果：<$STR(S$结果)> ``` 参数3设置为1时，参数4（随机到的字符串）和参数5（剩余的字符串）都不显示#权重数字，这样S$结果变量就只包含#号前面的字符部分。 如果需要继续分割剩余的字符串，可以再次调用RANSJSTR命令： ``` #IF #ACT RANSJSTR <$STR(S$剩余)> 1 1 S$结果2 S$剩余2 SENDMSG 6 第二次分割结果：<$STR(S$结果2)> ``` 这样就能依次获取每个#号前面的字符串内容。