SecureCRT录制的安卓电视切换台脚本

SecureCRT 软件自带录制脚本的功能，加上一个简单的循环语句就可以进行简单的自动化执行效果

切换频道加减：

#$language = "VBScript"
#$interface = "1.0"

crt.Screen.Synchronous = True

' This automatically generated script may need to be
' edited in order to work correctly.

Sub Main
Do While(1)
	crt.Screen.Send "input keyevent 166" & chr(13)
	crt.Screen.Send chr(13)
	crt.Screen.WaitForString "root@CVTM638_1024_PHILIPS_U802:/ # "
	crt.Sleep 3000
	crt.Screen.Send "input keyevent 166" & chr(13)
	crt.Sleep 3000
	crt.Screen.Send chr(13)
	crt.Screen.WaitForString "root@CVTM638_1024_PHILIPS_U802:/ # "
	crt.Screen.Send "input keyevent 166" & chr(13)
	crt.Screen.WaitForString "root@CVTM638_1024_PHILIPS_U802:/ # "
	crt.Screen.Send "input keyevent 167" & chr(13)
	crt.Sleep 3000
	crt.Screen.Send chr(13)
		Loop
'crt.Screen.Synchronous = False	
		
End Sub

　

通过运行安卓原生key，输入keyevent事件，达到免除遥控器使用效果。