topbanner_forum
  *

avatar image

Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
  • Tuesday April 23, 2024, 7:26 pm
  • Proudly celebrating 15+ years online.
  • Donate now to become a lifetime supporting member of the site and get a non-expiring license key for all of our programs.
  • donate

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Expletive [ switch to compact view ]

Pages: [1]
1
Updated original post

2
I've got it working! To do it, open command.ahk and replace the original code with my code:

;Original Code
DefineHotkeys:
  loop,9
  {
     Hotkey, %FastMoveModifiers%%A_Index%, WinHotkeys
     Hotkey, %FastMoveModifiers%Numpad%A_Index%, WinHotkeys
  }
  Hotkey, %FastMoveModifiers%0, WinHotKey
  Hotkey, %FastMoveModifiers%Numpad0, WinHotkeys
  if FastMoveMeta <>
    Hotkey, %FastMoveModifiers%%FastMoveMeta%, WinHotkeysMeta
  return

WinHotkeys:
  StringRight,Number,A_ThisHotkey,1
  MoveToGrid(Number)
  return

;My Code
;FastMove Works with F1-F12 as grids 11-22 by Expletive
DefineHotkeys:

NewHotKeys := {1:1,2:2,3:3,4:4,5:5,6:6,7:7,8:8,9:9,sc0b:10,F1:11,F2:12:F3:13:F4:14:F5:15,F6:16,F7:17,F8:18,F9:19,F10:20,F11:21,F12:22,Numpad0:10,Numpad1:1,Numpad2:2,Numpad3:3,Numpad4:4,Numpad5:5,Numpad6:6,Numpad7:7,Numpad8:8,Numpad9:9}
For key, value in NewHotKeys {
        if key
hotkey, %FastMoveMeta%%key%, WinHotKeys
}
 if FastMoveMeta <>
    Hotkey, %FastMoveModifiers%%FastMoveMeta%, WinHotkeysMeta
return

WinHotkeys:  
  StringReplace, KeyPressed, A_ThisHotKey, %FastMoveMeta%
  Number := NewHotKeys[KeyPressed]
  MoveToGrid(Number)
  return  

Edit: Ive noticed a couple of bugs:
1.) This code runs fine when run as .ahk but when compiling it, there's an error when it starts, probably because of the 0 key in newhotkeys, but I don't know why it'd only fail on compile.

Fixed:
2.) Pressing shift+3 seems to cause the window to shrink to nothing. I have no clue what's causing this. It doesn't seem to be related to %FastMoveMeta% since even when I change the meta to ^ for ctrl and restart it keeps doing it.

Edit 2:

So I fixed Error 2, and now there isn't an error message about '' not being a valid key, however it still only seems to work when ran as a script. After compiling, there is no error, but fast move has no modifer meta , and when grids are selected with the #g command, grids above 9 can't be selected.

I have no idea why there would be differences between a script and a compiled script. If anyone here has experience with autohotkey, I'd appreciate some help. But for anyone using gridmove as a .ahk, the above code should work fine for you.

3
It's working! Thank. But now it doesn't snap to the edges of the Monitor like it used to. In these images the Notepad++ window is maximized on the next monitor over.

Old:  http://i.imgur.com/hPejoGA.jpg

New code: http://i.imgur.com/RVUoQZh.jpg

Is it possible to make it limit the positions of the edges to the edges of the grid, while still trying to center itself on your mouse?


4
This isn't quite done. I still want to figure out how to make the elements that aren't transparent actually transparent, and also how to change the font color, but I guess I can post it anyway. Maybe someone here can help me figure it out. For reference, I want to make the status bar at the bottom, the text entry field when empty and the toolbar around it transparent like the results portion. I also want to change the test color to something more universally readable against a wider variety of background colors.

Anyway, heres the autohotkey script:

Code: Autohotkey [Select]
  1. #include aero_lib.ahk
  2. #IfWinActive ahk_Class TMainForm
  3. ;Toggle Aero transparency
  4. F9::
  5. WinGet, handle, ID
  6.        
  7.         If t := !t {
  8.                 Aero_BlurWindow(handle)
  9.                 WinSet, Redraw
  10.         }else{
  11.                 Aero_BlurWindow(handle, 0)
  12.                 WinSet, Redraw
  13.         }
  14. return

5


This is with search and text fields set to clBlack and not using a .skn

I did this because I found aero_lib.ahk and I am currently on a quest to glass everything I possibly can.

6
Here's a visual aid:


Grid 8, the one at the top:
Code: Text [Select]
  1. [8]
  2.         TriggerTop              = [Monitor3Top]
  3.         TriggerBottom   = [Monitor3Top] + [Monitor3Height] / 30
  4.         TriggerLeft             = [Monitor3Left]
  5.         TriggerRight    = [Monitor3Right]
  6.         GridTop                 = [Monitor3Top]
  7.         GridBottom              = [Monitor3Bottom]
  8.         GridLeft                = WindowWidth
  9.         GridRight               = WindowWidth

In the image I am holding MButton and dragging the notepad to the top of the window. See how the grid moves with the left edge attached to the mouse cursor? I want to change it so that instead of the current behavior, the window aligns the center to the cursor, such as in the following visual mockup:


7
I'm trying to change it so that when WindowWidth or WindowHeight are used in a grid file, the window is positioned so that the cursor is at the center of the grid's top edge. Since WindowWidth and WindowHeight can't be operated on like [MonitorXWidth] etc, I figured I have to edit gridmove's source, after digging around in the assortment of .ahk files, I've found only a couple of references to them, so I'm assuming their what I'd have to change. I'm just fuzzy on how. The code I found was:

Code: Autohotkey [Select]
  1. ;Line 206 of Command.ahk
  2.   If (GridLeft = "WindowWidth" AND GridRight = "WindowWidth")
  3.   {
  4.     WinGetClass,WinClass,A
  5.  
  6.     if ShouldUseSizeMoveMessage(WinClass)
  7.       SendMessage WM_ENTERSIZEMOVE, , , ,ahk_id %windowid%
  8.  
  9.     WinMove, A, ,%WinLeft%,%GridTop%, %WinWidth%,% GridBottom - GridTop,    
  10.  
  11.     if ShouldUseSizeMoveMessage(WinClass)
  12.       SendMessage WM_EXITSIZEMOVE, , , ,ahk_id %windowid%
  13.     StoreWindowState(WindowId,WinLeft,WinTop,WinWidth,WinHeight)
  14.     return
  15.   }
  16.   If (GridTop = "WindowHeight" AND GridBottom = "WindowHeight")
  17.   {
  18.     WinGetClass,WinClass,A
  19.  
  20.     if ShouldUseSizeMoveMessage(WinClass)
  21.       SendMessage WM_ENTERSIZEMOVE, , , ,ahk_id %windowid%
  22.  
  23.     WinMove, A, ,%GridLeft%,%WinTop%, % GridRight - GridLeft,%WinHeight%,    
  24.  
  25.     if ShouldUseSizeMoveMessage(WinClass)
  26.       SendMessage WM_EXITSIZEMOVE, , , ,ahk_id %windowid%
  27.     StoreWindowState(WindowId,WinLeft,WinTop,WinWidth,WinHeight)
  28.     return
  29.   }
  30.  
  31. ;line 849 of GridMoveP1.ahk
  32.  
  33.     If ShowNumbersFlag
  34.     {
  35.       If (GridTop = "WindowHeight" OR GridLeft = "WindowWidth")
  36.       {
  37.         Gui, add, text,c%shadowcolor% BackGroundTrans  X%ShadowLeft% Y%ShadowTop% ,%A_Index%
  38.         Gui, add, text,c%textcolor% BackGroundTrans  X%TextLeft% Y%TextTop% ,%A_Index%
  39.       }

Also, I'm realizing the Gridmove I've been using for years is now apparently 9 versions out of date. From 19.62 to 19.71. I really like the Aero effects, but I'm not so sure about the new icon. I may just be too set in my ways.

Pages: [1]