花了几分钟写的.. 觉得好给个好评哈.
[e]
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 I, 逻辑型
.局部变量 II, 文本型, , , 用来放置返回的文本
I = 子程序1 (“你好”, 2, II)
调试输出 (I)
调试输出 (II)
II = 子程序2 (“你好”, 2)
调试输出 (II)
.子程序 子程序1, 逻辑型, , 放入一个文本,生成多少倍的重复文本,成功返回真
.参数 要重复的文本, 文本型, , 传递给子程序1的数据
.参数 重复次数, 整数型, , 传递给子程序1的另外一个数据
.参数 生成的文本, 文本型, , 用来放置返回的数据
.如果真 (要重复的文本 = “”)
返回 (假) ' 如果没有内容,就停止了. 返回一个假
.如果真结束
生成的文本 = 取重复文本 (重复次数, 要重复的文本)
返回 (真)
.子程序 子程序2, 文本型, , 放入一个文本,生成多少倍的重复文本,成功返回真
.参数 要重复的文本, 文本型, , 传递给子程序1的数据
.参数 重复次数, 整数型, , 传递给子程序1的另外一个数据
.局部变量 临时文本, 文本型
临时文本 = 取重复文本 (重复次数, 要重复的文本)
' 要重复的文本 = 取重复文本 (重复次数, 要重复的文本) 如果运行这一行,那么会把传递来的参数改变. 具体的可以自己去实验
返回 (临时文本)
[/e]
|