beating的个人空间 https://blog.eetop.wang/beat [收藏] [复制] [分享] [RSS]

空间首页 动态 记录 日志 相册 主题 分享 留言板 个人资料

日志

tcl test

热度 1已有 276 次阅读2020-4-18 17:41 |系统分类:技术

if {$argc >= 1} {

    set N 1

    foreach Arg$argv {

        putsstdout "$N: $Arg\n"

        set N[expr $N + 1]

        if{$Arg == "ring"} {

           puts stdout "\a"

        }

    }

} else {

    puts stdout"$argv0 \n"

}
————————————————
版权声明:本文为CSDN博主「badman250」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/notbaron/article/details/78299373


1

点赞

刚表态过的朋友 (1 人)

评论 (0 个评论)

facelist

您需要登录后才可以评论 登录 | 注册

  • 关注TA
  • 加好友
  • 联系TA
  • 0

    月排名
  • 40

    总排名
  • 10

    关注
  • 3

    粉丝
  • 4

    好友
  • 3

    获赞
  • 14

    评论
  • 16

    收藏
  • 61

    访问数

关于我们| 小黑屋| 手机版| Archiver| 在线咨询| ET创芯网(EETOP) ( 京ICP备15035084号 京公网安备:11010502037710 )

GMT+8, 2021-11-27 07:34 , Processed in 0.059835 second(s), 20 queries , Redis On.

eetop公众号 创芯大讲堂 创芯人才网
返回顶部