ô Launch ICONEDIT v0.20 ô (C) Jon Ripley 2007-2008  *ESC OFF Name$="ICONEDIT Launcher" $Action$="launch the icon editor" ;ë 0: "SetWindowPos", @hwnd%, 0, 0, 0, 640, 320, 6:ï 26 Šop$=½0+½18+"RI"+½255+½18+"SYS ""ShellExecute"", @hwnd%, ""open"", @lib$+""..\EXAMPLES\TOOLS\ICONEDIT.BBC"", 0, """", 1"+½13+"QUIT"+½13 4 "SetWindowText", @hwnd%, Name$+" Installation"  "ShowWindow", @hwnd%, 9 õ 2Û:è † "Bind to which function key (1-15) ? "F% ý F%>0 € F%<16 F$ = op$ <K$ = "Software\R T Russell\BBC BASIC for Windows\Macros" D "RegCreateKeyEx", &80000001, K$, 0, "", 0, &F003F, 0, ^K%, ^D% 3 "RegSetValueEx", K%, "F"+ÃF%, 0, 3, F$, ©(F$)  "RegCloseKey", K% Gñ'"Press "Ä-(F%<10),"Shift+")"F";F%" from the editor to "Action$"." (ñ'"Press any key to continue . . ."; õý¥  ÿÿ