AutoHotkey Community

; Add the menu pictures:
if menuExist = true
{
   Gui, 1:Show
}
else
{
Gui, 1:+LastFound +Resize
Gui, 1:Color, FF00FF
WinSet, TransColor, FF00FF

Gui, 1:Add, Picture, vNorth AltSubmit x25 y0 +BackgroundTrans, %imgPath%\ring_01_north.gif
Gui, 1:Add, Picture, vWest AltSubmit gwestClick x0 y25 +BackgroundTrans, %imgPath%\ring_01_west.gif
Gui, 1:Show
menuExist = true
}

Return

westClick:
GuiControl, 1:, West, %imgPath%\ring_01_east.gif
Return

GuiClose:
ExitApp

GuiEscape:
Gui, 1:Hide

;start of adaptable pie menu system
;AHK 1.0.20
;Tom Thomalla Jr.
;2/4/2005

Display1=TT1
Display2=TT2
Display3=TT3
Display4=TT4
Display5=TT5
Display6=TT6
Display7=TT7
Display8=TT8

;find out how many valid elements there are
loop
  {
  StringTrimRight, element, Display%a_index%, 0
   if element =
    {
    total=%a_index%
    total-=1
     break ; The end of the array has been reached.
     }
  }
 
;cosine and sine take radians
;divide a total circle by the total number of elements
;to return the radian "chunk" to use
pi=3.141592653589793
chunk=%pi%
envmult chunk, 2
envdiv chunk, %total%
;set up some basic position variable
;to be replaced later with better automatic positioning
radius=50 ;px
start_x=100
start_y=100
loop %total%
{
  ;set up the angle based on the chunk
    elem_angle=%chunk%
  ;adjust the multiplier so the first item is far right
    elem_count_adjust=%a_index%
    envsub, elem_count_adjust, 1
  ;multiple the chunk by the element number that is now adjusted
  ;will give the angle in radians where it should be placed
    envmult, elem_angle, %elem_count_adjust%
  ;start with the sin and cos for the angle
    transform elem_x, cos, %elem_angle%
    transform elem_y, sin, %elem_angle%
  ;multiply it by the radius
    envmult elem_x, %radius%
    envmult elem_y, %radius%
  ;adjust it for where to start in the box
    envadd elem_x, %start_x%
    envadd elem_y, %start_y%
  ;make the gui item
    StringTrimRight, elem_text, Display%a_Index%, 0
    gui, add, text, x%elem_x% y%elem_y%, %elem_text%
  ;adjust the item to be centered on the original x,y
    GuiControlGet, elem_, Pos, Static%a_index%
    envdiv elem_w, 2
    envdiv elem_h, 2
    envsub elem_x, %elem_w%
    envsub elem_y, %elem_h%
    guicontrol, move, Static%a_index%, x%elem_x% y%elem_y%
}
gui, show
return

GuiClose:
ExitApp

    SetFormat, float, 0.10
    numItems := 4
    radius := 50
   
    ; Degree! You can set this to any other value, e.g. -90 to start at the
    ; top (12 o´clock) if using four items
    angle := 0
   
    ; use this constant or compute radient yourself by: angle_rad = pi * angle_degree / 180
    RADIENT = 0.0174532925199433
    perItemAngle = 360
    perItemAngle /= %numItems%
   
    ; position the images around this point within the window
    offX := 100
    offY := 100
   
    loop, %numItems%
    {
      radientAngle = %RADIENT%
      radientAngle *= %angle%
     
      ; formula: picX = radius * cos(radientAngle) - hotspotX + offX
      ; where hotspotX can be set to the horizontal center of the image
      picX = %radius%
      transform cosX, cos, %radientAngle%
      picX *= %cosX%
      hotspotX := r%ringCount%_i%A_Index%_hotspotX
      picX -= %hotspotX% ; move to center of image
      picX += %offX%     ; move to center of window
     
      ; formula: picY = radius * sin(radientAngle) - hotspotY + offY
      ; where hotspotY can be set to the vertical center of the image
      picY = %radius%
      transform sinY, sin, %radientAngle%
      picY *= %sinY%
      hotspotY := r%ringCount%_i%A_Index%_hotspotY
      picY -= %hotspotY% ; move to center of image
      picY += %offY%     ; move to center of window
     
      Gui, 1:Add, Picture, AltSubmit x%picX% y%picY% +BackgroundTrans, %imgPath%\%picName%
     
      angle += %perItemAngle%
     
      ; Paranoia code - should not ever occur in our code
      if %angle% >= 360
      {
        angle = 0
      }
    }