<TEST>
       O;PICTURE;60;SAMPLE;ESC;IR;S;4;29;ATR;P;C;1;
       LET V1="# ";LET V2=V1+V1;LET X2=T;
       FOR X1=H TO 18;
            LET [X1,1]=V1;LET V1=V1+V2;FILL;@%X1;%X2;1;Y;LET X2=X2-1;
       NEXT;
   STOP

1. 60行1列、データ行29の表の1列に文字位置中央の属性をつけておきます。
2. FOR NEXTでH行は#を1個、次から18行まで2個づづ増やしていきます。
   同じに最終行(X2=T)から１行宛、さかのぼった行(X2=X2-1)にH行から18行までのデータを@でコピーします。