[更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线程.裸机系统2.3.3.1+18M酷M...

mdyblog

Zap 发表于 2024-6-6 08:40
比如按2次回车光标在第二行 点击一个ITEM 就能在光标位置插入预设的代码

示例\Edit位置.wcs

获得光标位置：
GetPos  EditName PosStart   PosEnd

移动动光标 到位置（可选择一段）
SetPos  EditName PosStart   [PosEnd]

替换，插入，删除 参见
示例\RichEdit-替换特殊符号.wcs 的 OnInit函数


_SUB SetAt  //   EditName PosStart   PosEnd   "内容"
    SET &d2=%~3
    FIND $%&d2%=, SET &d2=%~2
    ENVI @%~1.SENDMSG=%EM_SETSEL%,%~2,%d&2%
    ENVI @%~1.SENDMSG=%EM_REPLACESEL%,7,$%~4
_END




GetPos  &EG1   &&PosStart   &&PosEnd


//SetPos  &EG1   %&PosStart%   %&PosEnd%


SetAt  &EG1  %&PosStart% ""   "&NewDat"
SetAt  &EG1  1 ""   "&NewDat"

mdyblog

hhh333 发表于 2024-6-6 15:51
这次是彻底妥了
1、SED A=0或-0,  表示代替所有
2、SED A=X:Y,  表示左起Y+1位替代X次；

那好

mdyblog

Zap 发表于 2024-6-6 18:37
但是新的问题又出现了 如果替换内容中 有:会被吞 不知道怎样转义
例如：mshta VBScript:Execute("Set a= ...

？？？？？？？？？？？？？？？？？？？？？？？

mdyblog

Zap 发表于 2024-6-6 18:45
/也会被吞

？？？？？？？？？？？？、

mdyblog

Zap 发表于 2024-6-6 20:20

太长了。 最小代码，仅仅够 演示 你的问题。

mdyblog

Zap 发表于 2024-6-6 21:33
52行替换为 set d=123:456 : 后边的字符被吞了

如是sed问题
专门 写一个 小脚本 演示问题。

mdyblog

新版 可以 返会 字体名称

FONT   -p:&&f:&&fnm segmdl2.ttf.cmz
MESS. font:[%&f%]  [%&fnm%]

=================
font:[0x700021B]  ["Segoe MDL2 Assets"]

mdyblog

泮安宁 发表于 2024-6-6 22:05
LOAD --mem可以支持偏移吗

//LOAD --mem &MyStript A B C  
SET-mkfixdummy  &MyStript3 =&MyStript@$16;~  //偏移16WCHAR
LOAD --mem &MyStript16 A B C  

mdyblog

Zap 发表于 2024-6-6 21:33
52行替换为 set d=123:456 : 后边的字符被吞了

试试 SED -ts1
这个 禁止 转义符。 就是普通字符串 替换。

ENVI^ EnviMode=1
SET$ &NL=0d 0a
SET V1=123X456
SED  -ts1  &v2=,X,\1,%&V1%
MESS.   v1[%&NL%%&v1%]%&NL%%&NL% v2[%&NL%%&v2%]

=================
  v1[
123X456]

v2[
123\1456

mdyblog

泮安宁 发表于 2024-6-6 23:04
load --mem好像不支持动态改变啊，比如load --mem &a但&a中有一句清空a内容的语句，那么清空语句后面的命 ...

为什么要动态改变， 什么用处？