start.ahk

#SingleInstance Force
#NoEnv
#Include language.ahk
#Include phrase.ahk
;#Include addPhrase.ahk

;cmd_no:={重启:65303,编辑:65304,挂起:65305,暂停:65306,退出:65307}


I_Icon = S_48px.ico
IfExist, %I_Icon%
{
	Menu, Tray, Icon, %I_Icon%
}

FileCopy,.\startSmartString.ahk,C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp


Gui Add, TreeView, vMyTreeView gMyTreeView x0 y0 w240 h590 %MyTreeView%
Gui Add, Edit, x240 y0 w580 h590 vMyEdit
Gui Add, Button, gaddPhraseHandle x620 y592 w80 h25 vconfirm, %updateL%
Gui Add, Button, x710 y592 w80 h25 gcancel vcancel, %cancelL%

; 添加快捷键帮助
Menu help, Add, %documentL%, HelpMenuHandler
Menu help, Add, %sysShortcutL%, SysShortcutLMenuHandler
Menu MenuBar, Add, &%helpL%, :help
Gui Menu, MenuBar

Menu, MyContextMenu, Add, add, addPhraseGUI
Menu, MyContextMenu, Add, delete, deletePhraseHandle

Menu, MyDeleteContextMenu, Add, delete, deletePhraseHandle
Menu, Tray, NoStandard
Menu, Tray, Click, 1                            ;单击执行默认菜单项open，由OnClick实现。
Menu, Tray, Add, Open, OnClick
; 添加右键添加
Menu, Tray, Add, Add, OnClickAdd
Menu, Tray, Add, Reload, OnClickReload
Menu, Tray, Add, Exit,OnExit
Menu, Tray, Default, Open
programName:="自定义快捷短语，快分享给你的好胸弟！"
Menu,Tray,Tip,%programName% ;在托盘图标上悬停鼠标，显示

global fatherTVMap := {}
;sonTVMap := {}
;phrase := {}
;import("phrase.ahk",fatherTVMap,sonTVMap,phrase)

for key, element in fatherMap{
    if(!fatherTVMap.HasKey(element)){
        p1 := TV_Add(element)
        fatherTVMap[element] := p1
    }
    TV_Add(key,fatherTVMap[element])
}


TV_Modify(0, "Sort")
Run addPhrase.ahk
Gui, Show, w820 h620, %myPhraseL%

firstRun()
showSaveTime()
return

OnClickReload:
    reload
return

HelpMenuHandler:
	runDocument()
Return

SysShortcutLMenuHandler:
	runSysShortcut()
Return

OnExit:
    scriptname:="addPhrase.ahk"
    ;~ sendcmd("编辑",scriptname)
    ;~ sendcmd("暂停",scriptname)
    sendcmd("退出",scriptname)
    ExitApp
return

OnClick:
if !LastClick 
{
        LastClick := 1
        LastTC := A_TickCount
        SetTimer,SingleClickEvent,-300
}else if (A_TickCount-LastTC<300)
{
        SetTimer,SingleClickEvent,off
        Gui, Show, w820 h620, %myPhraseL%
        LastClick := 0
}
return

OnClickAdd:
    sendcmd("重启","addPhrase1.ahk")
return

SingleClickEvent:
Gui, Show, w820 h620, %myPhraseL%
LastClick := 0
return


MainEscape:
MainClose:
    Gui hide

GuiContextMenu:
    if (A_GuiControl != "MyTreeView")
        return

    id := TV_GetSelection()
    if(contains(fatherTvMap,id) || contains(sonTvMap,id)){
        Menu, MyContextMenu, Show, %A_GuiX%, %A_GuiY%
        return
    }else{
        Menu, MyDeleteContextMenu, Show, %A_GuiX%, %A_GuiY%
        return
    }        
return


addPhraseGUI(){
    sendcmd("重启","addPhrase1.ahk")
}

deletePhraseHandle:
    id := TV_GetSelection()
    TV_GetText(abbre, id)
	if(contains(fatherTvMap,id)){
        sonId := TV_GetChild(id)
        if(sonId == 0){
            MsgBox,260,, 确定删除？
            IfMsgBox No
                return
            fatherTvMap.Delete(%key%)
            TV_Delete(id)
        }else{
            MsgBox 集合非空，不允许删除
        }
        return
    }
	
;	if(fatherMap[abbre]=="default"){
;		MsgBox "不能删除默认短语"
;		return
;	}
	MsgBox,260,, 确定删除？
    IfMsgBox No
        return
	
    delete(abbre)
    reload
return

MyTreeView:
    id := TV_GetSelection()
    ; 如果没有点击到短语上面，则disable更新和取消按钮
    if(contains(fatherTvMap,id) || contains(sonTvMap,id)){
        GuiControl,, MyEdit,
        GuiControl, Disable, MyEdit
        GuiControl, Disable, confirm
        GuiControl, Disable, cancel
        return
    }
    ; 如果点击到短语上面，则显示 更新和取消按钮
    TV_GetText(phkey, id)
    phValue := phrase[phkey]
    ; 设置悬停显示描述
    ToolTip % description[phkey]
    SetTimer, RemoveToolTip, -2000
    GuiControl,, MyEdit, %phValue%
    GuiControl, Enable, MyEdit
    GuiControl, Enable, confirm
    GuiControl, Enable, cancel
return

RemoveToolTip:
    ToolTip
return

addPhraseHandle(){
    id := TV_GetSelection()
    TV_GetText(abbre, id)
    GuiControlGet MyEdit
	MyEdit := Trim(MyEdit)
	if(MyEdit==“”){
		MsgBox % valueEmptyL
        return 1
	}
	
	MsgBox,260,, % isUpdateL
    IfMsgBox No
        return
	
    change(abbre,MyEdit,fatherMap[abbre],description[abbre])
    sendcmd("重启","start.ahk")
}
cancel(){
	Gui hide
}

contains(map,id){
    for index, element in map
    {
        if(element==id){
            return true
        }
    }
    return false
}

;删除file中key，TV id为id的值
deletePhrase(file,key, id, fatherTVMap,sonTVMap,phrase){
    if(contains(fatherTvMap,id)){
        sonId := TV_GetChild(id)
        if(sonId == 0){
            MsgBox,260,, 确定删除？
            IfMsgBox No
                return
            fatherTvMap.Delete(%key%)
            TV_Delete(id)
        }else{
            MsgBox 集合非空，不允许删除
        }
        return
    }
	
    MsgBox,260,, 确定删除？
    IfMsgBox No
        return
    
    FileRead, var, %file%
    TV_GetText(phkey, id)
    reg := "smU);" phkey ";.+return"
    var := RegExReplace(var, reg)
    MsgBox % var
    var := RegExReplace(var, "m)^[[:blank:]]*(.*)", "$1")
    MsgBox % var
    
    
    FileDelete,%file%
    FileAppend,%var%,%file%
    if(contains(fatherTvMap,id)){
        fatherTvMap.Delete(%key%)
    }
    if(contains(sonTVMap,id)){
        sonTVMap.Delete(%key%)
    }
    TV_Delete(id)
    phrase.Delete(%phkey%)
    Reload
}
#Include send.ahk

#SingleInstance Force
#NoEnv
Menu Tray, Icon, shell32.dll, 321
;#z::  ; Win+Z 热键
;Run addPhrase.ahk
;return

#n::  ; Win+Shift 热键
Reload
return