DIM p(6)
DIM p$(6)
p$(0) = "Payload#0": p$(1) = "Payload#1"
p$(2) = "Payload#2": p$(3) = "Payload#3"
p$(4) = "Payload#4": p$(5) = "Payload#5"
p$(6) = "Payload#6"
DIM q(6)
DIM t(2, 3)
t(0, 0) = 1: t(0, 1) = 2
t(1, 0) = 3: t(1, 1) = 4: t(1, 2) = 1
t(2, 0) = 5

FOR i = 0 TO 2
    FOR j = 0 TO 3
        IF t(i, j) <> 0 THEN
            q(t(i, j)) = -1
            t(i, j) = t(i, j) + 1
        END IF
    NEXT j
NEXT i

FOR i = 0 TO 2
    FOR j = 0 TO 3
        IF t(i, j) <> 0 THEN PRINT p$(t(i, j) - 1); " ";
    NEXT j
    PRINT
NEXT i

FOR i = 0 TO 6
    IF q(i) = 0 THEN PRINT p$(i); " is not used"
NEXT i