Tcl编写循环执行某个任务的脚本

现在要执行设备执行20次某个人物，然后让设备强制重启,等待20分钟让设备重启完全启动，一直循环10000次，
查看任务在执行的时候会不会出现自己预期的现象:

for {set i 1} {$i < 10000} {incr i} {    tsend "\n"    for {set j 1} {$j < 20} {incr j} {        tsend "执行任务1"        after 2000        tsend "执行任务2"        after 2000    }    tsend "reboot force"    tsend "\n\n"    tsend " "    tsend "Y"    after 120000    tsend "\n\n"    tsend " "   }