DO RANDOMIZE TIMER 10 IF CINT(RND) = 1 THEN GOSUB valg1 20 IF CINT(RND) = 0 THEN GOSUB valg2 valg1: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg11 IF CINT(RND) = 0 THEN GOSUB valg12 valg2: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg21 IF CINT(RND) = 0 THEN GOSUB valg22 valg11: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg111 IF CINT(RND) = 0 THEN GOSUB valg112 valg12: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg121 IF CINT(RND) = 0 THEN GOSUB valg122 valg21: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg211 IF CINT(RND) = 0 THEN GOSUB valg212 valg22: RANDOMIZE TIMER IF CINT(RND) = 1 THEN GOSUB valg221 IF CINT(RND) = 0 THEN GOSUB valg222 GOTO 100 valg111: PRINT "1"; valg112: PRINT "2"; valg121: PRINT "3"; valg122: PRINT "4"; valg211: PRINT "5"; valg212: PRINT "6"; valg221: PRINT "7"; valg222: PRINT "8"; 100 CLEAR a = 10 200 a = a - 1 IF NOT a = 0 THEN GOTO 200 LOOP