下面是tcl语句的for循环500次里套用if条件的语句：（具体是一共执行500次，前200次执行重启onu、200-300重启pon板、300-400shuntdown与undo shuntdwon接口、400-500是重启pon板）
for {set i 0} {$i<500} {incr i} {
puts $i
if {$i<200} {
puts "mgt reset"
tsend "en"
tsend "onu 6/5/3"
tsend "mgt reset"
tsend "exit"
after 300
} elseif {$i>200 && $i<300} {
puts "reset pon"
tsend "en"
tsend "pon 6/5"
tsend "reset pon"
tsend "Y"
tsend "exit"
after 300
} elseif {$i>300 && $i<400} {
puts "shutdown pon port"
tsend "en"
tsend "pon 6/5"
tsend "shutdown pon port"
tsend "undo shutdown pon port"
tsend "exit"
after 300
} else {
puts "reboot"
tsend "en"
tsend "reboot 6"
after 300
}
}
提醒大家：tcl这语言错一个空格都不行，语句挺简单的注意格式