порутчик,
Цитата(порутчик @ 24.9.09, 13:38) Я не нашел в скриптах где стартует портсплитер. если выключить в IGO приемник и стартануть самому сплитер то он цепляется за сом7 и отдает на 5 и 6 сом, потом можно запустить две нави-проги, у меня например Гармин с Навителом запустились, но IGO надо перестартовывать и sys править на сом5 например.
Одним словом сплитер надо в скриптах, раньше Igo запускать sys править и тогда должно работать.
Я тоже посмотрел скрипты не нашел нигде запуск portsplitter вставил запуск в autoran.mscr (перед #Check regkey) так как в start.ui он запускается раньше чем активизируется приемник IGO. подправил sys.txt (com5) и для навитела указал com6. Попробывал вроде работает.
................
#PortSplitter
Run(folder\"PSplitter\portsplit.exe")
Serhy
В скачанном мною архиве avic_net_12b в авторане этого нет заканчивается на запуске ланчера по значению ключа в реестре так что доделал самостоятельноSerhy,
я тоже не нашел вот он весь:
Errorlevel("warn")
folder=SystemPath("ScriptPath")#Check inifile
If(NOT FileExists("\Windows\_reset"))
#Copy system files
XCopy(folder\"CE5\*.*","\Windows",TRUE,TRUE)
EndIf
reset=ReadFile("\Windows\_reset",1)#Check regkey
If(NOT RegKeyExists("HKCR","MortScript"))
#Set registry keys
ForEach regFile in files(folder\"Registry\*.reg")
Run(folder\"regedit.exe","-s "&""""&regFile&"""")
EndForEach#Set default keyboard
RunWait("My Flash Disk\System\Resco\setsip.exe")
RegDeleteKey("HKCR","CLSID\{42429667-ae04-11d0-a4f8-00aa00a749b9}",TRUE,TRUE)#Init dialup params
inifile="\My Flash Disk\System\avic.ini"
If(FileExists("\Storage Card\Avic\avic.ini"))
Copy("\Storage Card\Avic\avic.ini",inifile,TRUE)
ElseIf(NOT FileExists(inifile))
IniWrite(inifile,"DialUp","Name","")
IniWrite(inifile,"DialUp","Auto","no")
IniWrite(inifile,"Launcher","Start","no")
EndIf
name=IniRead(inifile,"DialUp","Name")
login=IniRead(inifile,"DialUp","Login")
pass=IniRead(inifile,"DialUp","Pass")
phone=IniRead(inifile,"DialUp","Phone")
inistr=IniRead(inifile,"DialUp","String")
auto=IniRead(inifile,"DialUp","Auto")
launch=IniRead(inifile,"Launcher","Start")
If(name ne "")
If(auto ne "" && auto ne "no" && auto ne "0")
RegWriteString("HKLM","Comm\Autoras","RasEntry","DialUp")
EndIf Run("\Windows\rnaapp.exe","-eDialUp")
WaitFor("Dial-Up Connection",2)
i=1
Repeat(0)
If(WndActive("Dial-Up Connection"))
if(i=1)
SendKeys("Dial-Up Connection",login)
i=i+1
EndRepeat
elseif(i=2)
SendTab("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=3)
SendKeys("Dial-Up Connection",pass)
i=i+1
EndRepeat
elseif(i=4)
SendTab("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=5)
SendTab("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=6)
SendSpace("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=7)
SendTab("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=8)
SendTab("Dial-Up Connection")
i=i+1
EndRepeat
elseif(i=9)
SendCR("Dial-Up Connection")
endif
Else
Show("Dial-Up Connection")
EndRepeat
EndIf
WaitFor("Remote Networking",2)
Repeat(0)
If(WndActive("Remote Networking"))
SendOk("Remote Networking")
Else
Show("Remote Networking")
EndRepeat
EndIf
Sleep(100)
EndIf#Reset
If(launch ne "" && launch ne "no" && launch ne "0")
RunWait(folder\"launcher.exe")
Else
RunWait(folder\"qsoftreset.exe")
EndIf
Else#Init dialup params 2
If(reset ne "1")
inifile="\My Flash Disk\System\avic.ini"
name=IniRead(inifile,"DialUp","Name")
If(name ne "")
phone=IniRead(inifile,"DialUp","Phone")
inistr=IniRead(inifile,"DialUp","String")
Run("\Windows\connmc.exe")
WaitFor("Network Connections",2)
i=1
Repeat(0)
if(WndActive("Network Connections"))
if(i=1)
SendRight("Network Connections")
i=i+1
EndRepeat
elseif(i=2)
SendSpecial("Alt","Down")
i=i+1
EndRepeat
elseif(i=3)
SendSpecial("Alt","Up")
i=i+1
EndRepeat
elseif(i=4)
SendKeys("Network Connections","r")
endif
Else
Show("Network Connections")
EndRepeat
EndIf
Sleep(100)
WaitFor("DialUp Properties",2)
i=1
Repeat(0)
if(WndActive("DialUp Properties"))
if(i=1)
SendTab("DialUp Properties")
i=i+1
EndRepeat
elseif(i=2)
SendCR("DialUp Properties")
endif
Else
Show("DialUp Properties")
EndRepeat
EndIf
Sleep(100)
WaitFor("Device Properties",2)
i=1
Repeat(0)
if(WndActive("Device Properties"))
if(i=1)
SendSpecial("Ctrl","Down")
i=i+1
EndRepeat
elseif(i=2)
SendTab("Device Properties")
i=i+1
EndRepeat
elseif(i=3)
SendSpecial("Ctrl","Up")
i=i+1
EndRepeat
elseif(i=4)
SendTab("Device Properties")
i=i+1
EndRepeat
elseif(i=5)
SendTab("Device Properties")
i=i+1
EndRepeat
elseif(i=6)
SendTab("Device Properties")
i=i+1
EndRepeat
elseif(i=7)
SendTab("Device Properties")
i=i+1
EndRepeat
elseif(i=8)
SendKeys("Device Properties",inistr)
i=i+1
EndRepeat
elseif(i=9)
SendOK("Device Properties")
endif
Else
Show("Device Properties")
EndRepeat
EndIf
Sleep(100)
i=1
Repeat(0)
if(WndActive("DialUp Properties"))
if(i=1)
SendSpecial("Ctrl","Down")
i=i+1
EndRepeat
elseif(i=2)
SendTab("DialUp Properties")
i=i+1
EndRepeat
elseif(i=3)
SendSpecial("Ctrl","Up")
i=i+1
EndRepeat
elseif(i=4)
SendTab("DialUp Properties")
i=i+1
EndRepeat
elseif(i=5)
SendTab("DialUp Properties")
i=i+1
EndRepeat
elseif(i=6)
SendKeys("DialUp Properties",phone)
i=i+1
EndRepeat
elseif(i=7)
SendCR("DialUp Properties")
endif
Else
Show("DialUp Properties")
EndRepeat
EndIf
Sleep(100)
EndIf
WriteFile("\Windows\_reset","1")
EndIf#Launcher
launch=IniRead("\My Flash Disk\System\avic.ini","Launcher","Start")
If(launch ne "" && launch ne "no" && launch ne "0")
Run(folder\"launcher.exe")
EndIf
EndIf

Установить Навител, IGo8, Навител Навигатор, City Guide, Ozi Explorer в свой любимый телефон Nokia

 
 
Hosted by uCoz