const.tpl

来自「在手机操作系统symbina上使用的一个脚本扩展语言的代码实现,可以参考用于自己」· TPL 代码 · 共 13 行

const i%=1
const l&=1
const l1&=&1
const f1=1
const f2=&1
const f3=1.0
const fred$="fred"

proc x$:
print i%+l&+l1&+f1+f2+f3
return fred$
endp