Iska, ))))
Код:
$gtprname - произвольное имя, которое вводит пользователь
$unico - иконка, которая будет отображаться в меню. Берется или из файла деинсталятора или непосредственно из файла *.ico, который выбрал пользователь
$unmod = @ProgramFilesDir & '\' & $gtprname
DirCreate($unmod)
FileCopy($wkdir & '\unmod.exe', $unmod & '\unmod.exe')
DirCreate(@ProgramsCommonDir & '\' & $gtprname)
FileCreateShortcut($unmod & '\unmod.exe', @ProgramsCommonDir & '\' & $gtprname & '\unmod.lnk', $unmod, '', '', $unico)
остальная тысяча строк не имеет отношения к созданию ярлыка
