金字塔的全局變量又失靈了，不停的輸出 inited。

代碼：GLOBALVARIABLE: inited=0;
//VARIABLE: inited=0;
IF inited = 0 THEN BEGIN
 MSGOUT(1, 'inited! ');
 inited = 1;
END;

inited = 1;
這句是判斷

要賦值為1寫成這樣，加個冒號

inited := 1;