!n:: ;以当前日期创建一个记事本并打开,存在bug,同一个记事本多次个文件打开 Clipboard= SetTitleMatchMode,2 Send,^c ClipWait, 0.3 if ErrorLevel=1 { InputBox,文件名,请输入txt的文件名 if ErrorLevel=1 { IfWinExist 无标题 - Notepad2-mod WinActivate else Run notepad,C:UsersguoDesktop ;保存的时候默认在桌面了,方便一点 } else if (文件名="") { a=%A_Desktop%%A_YYYY%-%A_MM%-%A_DD% IfWinExist %a%.txt WinActivate,%a%.txt else{ FileAppend ,,%a%.txt Run %a%.txt } return } else { FileAppend ,,%A_Desktop%%文件名%.txt Run %A_Desktop%%文件名%.txt } return } else { ;~ Run notepadC:UsersguoDesktop ;~ sleep,100 ;~ PostMessage,0x111,0x019d72,0,,ahk_class Notepad2U ;发送黏贴消息 IfWinNotExist 无标题 - Notepad2-mod { Run Notepad, C:UsersguoDesktop ;~ WinMove, 无标题 - Notepad2-mod,, (A_ScreenWidth/2)-(Width/2), (A_ScreenHeight/2)-(Height/2) ;~ WinMove, WinTitle, WinText, X, Y, Width, Height, ExcludeTitle, ExcludeText WinActivate,无标题 - Notepad2-mod ahk_class Notepad2U Sleep,200 winmove,无标题 - Notepad2-mod,,933,282,433,456 ;~ ControlSend, , ^v{enter}{enter}, 无标题 - Notepad2-mod ahk_class Notepad2U PostMessage,0x111,0x019d72,0,,ahk_class Notepad2U ;发送黏贴消息 return } else ControlSend, , ^{end},无标题 - Notepad2-mod ;ahk_class Notepad2U ;跑到文本最底部复制 ControlSend, , {Enter 2},无标题 - Notepad2-mod ;跑到文本最底部复制 PostMessage,0x111,0x019d72,0,,无标题 - Notepad2-mod ;发送黏贴消息复制 ;~ PostMessage,0x111,0x019d72,0,,ahk_class Notepad2U ;发送黏贴消息 WinActivate,无标题 - Notepad2-mod ahk_class Notepad2U ;无标题 - Notepad2-mod只有当标题是这样时才能激活窗口 ControlSend, , ^{end},无标题 - Notepad2-mod ;ahk_class Notepad2U ;跑到文本最底部复制 return } return