14: status_up = "up" 15: status_down = "down" 16: test_data = "01:12" 17: 18: crt.Screen.Synchronous = True 19: 20:Do 21: crt.Screen.Send cmd_show_chassis & vbCr 22:ifcrt.Screen.WaitForString(status_down, 5)then 23: crt.Screen.Send vbCr 24: crt.Sleep 10000 25:else 26:...
crt.Screen.Send "cat /proc/meminfo" & chr(13) crt.Sleep 3000 crt.Screen.Send "cat /proc/2189/status" & chr(13) crt.Sleep 3000 crt.Screen.Send "cat /proc/2191/status" & chr(13) crt.Sleep 3000 crt.Screen.Send "cat /proc/1777/status" & chr(13) crt.Sleep 10000 WEnd End Sub...
‘Set Interval crt.sleep 10000 crt.Screen.Send vbCr crt.Screen.Send “copy run flash:run” & vbCr & vbCr & vbCr ‘Set Interval crt.sleep 10000 crt.Screen.Send vbCr Next End Sub 随后打开Crt,登陆你的设备,点击Script ?> Run… ?> 选择这个脚本文件,就可以了。注意脚本文件可以保存为txt格式。
24: crt.Sleep 10000 1. 25: else 1. 26: exit do 1. 27: end if 1. 28: Loop 1. 29: 1. 30: crt.Dialog.MessageBox _ 1. 31: "GOOD." & vbcrlf & _ 1. 32: "All Cards is UP! Pelase Enjoy it Now..." 1. 33: 1. 34: crt.Screen.Synchronous = False 1. 35: End Sub 1....
忽然发现你忘了monitor session ,或者sh run 出来将近一万行命令，屏幕往回翻，又翻不了几页，这时，你可以修改一个参数，达到效果，具体如下：Options —> Global Options —> Edit default Settings进去后点Terminal —> Emulation 下面的Scroll back后面的数字自己修改好了，比如我选了10000，你也可以选更大的（...
crt.Sleep 10000 else exit do end if Loop REM Image Install crt.Screen.Send vbCr & vbCr & vbCr crt.Screen.Send cmd_image_install & vbCr crt.Screen.WaitForString "Do you want to install the image (y or n)?" crt.Screen.Send "yes" & vbCr ...
> Global Options ?> Edit default Settings进去后点Terminal ?> Emulation 下面的Scroll back后面的数字自己修改好了,比如我选了10000,你也可以选更大的(最大为32000),再点OK2、Map a Key注意:重启secureCRT有效。如果你是维护人员,需要登陆上百 打开APP,阅读全文并永久保存...
("校准电机...")time.sleep(15)ted.write("r axis0.current_state\n".encode('ascii'))axis0_current_state2=int(ted.readline().decode('ascii'))print("axis0.current_state modified:",axis0_current_state2,type(axis0_current_state2))#AXIS_STATE_CLOSED_LOOP_CONTROLted.write("w axis0....
unit is millisecondcrt.sleep 5000crt.Screen.Send vbCrcrt.Screen.Send “copy run start” & vbCr & vbCr & vbCrSet Intervalcrt.sleep 10000crt.Screen.Send vbCrcrt.Screen.Send “copy run flash:run” & vbCr & vbCr & vbCrSet Intervalcrt.sleep 10000crt.Screen.Send vbCrNextEnd Sub随后打开Crt,登陆...
‘Set Interval, unit is millisecond crt.sleep 5000 crt.Screen.Send vbCr crt.Screen.Send “copy run start” & vbCr & vbCr & vbCr ‘Set Interval crt.sleep 10000 crt.Screen.Send vbCr crt.Screen.Send “copy run flash:run” & vbCr & vbCr & vbCr ‘Set Interval crt.sleep 10000 crt.Screen...