SetChoiceEntryFormat( 30 , 20 , "Tahoma" )
RegReadDWord HKLM,System\State\Phone,Radio Ready State,radio
#message(radio)
if (radio <= 3)
Run("\Archivos de programa\vijay555\VJVolubilis\VJVolubilis.exe","-radioon")
Sleep(2500)
Run("\windows\ctlpnl.exe","cplmain.cpl,20,3")
respuesta = Choice( "Cambiar Linea","SIN SERVICIO",3,15,"Empresa","Particular","Salir" )
else
operador = RegRead( HKLM,"\System\State\Phone","Current Operator Name" )
#Message (operador)
respuesta = Choice( "Cambiar Linea","LINEA "&operador,3,15,"Empresa","Particular","Salir" )
endif
If(NOT (respuesta =3) )
Run("\Archivos de programa\vijay555\VJVolubilis\VJVolubilis.exe","-radiooff")
Sleep(1500)
Run("\Archivos de programa\vijay555\VJVolubilis\VJVolubilis.exe","-radioon")
Sleep(2500)
Run("\windows\ctlpnl.exe","cplmain.cpl,20,3")
If( respuesta =1 )
WaitForActive( "Teléfono",60 )
Sleep(1000)
#ESTE ES EL PIN DEL NUMERO DE EMPRESA "1234"
SendKeys( "1" )
Sleep(100)
SendKeys( "2" )
Sleep(100)
SendKeys( "3" )
Sleep(100)
SendKeys( "4" )
Sleep(500)
#FINAL PIN NUMERO EMPRESA
SendCR
EndIf
If( respuesta =2 )
WaitForActive( "Teléfono",60 )
RegWriteString HKCU, Software\xiho, linea, "Particular"
#ESTE ES EL PIN DEL NUMERO PARTICULAR "4567"
Sleep(1000)
SendKeys( "4" )
Sleep(100)
SendKeys( "5" )
Sleep(100)
SendKeys( "6" )
Sleep(100)
SendKeys( "7" )
Sleep(500)
#FINAL PIN NUMERO EMPRESA
SendCR
EndIf
Sleep(1000)
Minimize( "Teléfono")
EndIf
#SI USAS S2U2 LA SIGUIENTE LINEA LO ACTIVA CON PASSWORD
#Run("\Archivos de programa\S2U2\ilock2.exe","-password -slide")
