Changeset 1218

Show
Ignore:
Timestamp:
11/18/08 14:54:56 (5 years ago)
Author:
mösi
Message:

Neue Bildschirmtastatur: Aktiviert wird diese nur über Mod4+F1, danach folgt sie dem aktuellen Stand der Modifier. Derzeit nicht unterstütz wird das Bild für die toten Tasten (wie soll man das machen?)

Location:
windows/neo-vars/src/source
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • windows/neo-vars/src/source/levelfunctions.ahk

    r1186 r1218  
    3030    EbeneNC := EbeneC            ; NC: gleich 
    3131  } 
     32  if (guiErstellt) 
     33    BSTSwitch(EbeneC) 
    3234} 
    3335 

  • windows/neo-vars/src/source/screenkeyboard.ahk

    r1192 r1218  
    1 Switch: 
    2   if (guiErstellt)  
    3   { 
    4      if (Image = tImage) 
    5         goto Close 
    6      else 
    7      { 
    8        Image := tImage 
    9        SetTimer, Refresh 
    10      } 
     1BSTSwitch(Eb) { 
     2  global 
     3  if (Eb <> EbeneAlt) { 
     4    GuiControl,Show,Picture%Eb% 
     5    GuiControl,Hide,Picture%EbeneAlt% 
     6    EbeneAlt := Eb 
    117  } 
    12   else  
    13   { 
    14     Image := tImage 
    15     goto Show     
    16   } 
    17 Return 
     8} 
    189 
    19 Show: 
    20   if (guiErstellt)  
    21   { 
    22      goto Close 
    23   } 
    24   else 
    25   { 
    26     if (Image = "")  
    27     { 
    28       Image := ResourceFolder . "\ebene1.png" 
    29     }      
     10BSTToggle() { 
     11  global 
     12  if (guiErstellt) { 
     13    guiErstellt := 0 
     14    Gui, Destroy 
     15  } else { 
    3016    yPosition := A_ScreenHeight -270 
    3117    Gui, Color, FFFFFF 
    32     Gui, Add, Button, xm+5 gSwitch1, F1 
    33     Gui, Add, Text, x+5, kleine Buchstaben 
    34     Gui, Add, Button, xm+5 gSwitch2, F2 
    35     Gui, Add, Text, x+5, gro�e Buchstaben 
    36     Gui, Add, Button, xm+5 gSwitch3, F3 
    37     Gui, Add, Text, x+5, Satz-/Sonderzeichen 
    38     Gui, Add, Button, xm+5 gSwitch4, F4 
    39     Gui, Add, Text, x+5, Zahlen / Steuerung 
    40     Gui, Add, Button, xm+5 gSwitch5, F5 
    41     Gui, Add, Text, x+5, Sprachen 
    42     Gui, Add, Button, xm+5 gSwitch6, F6 
    43     Gui, Add, Text, x+5, Mathesymbole 
    44     Gui, Add, Button, xm+5 gSwitchDK, F7 
    45     Gui, Add, Text, x+5, Deadkeys 
    46     Gui, Add, Button, x+15 y+-13 gShow, F8 
    47     Gui, Add, Text, x+5, OnTop 
    48     Gui, Add, Picture,AltSubmit ys w729 h199 vPicture, %Image% 
     18    Gui, Add, Picture,AltSubmit x0   y0   w729 h199        vPicture1, % ResourceFolder . "\ebene1.png" 
     19    Gui, Add, Picture,AltSubmit xp+0 yp+0 w729 h199 Hidden vPicture2, % ResourceFolder . "\ebene2.png" 
     20    Gui, Add, Picture,AltSubmit xp+0 yp+0 w729 h199 Hidden vPicture3, % ResourceFolder . "\ebene3.png" 
     21    Gui, Add, Picture,AltSubmit xp+0 yp+0 w729 h199 Hidden vPicture4, % ResourceFolder . "\ebene4.png" 
     22    Gui, Add, Picture,AltSubmit xp+0 yp+0 w729 h199 Hidden vPicture5, % ResourceFolder . "\ebene5.png" 
     23    Gui, Add, Picture,AltSubmit xp+0 yp+0 w729 h199 Hidden vPicture6, % ResourceFolder . "\ebene6.png" 
    4924    Gui, +AlwaysOnTop 
    5025    Gui, Show, y%yposition% Autosize 
    51 ;    SetTimer, Refresh 
    52     guiErstellt = 1 
    53   }  
    54 Return 
    55  
    56 Close: 
    57   guiErstellt = 0 
    58   Gui, Destroy 
    59 Return 
    60  
    61 Refresh: 
    62    If (Image != OldImage) 
    63    { 
    64       GuiControl, , Picture, %Image% 
    65       OldImage := Image 
    66    } 
    67 Return 
    68  
    69 ToggleAlwaysOnTop: 
    70     if (alwaysOnTop) 
    71     { 
    72       Gui, -AlwaysOnTop 
    73       alwaysOnTop = 0     
    74     } 
    75     else 
    76     { 
    77       Gui, +AlwaysOnTop 
    78       alwaysOnTop = 1 
    79     } 
    80 Return 
     26    BSTEbeneAlt := 1 
     27    guiErstellt := 1 
     28  } 
     29} 
    8130 
    8231F1:: 
    8332  if(isMod4Active() && zeigeBildschirmTastatur) 
    84     goto Switch1 
     33    BSTToggle() 
    8534  else send {blind}{F1} 
    8635return 
    87  
    88 F2:: 
    89   if(isMod4Active() && zeigeBildschirmTastatur) 
    90     goto Switch2 
    91   else send {blind}{F2} 
    92 return 
    93  
    94 F3:: 
    95   if(isMod4Active() && zeigeBildschirmTastatur) 
    96     goto Switch3 
    97   else send {blind}{F3} 
    98 return 
    99  
    100 F4:: 
    101   if(isMod4Active() && zeigeBildschirmTastatur) 
    102     goto Switch4 
    103   else send {blind}{F4} 
    104 return 
    105  
    106 F5:: 
    107   if(isMod4Active() && zeigeBildschirmTastatur) 
    108     goto Switch5 
    109   else send {blind}{F5} 
    110 return 
    111  
    112 F6:: 
    113   if(isMod4Active() && zeigeBildschirmTastatur) 
    114     goto Switch6 
    115   else send {blind}{F6} 
    116 return 
    117  
    118 F7:: 
    119   if(isMod4Active() && zeigeBildschirmTastatur) 
    120     goto SwitchDK 
    121   else send {blind}{F7} 
    122 return 
    123  
    124 F8:: 
    125   if(isMod4Active() && zeigeBildschirmTastatur) 
    126     goto ToggleAlwaysOnTop 
    127   else send {blind}{F8} 
    128 return 
    129  
    130 Switch1: 
    131   tImage := ResourceFolder . "\ebene1.png" 
    132   goto Switch 
    133 Return 
    134  
    135 Switch2: 
    136   tImage := ResourceFolder . "\ebene2.png" 
    137   goto Switch 
    138 Return 
    139  
    140 Switch3: 
    141   tImage := ResourceFolder . "\ebene3.png" 
    142   goto Switch 
    143 Return 
    144  
    145 Switch4: 
    146   tImage := ResourceFolder . "\ebene4.png" 
    147   goto Switch 
    148 Return 
    149  
    150 Switch5: 
    151   tImage := ResourceFolder . "\ebene5.png" 
    152   goto Switch 
    153 Return 
    154  
    155 Switch6: 
    156   tImage := ResourceFolder . "\ebene6.png" 
    157   goto Switch 
    158 Return 
    159  
    160 SwitchDK: 
    161   tImage := ResourceFolder . "\deadkeys.png" 
    162   goto Switch 
    163 Return 
    164