Что нового

Автоматическая установка AIMP

eropov

Jury
Сообщения
195
Репутация
25
Проблема с автоматизацией установки плеера AIMP, не получается автоматизировать процесс установки стандартными функциями AutoIT. Кто нибудь его устанавливал?
 
Автор
E

eropov

Jury
Сообщения
195
Репутация
25
На данный момент, ключа для тихой установки нет. Какие еще будут предложения?
 

SECTOR

Продвинутый
Сообщения
399
Репутация
59
Самораспаковывающийся архив + скрипт (ну или *.bat)
или
Автоматизация нажатий в инсталляторе
 

Medic84

Омега
Команда форума
Администратор
Сообщения
1,590
Репутация
341
Кажется проще репак сделать...
 
Автор
E

eropov

Jury
Сообщения
195
Репутация
25
Приведите пример, автоматизации на AutoIT, кто сможет.
У меня не получилось, потому что, AutoIt Window Info не находит классы кнопок инсталятора,
при использовании кнопок клавиатуры, тоже ни чего не происходит. Есть только заголовок окна.
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Работает на последней версии AIMP 3.10.1040 beta 3:

Код:
Opt('MouseCoordMode', 0)
Opt('WinWaitDelay', 1)

;Путь установки
$sPath = "C:\AIMP3"

;Режим установки (для переносной установки, нельзя указывать C:\Program Files)
;0 - Переносная
;1 - Обычная
$iInstall_Mode = 0

;Запуск AIMP в конце установки
;0 - Не запускать
;1 - Запускать
$iRun_AIMP = 0

Run(@ScriptDir & "\aimp_3.10.1040_beta_3.exe")

$iRet = _WinWaitVisible("[CLASS:TInstallerLanguageDialog;TITLE:Select Language]", "", 5)
WinSetState("[CLASS:TInstallerLanguageDialog;TITLE:Select Language]", "", @SW_MINIMIZE)
WinWaitNotActive("[CLASS:TInstallerLanguageDialog;TITLE:Select Language]")
ControlClick("[CLASS:TInstallerLanguageDialog;TITLE:Select Language]", "", "", "Main", 1, 115, 60)
WinWaitClose("[CLASS:TInstallerLanguageDialog;TITLE:Select Language]", "", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "", 5)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "", "", "Main", 1, 460, 370)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Select Language]", "", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLicense", 5)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLicense", "TInstallerPageLicense1", "Main", 1, 35, 265)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLicense", "", "Main", 1, 460, 370)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", 5)
ControlSetText("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", "TMySkinInnerEdit1", $sPath)

Switch $iInstall_Mode
	Case 0
		ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", "TInstallerPageSetup1", "Main", 1, 85, 150)
	Case 1
		ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", "TInstallerPageSetup1", "Main", 1, 85, 210)
EndSwitch

ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", "", "Main", 1, 460, 370)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageSetup", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", 5)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", "TInstallerPageYandex1", "Main", 1, 60, 98)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", "TInstallerPageYandex1", "Main", 1, 90, 125)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", "TInstallerPageYandex1", "Main", 1, 90, 145)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", "TInstallerPageYandex1", "Main", 1, 90, 175)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", "", "Main", 1, 460, 370)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageYandex", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLanguages", 5)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLanguages", "", "Main", 1, 460, 370)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageLanguages", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageIntegration", 5)
ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageIntegration", "", "Main", 1, 460, 370)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageIntegration", 5)

$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageInstall", 5)
WinWaitClose("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageInstall")
$iRet = _WinWaitVisible("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageFinish")

If Not $iRun_AIMP Then
	ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageFinish", "TInstallerPageFinish1", "Main", 1, 220, 128)
EndIf

ControlClick("[CLASS:TInstallerForm;TITLE:Мастер установки AIMP3]", "PageFinish", "", "Main", 1, 460, 370)

Func _WinWaitVisible($sTitle, $sText, $iTime = 0)
	Local $iTimer = -1
	If $iTime > 0 Then $iTimer = TimerInit()
	
	While Not BitAND(WinGetState($sTitle, $sText), 2)
		Sleep(10)
		
		If $iTime > 0 And (TimerDiff($iTimer) / 1000) >= $iTime Then
			ExitLoop
		EndIf
	WEnd
	
	Return Number(BitAND(WinGetState($sTitle, $sText), 2) = 2)
EndFunc


Код написал на скорую руку, особо не тестировал (также нет проверок на ошибки и “защиты от дурака”).
 
Автор
E

eropov

Jury
Сообщения
195
Репутация
25
Спасибо CreatoR, то что нужно, отлично работает.
 

sss

Продвинутый
Сообщения
332
Репутация
96
eropov
Как вариант, можно сделать как здесь http://autoit-script.ru/index.php/topic,4306.0.html . Возни, конечно, больше, но зато исключается возможность ошибки при нажатии на кнопки + можно свои настройки для плеера сделать.
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Sky-WaLkeR
Я планирую сделать что-то типа Macro Generator, но с уклоном на автоустановку, должно значительно упростить задачу автоустановок.
 

sss

Продвинутый
Сообщения
332
Репутация
96
CreatoR
Здорово! Как сделаешь - обязательно выкладывай!
А я вот все хотел автоматизировать процесс по ссылке выше, но так и не взялся...
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Ребята, это уже не касается темы.
 

chymax3m

Новичок
Сообщения
26
Репутация
1
Я ,к примеру, сделал снимок реестра до установки, установил начисто AIMP3, настроил его (асоциации, иконки, скины и пр.), отследил изменения в реестре и експортировал в reg-файл. Потом не поленился и написал скрипт:
Код:
#NoTrayIcon
DirCreate (@ProgramFilesDir&"\AIMP3")
FileInstall ("AIMP3.dll",@ProgramFilesDir&"\AIMP3\AIMP3.dll", 1)
FileInstall ("AIMP3.exe",@ProgramFilesDir&"\AIMP3\AIMP3.exe", 1)
FileInstall ("AIMP3.ini",@ProgramFilesDir&"\AIMP3\AIMP3.ini", 1)
FileInstall ("AIMP3.url",@ProgramFilesDir&"\AIMP3\AIMP3.url", 1)
FileInstall ("AIMP3ate.exe",@ProgramFilesDir&"\AIMP3\AIMP3ate.exe", 1)
FileInstall ("AIMP3lib.dll",@ProgramFilesDir&"\AIMP3\AIMP3lib.dll", 1)
FileInstall ("AIMP3lib.exe",@ProgramFilesDir&"\AIMP3\AIMP3lib.exe", 1)
FileInstall ("bass.dll",@ProgramFilesDir&"\AIMP3\bass.dll", 1)
FileInstall ("history.txt",@ProgramFilesDir&"\AIMP3\history.txt", 1)
FileInstall ("license.rtf",@ProgramFilesDir&"\AIMP3\license.rtf", 1)
FileInstall ("sqlite3.dll",@ProgramFilesDir&"\AIMP3\sqlite3.dll", 1)
FileInstall ("Uninstall.exe",@ProgramFilesDir&"\AIMP3\Uninstall.exe", 1)
FileInstall ("Aimp3.reg",@ProgramFilesDir&"\AIMP3\Aimp3.reg", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Help")
FileInstall("Help\AIMP3-en.chm", @ProgramFilesDir&"\AIMP3\Help\AIMP3-en.chm", 1)
FileInstall("Help\AIMP3-ru.chm", @ProgramFilesDir&"\AIMP3\Help\AIMP3-ru.chm", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Icons")
FileInstall("Icons\aimp_icons.dll", @ProgramFilesDir&"\AIMP3\Icons\aimp_icons.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Langs")
FileInstall("Langs\english.lng", @ProgramFilesDir&"\AIMP3\Langs\english.lng", 1)
FileInstall("Langs\russian.lng", @ProgramFilesDir&"\AIMP3\Langs\russian.lng", 1)
FileInstall("Langs\ukrainian.lng", @ProgramFilesDir&"\AIMP3\Langs\ukrainian.lng", 1)
DirCreate(@ProgramFilesDir&"\AIMP3\Modules")
FileInstall("Modules\aimp_infobar.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_infobar.dll", 1)
FileInstall("Modules\aimp_libvorbis.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_libvorbis.dll", 1)
FileInstall("Modules\aimp_mediakeys.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_mediakeys.dll", 1)
FileInstall("Modules\aimp_menu32.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_menu32.dll", 1)
FileInstall("Modules\aimp_menu64.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_menu64.dll", 1)
FileInstall("Modules\aimp_radiocat.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_radiocat.dll", 1)
FileInstall("Modules\aimp_scheduler.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_scheduler.dll", 1)
FileInstall("Modules\aimp_update.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_update.dll", 1)
FileInstall("Modules\basscd.dll", @ProgramFilesDir&"\AIMP3\Modules\basscd.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Plugins")
FileInstall("Plugins\aimp_lastfm.dll", @ProgramFilesDir&"\AIMP3\Plugins\aimp_lastfm.dll", 1)
FileInstall("Plugins\Aorta.svp", @ProgramFilesDir&"\AIMP3\Plugins\Aorta.svp", 1)
FileInstall("Plugins\bass_aac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_aac.dll", 1)
FileInstall("Plugins\bass_ac3.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_ac3.dll", 1)
FileInstall("Plugins\bass_alac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_alac.dll", 1)
FileInstall("Plugins\bass_ape.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_ape.dll", 1)
FileInstall("Plugins\bass_flac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_flac.dll", 1)
FileInstall("Plugins\bass_midi.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_midi.dll", 1)
FileInstall("Plugins\bass_mpc.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_mpc.dll", 1)
FileInstall("Plugins\bass_spx.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_spx.dll", 1)
FileInstall("Plugins\bass_tta.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_tta.dll", 1)
FileInstall("Plugins\bass_wma.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_wma.dll", 1)
FileInstall("Plugins\bass_wv.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_wv.dll", 1)
FileInstall("Plugins\OptimFROG.dll", @ProgramFilesDir&"\AIMP3\Plugins\OptimFROG.dll", 1)
FileInstall("Plugins\PandemicAnalogMeter.dll", @ProgramFilesDir&"\AIMP3\Plugins\PandemicAnalogMeter.dll", 1)
FileInstall("Plugins\tak_deco_lib.dll", @ProgramFilesDir&"\AIMP3\Plugins\tak_deco_lib.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Skins")
FileInstall("Skins\bif.acs2", @ProgramFilesDir&"\AIMP3\Skins\bif.acs2", 1)
FileInstall("Skins\Black_lineage.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black_lineage.acs2", 1)
FileInstall("Skins\Black Glass.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Glass.acs2", 1)
FileInstall("Skins\Black Glass v.3(by San4o).acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Glass v.3(by San4o).acs2", 1)
FileInstall("Skins\Black Stilismo.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Stilismo.acs2", 1)
FileInstall("Skins\Digital Light.acs2", @ProgramFilesDir&"\AIMP3\Skins\Digital Light.acs2", 1)
FileInstall("Skins\Luminescence AIO v2.2.acs3", @ProgramFilesDir&"\AIMP3\Skins\Luminescence AIO v2.2.acs3", 1)
FileInstall("Skins\Siveria.acs3", @ProgramFilesDir&"\AIMP3\Skins\Siveria.acs3", 1)
DirCreate(@AppDataDir&"\AIMP3")
FileInstall("AIMP3\AIMP3.bak", @AppDataDir&"\AIMP3\AIMP3.bak", 1)
FileInstall("AIMP3\AIMP3.ini", @AppDataDir&"\AIMP3\AIMP3.ini", 1)
FileInstall("AIMP3\AIMP3-cat.db", @AppDataDir&"\AIMP3\AIMP3-cat.db", 1)
FileInstall("AIMP3\AIMP3-cddb.db", @AppDataDir&"\AIMP3\AIMP3-cddb.db", 1)
FileInstall("AIMP3\aimp3_menu.ini", @AppDataDir&"\AIMP3\aimp3_menu.ini", 1)
DirCreate(@AppDataDir&"\AIMP3\AudioLibrary")
FileInstall("AIMP3\AudioLibrary\AIMP3.db", @AppDataDir&"\AIMP3\AudioLibrary\AIMP3.db", 1)
DirCreate(@AppDataDir&"\AIMP3\AudioLibrary\Playlists")
DirCreate(@AppDataDir&"\AIMP3\PLS")
RunWait('regedit /S "' &@ProgramFilesDir& '\AIMP3\Aimp3.reg"')
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3.exe", @DesktopDir&"\AIMP3.lnk", @ProgramFilesDir&"\AIMP3", "", "Aimp 3.00.985")
FileDelete(@ProgramFilesDir&"\AIMP3\Aimp3.reg")
Понимаю, что плоско, но зато ставится воистину "по-тихому"
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
chymax3m
Не помешало бы выложить и сам reg-файл ;).
 

chymax3m

Новичок
Сообщения
26
Репутация
1
Недавно обновился AIMP доверсии 3.10.1061
Вот решил откоректировать скрипт в соответствии с изменениями:
Код:
#NoTrayIcon
DirCreate (@ProgramFilesDir&"\AIMP3")
FileInstall ("AIMP3.dll",@ProgramFilesDir&"\AIMP3\AIMP3.dll", 1)
FileInstall ("AIMP3.exe",@ProgramFilesDir&"\AIMP3\AIMP3.exe", 1)
FileInstall ("AIMP3.ini",@ProgramFilesDir&"\AIMP3\AIMP3.ini", 1)
FileInstall ("AIMP3.url",@ProgramFilesDir&"\AIMP3\AIMP3.url", 1)
FileInstall ("AIMP3ate.exe",@ProgramFilesDir&"\AIMP3\AIMP3ate.exe", 1)
FileInstall ("AIMP3ac.exe",@ProgramFilesDir&"\AIMP3\AIMP3ac.exe", 1)
FileInstall ("AIMP3ate.exe",@ProgramFilesDir&"\AIMP3\AIMP3ate.exe", 1)
FileInstall ("AIMP3lib.dll",@ProgramFilesDir&"\AIMP3\AIMP3lib.dll", 1)
FileInstall ("AIMP3lib.exe",@ProgramFilesDir&"\AIMP3\AIMP3lib.exe", 1)
FileInstall ("bass.dll",@ProgramFilesDir&"\AIMP3\bass.dll", 1)
FileInstall ("history.txt",@ProgramFilesDir&"\AIMP3\history.txt", 1)
FileInstall ("license.rtf",@ProgramFilesDir&"\AIMP3\license.rtf", 1)
FileInstall ("sqlite3.dll",@ProgramFilesDir&"\AIMP3\sqlite3.dll", 1)
FileInstall ("Uninstall.exe",@ProgramFilesDir&"\AIMP3\Uninstall.exe", 1)
FileInstall ("Aimp3.10.reg",@ProgramFilesDir&"\AIMP3\Aimp3.10.reg", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Help")
FileInstall("Help\AIMP3-en.chm", @ProgramFilesDir&"\AIMP3\Help\AIMP3-en.chm", 1)
FileInstall("Help\AIMP3-ru.chm", @ProgramFilesDir&"\AIMP3\Help\AIMP3-ru.chm", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Icons")
FileInstall("Icons\aimp_icons.dll", @ProgramFilesDir&"\AIMP3\Icons\aimp_icons.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Langs")
FileInstall("Langs\english.lng", @ProgramFilesDir&"\AIMP3\Langs\english.lng", 1)
FileInstall("Langs\russian.lng", @ProgramFilesDir&"\AIMP3\Langs\russian.lng", 1)
FileInstall("Langs\ukrainian.lng", @ProgramFilesDir&"\AIMP3\Langs\ukrainian.lng", 1)
DirCreate(@ProgramFilesDir&"\AIMP3\Modules")
FileInstall("Modules\aimp_infobar.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_infobar.dll", 1)
FileInstall("Modules\aimp_libvorbis.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_libvorbis.dll", 1)
FileInstall("Modules\aimp_mediakeys.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_mediakeys.dll", 1)
FileInstall("Modules\aimp_menu32.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_menu32.dll", 1)
FileInstall("Modules\aimp_menu64.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_menu64.dll", 1)
FileInstall("Modules\aimp_radiocat.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_radiocat.dll", 1)
FileInstall("Modules\aimp_scheduler.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_scheduler.dll", 1)
FileInstall("Modules\aimp_update.dll", @ProgramFilesDir&"\AIMP3\Modules\aimp_update.dll", 1)
FileInstall("Modules\basscd.dll", @ProgramFilesDir&"\AIMP3\Modules\basscd.dll", 1)
FileInstall("Modules\libFLAC.dll", @ProgramFilesDir&"\AIMP3\Modules\libFLAC.dll", 1)
FileInstall("Modules\MACDll.dll", @ProgramFilesDir&"\AIMP3\Modules\MACDll.dll", 1)
FileInstall("Modules\wavpackdll.dll", @ProgramFilesDir&"\AIMP3\Modules\wavpackdll.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Plugins")
FileInstall("Plugins\aimp_lastfm.dll", @ProgramFilesDir&"\AIMP3\Plugins\aimp_lastfm.dll", 1)
FileInstall("Plugins\Aorta.svp", @ProgramFilesDir&"\AIMP3\Plugins\Aorta.svp", 1)
FileInstall("Plugins\bass_aac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_aac.dll", 1)
FileInstall("Plugins\bass_ac3.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_ac3.dll", 1)
FileInstall("Plugins\bass_alac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_alac.dll", 1)
FileInstall("Plugins\bass_ape.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_ape.dll", 1)
FileInstall("Plugins\bass_flac.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_flac.dll", 1)
FileInstall("Plugins\bass_midi.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_midi.dll", 1)
FileInstall("Plugins\bass_mpc.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_mpc.dll", 1)
FileInstall("Plugins\bass_spx.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_spx.dll", 1)
FileInstall("Plugins\bass_tta.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_tta.dll", 1)
FileInstall("Plugins\bass_wma.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_wma.dll", 1)
FileInstall("Plugins\bass_wv.dll", @ProgramFilesDir&"\AIMP3\Plugins\bass_wv.dll", 1)
FileInstall("Plugins\OptimFROG.dll", @ProgramFilesDir&"\AIMP3\Plugins\OptimFROG.dll", 1)
FileInstall("Plugins\PandemicAnalogMeter.dll", @ProgramFilesDir&"\AIMP3\Plugins\PandemicAnalogMeter.dll", 1)
FileInstall("Plugins\tak_deco_lib.dll", @ProgramFilesDir&"\AIMP3\Plugins\tak_deco_lib.dll", 1)
DirCreate (@ProgramFilesDir&"\AIMP3\Skins")
FileInstall("Skins\bif.acs2", @ProgramFilesDir&"\AIMP3\Skins\bif.acs2", 1)
FileInstall("Skins\Black_lineage.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black_lineage.acs2", 1)
FileInstall("Skins\Black Glass.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Glass.acs2", 1)
FileInstall("Skins\Black Glass v.3(by San4o).acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Glass v.3(by San4o).acs2", 1)
FileInstall("Skins\Black Stilismo.acs2", @ProgramFilesDir&"\AIMP3\Skins\Black Stilismo.acs2", 1)
FileInstall("Skins\Digital Light.acs2", @ProgramFilesDir&"\AIMP3\Skins\Digital Light.acs2", 1)
FileInstall("Skins\Luminescence AIO v2.2.acs3", @ProgramFilesDir&"\AIMP3\Skins\Luminescence AIO v2.2.acs3", 1)
FileInstall("Skins\Pandemic AIO Simple.acs3", @ProgramFilesDir&"\AIMP3\Skins\Pandemic AIO Simple.acs3", 1)
FileInstall("Skins\Siveria.acs3", @ProgramFilesDir&"\AIMP3\Skins\Siveria.acs3", 1)
DirCreate(@AppDataDir&"\AIMP3")
FileInstall("AIMP3\AIMP3.bak", @AppDataDir&"\AIMP3\AIMP3.bak", 1)
FileInstall("AIMP3\AIMP3.ini", @AppDataDir&"\AIMP3\AIMP3.ini", 1)
FileInstall("AIMP3\aimp3_menu.ini", @AppDataDir&"\AIMP3\aimp3_menu.ini", 1)
FileInstall("AIMP3\Bookmarks.ini", @AppDataDir&"\AIMP3\Bookmarks.ini", 1)
FileInstall("AIMP3\CDDB.db", @AppDataDir&"\AIMP3\CDDB.db", 1)
DirCreate(@AppDataDir&"\AIMP3\AudioLibrary")
FileInstall("AIMP3\AudioLibrary\AIMP3.db", @AppDataDir&"\AIMP3\AudioLibrary\AIMP3.db", 1)
DirCreate(@AppDataDir&"\AIMP3\PLS")
DirCreate(@AppDataDir&"\AIMP3\Skins")
RunWait('regedit /S "' &@ProgramFilesDir& '\AIMP3\Aimp3.10.reg"')
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3.exe", @DesktopDir&"\AIMP3.lnk", @ProgramFilesDir&"\AIMP3", "", "Aimp 3.10.1061")
DirCreate(@ProgramsCommonDir&"\AIMP3")
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3.exe", @ProgramsCommonDir&"\AIMP3\AIMP3.lnk", @ProgramFilesDir&"\AIMP3")
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3ate.exe", @ProgramsCommonDir&"\AIMP3\AIMP3 Advanced Tag Editor.lnk", @ProgramFilesDir&"\AIMP3")
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3ac.exe", @ProgramsCommonDir&"\AIMP3\AIMP3 Audio Converter.lnk", @ProgramFilesDir&"\AIMP3")
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\AIMP3lib.exe", @ProgramsCommonDir&"\AIMP3\AIMP3 Audio Library.lnk", @ProgramFilesDir&"\AIMP3")
FileCreateShortcut(@ProgramFilesDir&"\AIMP3\Uninstall.exe", @ProgramsCommonDir&"\AIMP3\Uninstall.lnk", @ProgramFilesDir&"\AIMP3")
FileDelete(@ProgramFilesDir&"\AIMP3\Aimp3.10.reg")
Новый reg-файл прикреплен в архиве. Хотел еще залить обложки которые изпользолвал в скрипте, но не знаю куда... :(И чуть не забыл, перед тем как собрать инсталлятор нужно скопировать папку AIMP3 с настройками ( которая находится в Aplication Data) в папку с установленой программой.
 

chymax3m

Новичок
Сообщения
26
Репутация
1
Вот, перевел reg-файл в скрипт с относительными путями, и доработал общий скрипт для версии AIMP 3.10.1065
P.S. В скрипте присутсвует строчка включения в сборку lame_enc.dll - модуля кодирования в mp3, который является безплатным, но по словам разработчиков не вошел в официальный релиз по причине патентных ограничений. Его Вы можете найти в файловом архиве, директории "Разное". Для коректной работы этот модуль нужно поместить в соответствующую папку с программой (см.скрипт). Там же (в файловом архиве) Вы найдете и обложки для AIMP3 которые использовались мною.
 

querubin_new

Новичок
Сообщения
10
Репутация
0
если будет интересно - дополню своим вариантом. при нажатии кнопи о определеннным координатам - есть один нюанс - если изменить тему виндовс то координаты изменяются и мышь клацает не на кнопке а выше или ниже. я делал так. перед становкой меняю тему на "классическую" а после установки все возвращаю назад. может кому пригодится. :whistle:
 

Ekoller

Новичок
Сообщения
1
Репутация
0
Еще один скрипт, работает на v3 Autoit. выложил для примера (для тех кто начинает так же как и я) вполне работает но естественно не доработан.
Код:
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
AutoItSetOption("TrayIconHide", 1)
AutoItSetOption("TrayIconDebug", 1)
AutoItSetOption("SendKeyDelay", 0)
AutoItSetOption("WinTitleMatchMode", 2)

AutoItSetOption ("PixelCoordMode", 0)

If ProcessExists ( "ps.exe" )<>0 Then
     ProcessClose ( "ps.exe" )
     ProcessWaitClose ( "ps.exe" )
EndIf


WinMinimizeAll (  )


Global $default=1, $file='aimp_3.10.1061.exe'
If $default=0 Then
RunWait(@ScriptDir&'\'&$file &' /S /D=' )
Else
Run(@ScriptDir&'\'&$file &' /D=' )
WinWait("Select Language")
If WinWaitActive("Select Language") Then WinWaitActive("Select Language")
WinWaitActive("Select Language") 
MouseClick("primary", 720, 540, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
MouseClick("primary", 900, 610, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
MouseClick("primary", 475, 562, 1, 0)
MouseClick("primary", 900, 610, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
MouseClick("primary", 900, 610, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
MouseClick("primary", 900, 610, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
MouseClick("primary", 900, 610, 1, 0)

WinWait("Мастер установки AIMP3")
If WinWaitActive("Мастер установки AIMP3") Then WinWaitActive("Мастер установки AIMP3")
WinWaitActive("Мастер установки AIMP3")
Sleep(12000)
MouseClick("primary", 655, 365, 1, 0)
MouseClick("primary", 910, 610, 1, 0)

WinWaitClose("Мастер установки AIMP3")

If @OSType="WIN32_NT" Then BlockInput ( 0 )
MsgBox ( 0x0, "Установлен", "Программа AIMP установленна" )
EndIf
 
Верх