This is an older Ted script, for displaying the available alt characters in
a menu. With standard configuration enabled, I was trying to get it working
again. I got the '" to \" changed, but am still missing something as the
characters aren't displaying in the menu. Can anyone assist?
 
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
Powerpro Yahoogroup - Come, talk and learn. http://tinyurl.com/2sf7d
Funstuff: Let's organize this thing and take all the fun out of it. 


[Non-text portions of this message have been removed]



------------------------ 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
--------------------------------------------------------------------~-> 

 
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