> Any suggestions on how to proceed from here?
> - Still use keytrap but change implementation?
> - Look for alternative freeware? (is there even anything better than 
> AllChars or Windows own input local driver?)
> - Request to extend keytrap to directly handle digraph translation? 
> (assuming Russell's gratious willingness to do so)
> 
> Is anyone able to reliably type digraphs over VNC connections? (I use 
> UltraVNC). 

What happens when you trigger this menu locally, and send it thru the vnc
session?

-----watch for wraps------------
@AltnnnKeys

Local sMenu
For(Local I = 32; I < 256; I = I + 1)
    If(I == 32) Do
        sMenu = sMenu ++ "Sub=32 {space} - 64 @\n"
        sMenu = sMenu ++ I ++ " (space)\n"
    ElseIf(I == 61)
        sMenu = sMenu ++ I ++ " (equals sign)\n"
    ElseIf(I == 92)
        sMenu = sMenu ++ I ++ " \\\n"
    ElseIf(I == 160)
        sMenu = sMenu ++ I ++ " (non-breaking space)\n"
    Else
        If(I == 65) Do
            sMenu = sMenu ++ "EndSub\nSub=65 A - 96 `\n"
        ElseIf(I == 97)
            sMenu = sMenu ++ "EndSub\nSub=97 a - 135 !\n"
        ElseIf(I == 136)
            sMenu = sMenu ++ "EndSub\nSub=136 � - 175 �\n"
        ElseIf(I == 176)
            sMenu = sMenu ++ "EndSub\nSub=176 � - 215 �\n"
        ElseIf(I == 216)
            sMenu = sMenu ++ "EndSub\nSub=216 � - 255 �\n"
        EndIf
        sMenu = sMenu ++ I ++ " " ++ Eval("\"\\D" ++ \+
Fill("000", I) ++ "\"") ++ "\n"
        If(I == 255)
            sMenu = sMenu ++ "EndSub"
    EndIf
EndFor
I = MiscPlugin.Show_Menu("*Clip Paste Char", sMenu)
If(I != "NO_ITEM_SELECTED") Do
    Clip.Set(Eval("\"\\D" ++ Fill("000", I + 0) ++ "\""))
    Clip.Paste
EndIf
Quit
  
@oldAltnnnKeys
FOR(i=32;i lt 256;i=i+1)
IF(i==32)DO
sMenu=sMenu++"SUB=32 {Space} - 64 @\n"
sMenu=sMenu++i++" {space}\n"
ELSEIF(i==92)
sMenu=sMenu++i++" {slash}\n"
ELSEIF(i==160)
sMenu=sMenu++i++" {special space}\n"
ELSE

IF(i==65)DO
sMenu=sMenu++"ENDSUB\nSUB=65 A - 64 @\n"
ELSEIF(i==97)
sMenu=sMenu++"ENDSUB\nSUB=97 a - 135 !\n"
ELSEIF(i==136)
sMenu=sMenu++"ENDSUB\nSUB=136 � - 175 �\n"
ELSEIF(i==176)
sMenu=sMenu++"ENDSUB\nSUB=176 � - 215 �\n"
ELSEIF(i==216)
sMenu=sMenu++"ENDSUB\nSUB=216 a - 255 �\n"
ENDIF

sMenu=sMenu++i++" "++EVAL("\"''d"++SELECT("0"++i,-3)++"\"")++"\n"

IF(i==255)
sMenu=sMenu++"ENDSUB"

ENDIF

ENDFOR

sMenu=MiscPlugin.Show_Menu("Clip Paste Char",sMenu)

IF(MenuList!="NO_ITEM_SELECTED")DO
i=REPLACECHARS(SELECT(sMenu,3)," ","")
CLIP.Set(EVAL("\"''d"++SELECT("0"++i,-3)++"\""))
CLIP.Paste
ENDIF

QUIT
--------------------------


David Troesch  |  Atlanta, GA  |  ICQ# 2333123
Free Antivirus? Free Firewall? Tired of popups? http://tinyurl.com/ytu7z
Funstuff: * Jesus is coming, everyone look busy.



------------------------ Yahoo! Groups Sponsor --------------------~--> 
Make a clean sweep of pop-up ads. Yahoo! Companion Toolbar.
Now with Pop-Up Blocker. Get it for free!
http://us.click.yahoo.com/L5YrjA/eSIIAA/yQLSAA/JV_rlB/TM
--------------------------------------------------------------------~-> 

Attention: PowerPro's Web site has moved: http://www.ppro.org 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/power-pro/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 

Reply via email to