; 一度確保した配列に要素を追加できるか確認
; 要素の追加は無理っぽい。エラーになる

    onkey goto *jobend

    dim a, 5, 4
    repeat 5
        a(cnt, 0) = cnt
        a(cnt, 1) = cnt
        a(cnt, 2) = cnt
        a(cnt, 3) = cnt
    loop

    ; エラーになる
    ; a(5, 0) = 5

    repeat length(a)
        pos 4, cnt * 24
        mes "a(" + cnt + ", 0)=" + a(cnt, 0)
    loop
    stop
    
*jobend
    end