请教如何定义和使用全局变量？

ilyjyz

如题，请赐教。谢谢！

549597890

正常情况普通的basic跟lua的变量在本文档内有效. lib里面的程序全局有效。ndless会者来讲。你在问哪一种？

ilyjyz

本人刚接触TI程序设计，不甚清楚lib和ndless，所指何物？
以以下程序为例，请请指教如何正确打印调用move函数的次数：
Define recursion()=
Prgm
Request "有多少个盘子?",i

Disp "一共需要移动"&string(s)&"次"
EndPrgm


Define hanoi(n,a,b,c)=
Func
If n=1 Then
move(a,c)
Else
hanoi(n-1,a,c,b)
move(a,c)
hanoi(n-1,b,a,c)
EndIf
:EndFunc



Define move(x,y)=
Func
Disp x&"移至"&y
Return 0
EndFunc

ilyjyz

549597890 发表于 2014-3-24 15:19
正常情况普通的basic跟lua的变量在本文档内有效. lib里面的程序全局有效。ndless会者来讲。你在问哪一种？

我想算出移动的步数

549597890

ilyjyz 发表于 2014-3-24 15:29
我想算出移动的步数

介绍一下程序目的？

549597890

549597890 发表于 2014-3-24 15:46
介绍一下程序目的？

hold on...

ilyjyz

换一个简单的例子：
Define move()=
Func
s=s+1
Return 0
EndFunc


Define main()=
Prgm
s：=0
move()
Disp s
EndPrgm

为何main程序输出的s还是为0？

ilyjyz

549597890 发表于 2014-3-24 16:03
hold on...

换用上面一个更简单的例子，为何move函数无法修改变量s?请指教

549597890

印象里func是计算器输入行直接输入然后返回一个值显示在结果位，prgm是正式编译ti-basic、

初步测试发现func用的是本程序内局部变量，prgm是文档内通用变量，可以暂时当全局用

Define move()=
Prgm
1→s
EndPrgm

Define main()=
Prgm
s：=0
move()
Disp s
EndPrgm


输出s为1

549597890

保留一个习惯  编好后测试前按住ctrl+B  快速保存程序代码并进行初步测试

ilyjyz

受教了，谢谢！