and add this code to the begining
C=4
RESTORE C0
IF C=3 THEN RESTORE C3
IF C=4 THEN RESTORE C4
C0: DATA 0
C3: DATA 6,1,2,1,3,2,3,2,1,3,1,3,2
C4: DATA 12,1,2,1,3,2,3,2,4,3,4,3,1,3,2,4,2,4,1,4,3,2,1,1,4
READ No
FOR I=1 TO No
READ D(2*I-1),D(2*I)
NEXT I
