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

神的马甲

mdyblog 发表于 2017-7-24 16:27
PECMD2012.1.88.05.77Pre11-170719

看了下， RPOS 本来返回的值，是从左算起的。那么行号也从左算起 ...

有个问题，EDIT加上-rich，就捕捉不到输入变化了。

SET &::EN_CHANGE=0x0300
CALL a

_SUB a,W334H94,
    EDIT -3D -rich b,L23T21W280H22,,,0x100
    ENVI @b.ID=?;b_ID
    ENVI @this.MSG=_COMMAND#%b_ID%#%&EN_CHANGE%::&wp,&lp, MESS 值已改变
_END

mdyblog

神的马甲 发表于 2017-7-24 19:17
有个问题，EDIT加上-rich，就捕捉不到输入变化了。

SET &::EN_CHANGE=0x0300

用 EN_UPDATE

SET &::EN_CHANGE=0x0300
SET &::EN_UPDATE=0x400
SET  ::WM_COMMAND=0x0111

CALL a

_SUB a,W334H94,
    EDIT -3D -rich b,L23T21W280H22,,,0x100
    ENVI @b.ID=?;b_ID
    //ENVI @this.MSG=_COMMAND#%b_ID%#%&EN_CHANGE%::&wp,&lp, MESS 值已改变
    ENVI @this.MSG=_COMMAND#%b_ID%#%EN_UPDATE%::&wp,&lp,  @TEAM CALC I=%I%+1| ENVI @this=%I%值已改变%wp% %lp% %b_ID%
_END

mdyblog

神的马甲 发表于 2017-7-24 19:17
有个问题，EDIT加上-rich，就捕捉不到输入变化了。

SET &::EN_CHANGE=0x0300

要设置下，EN_CHANGE

SET ::EN_CHANGE=0x0300

SET ::WM_USER=0x0400
CALC #&::EM_SETEVENTMASK=%WM_USER% + 69
SET ENM_CHANGE=0x00000001

CALL a

_SUB a,W334H94,
    EDIT -3D -rich b,L23T21W280H22,,,0x100
    ENVI @b.SENDMSG=%EM_SETEVENTMASK%,0,%ENM_CHANGE%  //设置允许EN_CHANGE
    ENVI @b.ID=?;b_ID
    ENVI @this.MSG=_COMMAND#%b_ID%#%EN_CHANGE%::&wp,&lp,TEAM CALC I=%I%+1|ENVI @this=%I%值已改变%wp%
_END

神的马甲

mdyblog 发表于 2017-7-24 20:39
要设置下，EN_CHANGE

SET ::EN_CHANGE=0x0300

可以了，谢谢

mdyblog

527104427 发表于 2017-7-24 16:55
赞一个，不过有个问题：
SET$ nl=0d 0a
SED ~cp;;~lp=?,a,,你%nl%好%nl%1ABCDE

PECMD2012.1.88.05.77Pre12-170724.rar
keyi

527104427

mdyblog 发表于 2017-7-24 22:59
PECMD2012.1.88.05.77Pre12-170724.rar
keyi

完美！多谢老大

mdyblog

527104427 发表于 2017-7-24 23:47
完美！多谢老大

你测试下， 为什么问题， 就来个正式版本。好久了。

527104427

mdyblog 发表于 2017-7-24 23:51
你测试下， 为什么问题， 就来个正式版本。好久了。

试过了，暂时没发现问题

mdyblog

527104427 发表于 2017-7-24 23:53
试过了，暂时没发现问题

为了写WRIT 变量。
自己上的电视 节目 都没看上， 9:20播的。 错过了。 后网络看的。

mdyblog

《踏平相对论》上电视那个，天津卫视已经播放了。7.24晚。
现在可网络看。
百度搜  “非你莫属20170724”

http://v.baidu.com/link?url=dm_00pw_klemzAqUjr-Q0lj09RpIq4H_FGBK0ipGoTpClhlm4rYAZVA9Okgvp0Kc17rs5mGTxANNA_Jk5cNoliuS3sf_tbo_UtdC0tyLWR8F_aQG_mhX5jM16kDHRVzrCNp0zZgu-eNckxQOl81CJZMdwssg2B8uAUOb_sEABOuA.&page=tamashadetail&vfm=bdvtx&frp=v.baidu.com%2Fshow_intro%2F&bl=jp_video



电视重播 7.26的后半夜， 7.27凌晨：



-------------------------------


片花： http://pan.baidu.com/s/1jIECqyy
因为我们以光速做为尺子。 （不是质子数--字幕不对）
那么反过来光的速度永远是这个值。 （不是仍然--字幕不对）

527104427

mdyblog 发表于 2017-7-25 04:16
《踏平相对论》上电视那个，天津卫视已经播放了。7.24晚。
现在可网络看。
百度搜  “非你莫属20170724 ...

哇，老大太牛了，赶紧看看去

527104427

mdyblog 发表于 2017-7-25 04:16
《踏平相对论》上电视那个，天津卫视已经播放了。7.24晚。
现在可网络看。
百度搜  “非你莫属20170724 ...

点个赞，祝老大找到好工作！
不知道你开发的虚拟机在哪可以搜到，我想下来玩玩

snbxeon

为M大点赞，祝老大事事顺利。

神的马甲

mdyblog 发表于 2017-7-24 20:39
要设置下，EN_CHANGE

SET ::EN_CHANGE=0x0300

还有问题：

CALL @a

_SUB a,W431H94,
    EDIT -rich b,L23T21W280H22,,,0x400
    ITEM ITEM1,L328T16W60H30,确定,mess %b%,
_END


随便输入点什么，点确定，MESS不对。0x400也无效。

ddsony

527104427 发表于 2017-7-25 07:29
点个赞，祝老大找到好工作！
不知道你开发的虚拟机在哪可以搜到，我想下来玩玩

他去的目的不是为了找工作，是为了推介他的理论，找工作只是走节目的程式。

神的马甲

mdyblog 发表于 2017-7-24 20:39
要设置下，EN_CHANGE

SET ::EN_CHANGE=0x0300

还有个奇怪的现象，输入一个字母，这个字母形状大小会跟初值的形状大小不一样：
没大写的大，又比小写的大，介于两者之间

CALL @a

_SUB a,W431H94,
    EDIT -rich b,L23T21W280H22,abCc,,0x400
_END

mdyblog

神的马甲 发表于 2017-7-25 08:45
还有问题：

CALL @a

MESS 不对， RICH诱爱设置下。
ENVI^  ForceLocal=1
SET ::WM_USER=0x0400
CALC #&::EM_SETEVENTMASK=%WM_USER% + 69
SET ENM_CHANGE=0x00000001

CALL @a

_SUB a,W431H94,
    EDIT -rich b,L23T21W280H22,,,0x400
    ENVI @b.SENDMSG=%EM_SETEVENTMASK%,0,%ENM_CHANGE%  //设置允许EN_CHANGE
    ITEM ITEM1,L328T16W60H30,确定,mess %b%,
_END

----------------------------------------
我还是内置（设置允许EN_CHANGE）了吧。改下PECMD。

mdyblog

神的马甲 发表于 2017-7-25 09:14
还有个奇怪的现象，输入一个字母，这个字母形状大小会跟初值的形状大小不一样：
没大写的大，又比小写 ...

PECMD2012.1.88.05.77Pre13-170725
   RICHEDIT自动支持ENCHANGE，支持NUM

mdyblog

527104427 发表于 2017-7-25 07:29
点个赞，祝老大找到好工作！
不知道你开发的虚拟机在哪可以搜到，我想下来玩玩

叫 dxx。DSystem 这个名字 就是来自这里。
博客日志（http://mdyblog.blog.163.com/blog/#m=0）最后一页有。
不过连接下载不了， 网盘都倒闭了。

其实是 RE， 就是执行环境。
JAVA 就是一种 执行环境。
android的 虚拟机 就是一种 执行环境。

让一种文件， 不修改， 在 不同的平台上运行。

节目被剪辑了， 本来有人问了，我也回答了。

神的马甲

mdyblog 发表于 2017-7-25 10:57
PECMD2012.1.88.05.77Pre13-170725
   RICHEDIT自动支持ENCHANGE，支持NUM

好了，不过，试了一下，0x200也无效

用了-rich之后超级捕捉也不行了。

0x40/0x800 也不行，会丢掉一些行

感觉-rich画的框框比-3d好看多了


set$ &nl=0d 0a
CALL @a

_SUB a,W431H198,
    EDIT  b,L23T21W280H103,abCc%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%sss%&nl%,,0x40
_END

mdyblog

神的马甲 发表于 2017-7-25 13:11
好了，不过，试了一下，0x200也无效

用了-rich之后超级捕捉也不行了。

PECMD2012.1.88.05.77Pre14-170725
  RICHEDIT支持超级捕捉


2）
0x40 0x800需要滚动条， 该设置是滚动滚动条。

1. ENVI^  ForceLocal=1
   
2. SET  ::WM_KEYDOWN                      =0x0100
   
3. SET  ::WM_KEYUP                        =0x0101
   
4. SET  ::WM_CHAR                         =0x0102
   
5. SET$ nl=0d 0a
   
6. SET sss=SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
   
7. 
   
8. 
   
9. CALL @a
   
10. 
    
11. _SUB a,W431H337,
    
12.     EDIT -rich b,L23T9W280H122,RICH abCc%nl%xxx,,0x844 //0x400
    
13.     EDIT+ -3D  c,L24T141W280H122,EDIT abCc%nl%xxx,,0x844 //0x400
    
14.     LABE LABE1,L17T272W383H30,,,
    
15.     ITEM ITEM1,L328T16W60H30,确定,mess %b%,
    
16.     ENVI  @b.MSG=+%WM_KEYDOWN%::wp,lp, ENVI @this=KEYDOWN %wp% %lp% [+b]
    
17.     ENVI  @this.MSG=+%WM_KEYDOWN%::wp,lp, ENVI @LABE1=KEYDOWN %wp% %lp% [+this]
    
18.     ENVI  @c.MSG=+%WM_KEYDOWN%::wp,lp, ENVI @this=KEYDOWN %wp% %lp% [+c]
    
19.     ENVI  @this.MSG=+%WM_KEYDOWN%::wp,lp, ENVI @LABE1=KEYDOWN %wp% %lp% [+this]
    
20. _END

复制代码

神的马甲

mdyblog 发表于 2017-7-25 16:47
PECMD2012.1.88.05.77Pre14-170725
  RICHEDIT支持超级捕捉

超级捕捉好了，但是拖入多个文件的还是不行：

CALL @a

_SUB a,W845H163,
    EDIT -rich b,L17T24W695H27,,,0x200
    EDIT+ -3D c,L16T75W697H25,,,0x200
    ITEM ,L744T22W60H30,-rich值,mess. %b%,   //不正常，只能显示一个
    ITEM ,L746T73W60H30,-3D值,mess. %c%,   //正常
_END

神的马甲

mdyblog 发表于 2017-7-25 16:47
PECMD2012.1.88.05.77Pre14-170725
  RICHEDIT支持超级捕捉

超级捕捉好了，但是拖入多个文件的还是不行：

CALL @a

_SUB a,W845H163,
    EDIT -rich b,L17T24W695H27,,,0x200
    EDIT+ -3D c,L16T75W697H25,,,0x200
    ITEM ,L744T22W60H30,-rich值,mess. %b%,   //不正常，只能显示一个
    ITEM ,L746T73W60H30,-3D值,mess. %c%,   //正常
_END

mdyblog

神的马甲 发表于 2017-7-25 17:35
超级捕捉好了，但是拖入多个文件的还是不行：

CALL @a

代码的改下 才能看到0x200的效果。

1. CALL @a
   
2. 
   
3. _SUB a,W845H223,
   
4.     EDIT| -rich b,L17T24W695H72,,,0x204
   
5.     EDIT+ -3D c,L19T111W697H73,,,0x204
   
6.     ITEM  ,L744T22W60H30,-rich值,mess. %b%,   //不正常，只能显示一个,----可以的
   
7.     ITEM  ,L746T73W60H30,-3D值,mess. %c%,   //正常,
   
8. _END

复制代码

效果：

神的马甲

mdyblog 发表于 2017-7-25 17:44
代码的改下 才能看到0x200的效果。

应该可以出正式版了吧？坐等

mdyblog

神的马甲 发表于 2017-7-25 19:15
应该可以出正式版了吧？坐等

嗯。

神的马甲

mdyblog 发表于 2017-7-25 19:28
嗯。

PECMDEdit 有两个不太友好的设置：
1.打开默认是铺满整个屏幕的，有点吓人，能不能把窗口整小一点？
2.默认是自换行的，这个能否取消？

mdyblog

神的马甲 发表于 2017-7-25 19:46
PECMDEdit 有两个不太友好的设置：
1.打开默认是铺满整个屏幕的，有点吓人，能不能把窗口整小一点？
2. ...

屏幕多大合适？

神的马甲

mdyblog 发表于 2017-7-25 19:51
屏幕多大合适？

我都是打开PECMDedit之后再
SEND #0x12_,#0x20_,#0x52_,#0x52^,#0x20^,#0x12^   //取消窗口最大化(ALT+SPACE+R)
这样的大小刚好合适。

这个大小应该计算不出来吧？

mdyblog

神的马甲 发表于 2017-7-25 20:32
我都是打开PECMDedit之后再
SEND #0x12_,#0x20_,#0x52_,#0x52^,#0x20^,#0x12^   //取消窗口最大化(ALT ...

在我的电脑上会是这样的。