摘要: lesson 12 : upvar的学习 example ① upvar 很象c语言的引用传参,我用一个例子说明set a 1 ;#定义变量a, 并且值设为1proc test {b} {upvar $b myaputs $bputs $mya}test a ;#调用函数 testa ;#参数b的值 阅读全文
posted @ 2016-08-02 23:16 用不着为这点小事烦恼 阅读(5560) 评论(1) 推荐(0) 编辑
摘要: lesson 11 : proc应用 (带默认参数) 1.//使用过程的时候,不一定输入所有的参数值。过程的输入参数可以有默认值。默认值由{默认参数名 默认值}指定。如果调用过程时没有指定这些参数的值则会使用其默认值,否则使用输入值来替代默认值。在使用默认参数的时候要注意,如果默认参数之后还有非默认 阅读全文
posted @ 2016-08-02 23:13 用不着为这点小事烦恼 阅读(9406) 评论(0) 推荐(0) 编辑
摘要: lesson 10 :proc 子函数的使用 1. proc sum {arg1 arg2} { set x [expr $arg1+$arg2]; return $x } puts " The sum of 2 + 3 is: [sum 2 3]\n\n" //[语法] :proc procNam 阅读全文
posted @ 2016-08-02 23:12 用不着为这点小事烦恼 阅读(4763) 评论(0) 推荐(0) 编辑
摘要: lesson8 :while循环的使用 1. set x 1;while {$x < 5} { puts "x is $x"; set x [expr $x + 1] }//tcl里面的while 记得以{结束第一行,原因是告诉编译器这段话没结束 2. set x 0;while "$x < 5" 阅读全文
posted @ 2016-08-02 23:11 用不着为这点小事烦恼 阅读(2810) 评论(0) 推荐(0) 编辑
摘要: lesson9 :for循环的学习 for {puts "Start"; set i 0} {$i < 2} {incr i; puts "I after incr: $i"; } { puts "I inside first loop: $i" } //和c一样 有三个条件 ;# Because 阅读全文
posted @ 2016-08-02 23:11 用不着为这点小事烦恼 阅读(4276) 评论(0) 推荐(0) 编辑
摘要: lesson 7 : if的学习 1. set x 1; if {$x == 2} {puts "$x is 2"} else {puts "$x is not 2"} if {$x != 1} { puts "$x is != 1" } else { puts "$x is 1" }//if的基本 阅读全文
posted @ 2016-08-02 23:10 用不着为这点小事烦恼 阅读(2406) 评论(0) 推荐(0) 编辑
摘要: lesson 6 :switch 的用法 ;# Set the variables we'll be comparingset x "ONE";set y 1;set z "ONE";//例子的基本数值 1. switch $x \ "ONE" "puts ONE=1" \ "TWO" "puts 阅读全文
posted @ 2016-08-02 23:09 用不着为这点小事烦恼 阅读(1673) 评论(0) 推荐(0) 编辑
摘要: lesson 4 1. set x "abc"puts "A simple substitution: $x\n"//简单的例子 2. set y [set x "def"]puts "Remember that set returns the new value of the variable: 阅读全文
posted @ 2016-08-02 23:08 用不着为这点小事烦恼 阅读(1695) 评论(0) 推荐(0) 编辑
摘要: lesson 5 :基本数学计算 1. set X 100;set Y 256;set Z [expr "$Y + $X"]//亦可以写成 set Z [expr {$Y +$X}] 2. set Z_LABEL "$Y plus $X is "puts "$Z_LABEL $Z"puts "The 阅读全文
posted @ 2016-08-02 23:08 用不着为这点小事烦恼 阅读(1740) 评论(0) 推荐(0) 编辑
摘要: lesson 3 example ①: set Z "zhou li "set Z_LABEL "is a boy " puts "\n................. examples of differences between \" and \{"puts "$Z_LABEL $Z"puts 阅读全文
posted @ 2016-08-02 23:06 用不着为这点小事烦恼 阅读(1107) 评论(0) 推荐(0) 编辑
摘要: lesson 2 :特殊符号学习 ! example ① : set Z "zhou li "set Z_LABEL "boy " puts "$Z_LABEL $Z"puts "$Z_LABEL \$Z" // 可通过 \将特殊符号输出,和C语言一样 example ② : 1. puts "\n 阅读全文
posted @ 2016-08-02 23:05 用不着为这点小事烦恼 阅读(1929) 评论(0) 推荐(0) 编辑
摘要: set X "this is a boy "set Y "zhouli "puts $Xputs $Y set label "the value in Y is: " puts "$label $Y" // 总结 : 1. #注释2. tcl不支持.net中的形如int , double ,char 阅读全文
posted @ 2016-08-02 23:02 用不着为这点小事烦恼 阅读(877) 评论(0) 推荐(0) 编辑