SysGet, workArea, MonitorWorkArea
workAreaWidth := workAreaRight - workAreaLeft
workAreaHeight := workAreaBottom - workAreaTop
r1 = 0.20000
lr := r1 * workAreaWidth
main_w := (1- r12) workAreaWidth
^k:: ; 중앙
ResizeWin( lr, workAreaTop , main_w , workAreaHeight )
return
^j:: ; 왼쪽
ResizeWin( workAreaLeft , workAreaTop , lr , workAreaHeight )
return
^h:: ; 왼쪽 크게
ResizeWin( workAreaLeft , workAreaTop , lr * 2 , workAreaHeight )
return
^l:: ; 오른쪽 크게
ResizeWin( lr * 2 , workAreaTop , main_w , workAreaHeight )
return
ResizeWin( x, y, w, h ) {
winMove , A,, x, y, w, h
}
작업표시줄을 고려해서 작동하도록 수정함.
그런데 조금 이상한 현상이 일어날 수 있는데, 화면 좌측 상단 좌표가 0이고, 디버깅 해보면 0으로 보내는데 이상하게 약간 왼쪽에 갭이 생김. 마찬가지로 작업표시줄과 윈도우 사이에도 갭이 생김. 이 갭은 계산상으로는 안나와야하고, 변수값을 확인해봐도 없어야 하는데 그냥 생김.... 작은 갭이고 있으니 의외로 편한 점도 있어서 놔두기로함