CryScript類lua語法的腳本

cryscript  是用delphi開發(fā)的類lua語法的腳本，基于原型繼承支持遞歸支持閉包支持垃圾回收的腳本語言。以實現(xiàn)為目的，沒參考任何代碼，所有的實現(xiàn)就是用最簡潔的，最能想到的方法實現(xiàn)的。

#計算裴波那契數列前46位，算10次
i=10;
while i <> 0 do
k=46;
a=1;
b=1;
while k <> 0 do
write a;
c=b;
b=a+b;
a=c;
k=k-1;
end;
i=i-1;
end;

#閉包

add2 = function()
var i = 100;
function add(c)
i = c+ i;
return i;
end;
i = i - 80;
return add;
end;
d = add2;
c= add2();
write c(1);
write c(1);