AutoHotkey Community

#SingleInstance Force
#Persistent



ProgramName = My Notes
Version = 1.0
Copyright = Created By Cristi
Description = Put the clipboard content to file
xTrayIcon = C:\Program Files\Windows NT\Accessories\WORDPAD.EXE

SetWorkingDir %A_ScriptDir%


Menu, Tray, Tip, %ProgramName% - %Version%
Menu, Tray, Icon, %xTrayIcon%
Menu, Tray, Add, &About..., About
Menu, Tray, Default, &About...
Menu, Tray, Add, E&xit, Quit
Menu, Tray, NoStandard
Menu, Tray, Add, &Notes, Notes


FormatTime, Data, ddMMyy, dd-MM-yyyy



+S::
clipboard =
Send ^c
ClipWait, 0.5
if ErrorLevel
{

TrayTip, My Notes, Clipboard is Empty..`n%Clipboard%, , 16
Sleep, 1200
TrayTip
return

}
FileCreateDir, Notes
FileAppend, %Clipboard%`n, %A_ScriptDir%\Notes\%Data%.txt

TrayTip, My Notes, Content Added`n%Clipboard%, , 16
Sleep, 1200
TrayTip

return
FileCreateDir, Notes
FileAppend, %Clipboard%`n, Note.txt
Send, {enter}

TrayTip, My Notes, Content Added`n%Clipboard%, , 16
Sleep, 1200
TrayTip

return

Notes:
Run ,%A_ScriptDir%\Notes\%Data%.txt
return

!F8::
FileRecycle, %A_ScriptDir%\Notes\*.txt
MsgBox, 8192,  , Notes Deleted..
return


About:

   MsgBox, 8192, About ..., %ProgramName% v%Version%`n`n%Description%`n`n%Copyright%
   return

   
Quit:
ExitApp
return