Loading 效果 - Tcl 篇

有時候在工具里看到Loading 的效果,就像這樣:

如何實現呢?

其實我們使用的是Tcl 的n 和r 在Unix 中的不同含義,配合flush stdout 做出的效果。

測試代碼具體如下:

set width 50nfor {set i 0} {$i <= $width} {incr i} {n set s [format "[%-*s][%3d]" $width [string repeat * $i] [expr {$i*100/$width}] ]n puts -nonewline "$sr"n flush stdoutn after 200n}n

Share The Value From QFqfshare.com圖標

好久沒怎麼更的博客重新起來,媒體越來越多樣化,但是文字的魅力只會增不會減。

推薦閱讀:

IC 工程師有一台VPS可以做什麼
CAD到底用哪個版本好?關於CAD版本的兩三事兒!
如何成為一名優秀的中央空調設計師?
CAD有哪些經典視頻?
用 CAD 繪圖如何有效的控制精度?

TAG:CAD | IC设计师 | 数字IC设计 |