sono riuscito a caricare gli array giusti cambiano il codice da così
9026 IF MENU$ = "Classico" THEN Q$ = C$
9027 IF MENU$ = "Classico" THEN R$ = D$
9028 IF MENU$ = "Storia" THEN Q$ = E$
9029 IF MENU$ = "Storia" THEN R$ = F$
9030 IF MENU$ = "Calcio" THEN Q$ = G$
9031 IF MENU$ = "Calcio" THEN R$ = H$
9032 IF MENU$ = "Musica" THEN Q$ = M$
9033 IF MENU$ = "Musica" THEN R$ = N$
9034 IF MENU$ = "Videogame" THEN Q$ = O$
9035 IF MENU$ = "Videogame" THEN R$ = P$
a così
9028 IF MENU$ = "Classico" THEN FOR I = 1 TO 30: FOR J = 1 TO 5: Q$(I, J) = C$(I, J): NEXT J, I: FOR I = 1 TO 30: R$(I) = D$(I): NEXT I
9029 IF MENU$ = "Storia" THEN FOR I = 1 TO 30: FOR J = 1 TO 5: Q$(I, J) = E$(I, J): NEXT J, I: FOR I = 1 TO 30: R$(I) = F$(I): NEXT I
9030 IF MENU$ = "Calcio" THEN FOR I = 1 TO 30: FOR J = 1 TO 5: Q$(I, J) = G$(I, J): NEXT J, I: FOR I = 1 TO 30: R$(I) = H$(I): NEXT I
9031 IF MENU$ = "Musica" THEN FOR I = 1 TO 30: FOR J = 1 TO 5: Q$(I, J) = M$(I, J): NEXT J, I: FOR I = 1 TO 30: R$(I) = N$(I): NEXT I
9032 IF MENU$ = "Videogame" THEN FOR I = 1 TO 30: FOR J = 1 TO 5: Q$(I, J) = O$(I, J): NEXT J, I: FOR I = 1 TO 30: R$(I) = P$(I): NEXT I.
ora devo capire perchè I non cambia dopo la risposta