'TRULY RANDOM...ALL PIXELS CAN CHANGE. GAMEPAD 1 GLOBAL DECNUM, BASE4$ DIM GLOBAL FRAMES(31,31),BASE4LINES$(1) FOR Y=0 TO 31 READ BASE4LINES$(0) READ BASE4LINES$(1) FOR X=0 TO 31 BASE4$=MID$(BASE4LINES$(0),X*2+1,2)+MID$(BASE4LINES$(1),X*2+1,2) CALL TO_DEC(BASE4$) FRAMES(Y,X)=DECNUM CELL X,Y,FRAMES(Y,X) NEXT X NEXT Y QUIT=0 WHILE QUIT=0 IF BUTTON(0,1) THEN QUIT=-1 IF UP(0) AND SCROLL.Y(0)>0 THEN SCROLL 0,SCROLL.X(0),SCROLL.Y(0)-1 IF DOWN(0) AND SCROLL.Y(0)<128 THEN SCROLL 0,SCROLL.X(0),SCROLL.Y(0)+1 IF LEFT(0) AND SCROLL.X(0)>0 THEN SCROLL 0,SCROLL.X(0)-1,SCROLL.Y(0) IF RIGHT(0) AND SCROLL.X(0)<96 THEN SCROLL 0,SCROLL.X(0)+1,SCROLL.Y(0) WAIT VBL WEND END 'CONVERT FROM 4 CHARACTER BASE 4 TO DEC SUB TO_DEC(BASE4$) DECNUM=0 DECNUM=VAL(MID$(BASE4$,1,1))*64 DECNUM=DECNUM+VAL(MID$(BASE4$,2,1))*16 DECNUM=DECNUM+VAL(MID$(BASE4$,3,1))*4 DECNUM=DECNUM+VAL(MID$(BASE4$,4,1)) 'PRINT "BASE4 : "+BASE4$ 'PRINT "DEC : "+STR$(DECNUM) END SUB '--- 'FRAME 0 'LINE 0 TO 9 * + * + * + * + * + * - DATA "1111111111111111111120001111111111111111111111111111111111111111" DATA "1111111111111111112011120011111111111111111111111111111111111111" DATA "1111111111111111121111222201111111111111111111111111111111111111" DATA "1111111111111111101122222220011111111111111111111111111111111111" DATA "1111111111111111013222002222200001111111111111111111111111111111" ' * + * + * + * + * + * DATA "1111111111111111020222022222022220111111111111111111111111111111" DATA "1111111111111110222222222222200002011111111111111111111111111111" DATA "1111111111111110200222000222220010201111111111111111111111111111" DATA "1111111111111110022000222002222011201111111111111111111111111111" DATA "1111111111111111012222222200022201001111111111111111111111111111" 'LINE 10 TO 19 * + * + * + * + * + * DATA "1111111111111111012222222222002220220111111111111111111111111111" DATA "1111111111111111211222222222220222020111111111111111111111111111" DATA "1111111111111111101222222222222022222011111111111111111111111111" DATA "1111111111111111101222222222222022222201111100011111111111111111" DATA "1111111111111111110222222222222202220220111011200111111111111111" ' * + * + * + * + * + * DATA "1111111111111111000022222222222202220222011011222001111111111111" DATA "1111111111111110110102222222222222202222011102222220011111111111" DATA "1111111111111101122110222222222222200022011110222222200111111111" DATA "1111111111110011222011022222222222011100111110220002222011111111" DATA "1111111111001122220111322222222220111111111110200300022201111111" 'LINE 20 TO 29 * + * + * + * + * + * DATA "1111111100222222201111102222222220111111111110203030300220111111" DATA "1111111022220002201111102222222201111111111102200303020022011111" DATA "1111110222000030201111110222222201111111111102203030303002201111" DATA "1111102220003330201111110222222201111111111102000303033300201111" DATA "1111322200333330220111110222222201111111111022003033333330220111" ' * + * + * + * + * + * DATA "1111022003333333020111110222222201111111111022033333333330020111" DATA "1113220033333333022011110122222201111111110220033333333333022011" DATA "1110200333333333302011110212222201111111110220000333333333002011" DATA "1102203333333333302201110122222220111111102200333003333333302011" DATA "1102003333333300000220010112222220111111022200033330333333302201" 'LINE 30 TO 39 * + * + * + * + * + * DATA "1022033333330033300022200121222220111000220000103333333333330201" DATA "1020033333333333333002220112122222010202220201110333333333330201" DATA "1020333330033333330300201121212222200222200201100333333333330220" DATA "0220333301100333333030001112122222220022013220023003333333333020" DATA "0203333301102003030300001121212222222220111322222110333333333020" ' * + * + * + * + * + * DATA "0203333001022200303030002112122222220020111122220111033333333020" DATA "0203000220222011030302022211222222211100011000220110000033333020" DATA "0200101222222011003002022222222222111122200222022200222200033020" DATA "1001101022202200030020222222222222211222222222200010222220103020" DATA "1111101102202022202220222222222222222222222222011110222220110220" 'LINE 40 TO 49 * + * + * + * + * + * DATA "1111110002220222220202222222222222222222222200111102222220110220" DATA "1111111110000222220202221111122222222002220011111101222220111001" DATA "1111111111111002220202111111111222222220000111111101222220111111" DATA "1111111111111110001021111111111112222222201111111011222220111111" DATA "1111111111111111111021111111111111222222220111111011222210111111" ' * + * + * + * + * + * DATA "1111111111111111111211111111111111222200222001110112222201111111" DATA "1111111111111111110011111111111111120022222220101112222201111111" DATA "1111111111111111101011111111111111102111122222011122222201111111" DATA "1111111111111111021011111111111111021111112222202222222101111111" DATA "1111111111111111011201111111111111011111112222220222222011111111" 'LINE 50 TO 59 * + * + * + * + * + * DATA "1111111111111110221201111111111110211111112222220222221011111111" DATA "1111111111111110222220111111111110221212122222222022221011111111" DATA "1111111111111110222220111111111110222121222222222022220111111111" DATA "1111111111111110222222011111111111022222222222222202210111111111" DATA "1111111111111111022222201111111111022222222222222202201111111111" ' * + * + * + * + * + * DATA "1111111111111111022222220111111121202222222222222202101111111111" DATA "1111111111111111100222222001121212120222222222222021011111111111" DATA "1111111111111110022000222220012121222002002222222010111111111111" DATA "1111111111111103233322332222200022222200222332233201111111111111" DATA "1111111111111011301130113222201100000020130110011203333111111111" 'LINE 60 T0 63 * + * + * + * + * + * DATA "1111111111111100011101110220033333022201101110110200000033111111" DATA "1111111111111111000000000000003333300000000000000000003311111111" ' * + * + * + * + * + * DATA "1111111111111000000000000000003333330000000000000003331111111111" DATA "1111111111000000000000000000000033333300000000000033111111111111" #2:MAIN CHARACTERS 00000000000000000000000000000000 000000000F0F0F0F0000000000000000 0000000000000000000000000F0F0F0F 000000000F0F0F0F000000000F0F0F0F 00000000F0F0F0F00000000000000000 00000000FFFFFFFF0000000000000000 00000000F0F0F0F0000000000F0F0F0F 00000000FFFFFFFF000000000F0F0F0F 000000000000000000000000F0F0F0F0 000000000F0F0F0F00000000F0F0F0F0 000000000000000000000000FFFFFFFF 000000000F0F0F0F00000000FFFFFFFF 00000000F0F0F0F000000000F0F0F0F0 00000000FFFFFFFF00000000F0F0F0F0 00000000F0F0F0F000000000FFFFFFFF 00000000FFFFFFFF00000000FFFFFFFF 0F0F0F0F000000000000000000000000 0F0F0F0F0F0F0F0F0000000000000000 0F0F0F0F00000000000000000F0F0F0F 0F0F0F0F0F0F0F0F000000000F0F0F0F 0F0F0F0FF0F0F0F00000000000000000 0F0F0F0FFFFFFFFF0000000000000000 0F0F0F0FF0F0F0F0000000000F0F0F0F 0F0F0F0FFFFFFFFF000000000F0F0F0F 0F0F0F0F0000000000000000F0F0F0F0 0F0F0F0F0F0F0F0F00000000F0F0F0F0 0F0F0F0F0000000000000000FFFFFFFF 0F0F0F0F0F0F0F0F00000000FFFFFFFF 0F0F0F0FF0F0F0F000000000F0F0F0F0 0F0F0F0FFFFFFFFF00000000F0F0F0F0 0F0F0F0FF0F0F0F000000000FFFFFFFF 0F0F0F0FFFFFFFFF00000000FFFFFFFF 00000000000000000F0F0F0F00000000 000000000F0F0F0F0F0F0F0F00000000 00000000000000000F0F0F0F0F0F0F0F 000000000F0F0F0F0F0F0F0F0F0F0F0F 00000000F0F0F0F00F0F0F0F00000000 00000000FFFFFFFF0F0F0F0F00000000 00000000F0F0F0F00F0F0F0F0F0F0F0F 00000000FFFFFFFF0F0F0F0F0F0F0F0F 00000000000000000F0F0F0FF0F0F0F0 000000000F0F0F0F0F0F0F0FF0F0F0F0 00000000000000000F0F0F0FFFFFFFFF 000000000F0F0F0F0F0F0F0FFFFFFFFF 00000000F0F0F0F00F0F0F0FF0F0F0F0 00000000FFFFFFFF0F0F0F0FF0F0F0F0 00000000F0F0F0F00F0F0F0FFFFFFFFF 00000000FFFFFFFF0F0F0F0FFFFFFFFF 0F0F0F0F000000000F0F0F0F00000000 0F0F0F0F0F0F0F0F0F0F0F0F00000000 0F0F0F0F000000000F0F0F0F0F0F0F0F 0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F 0F0F0F0FF0F0F0F00F0F0F0F00000000 0F0F0F0FFFFFFFFF0F0F0F0F00000000 0F0F0F0FF0F0F0F00F0F0F0F0F0F0F0F 0F0F0F0FFFFFFFFF0F0F0F0F0F0F0F0F 0F0F0F0F000000000F0F0F0FF0F0F0F0 0F0F0F0F0F0F0F0F0F0F0F0FF0F0F0F0 0F0F0F0F000000000F0F0F0FFFFFFFFF 0F0F0F0F0F0F0F0F0F0F0F0FFFFFFFFF 0F0F0F0FF0F0F0F00F0F0F0FF0F0F0F0 0F0F0F0FFFFFFFFF0F0F0F0FF0F0F0F0 0F0F0F0FF0F0F0F00F0F0F0FFFFFFFFF 0F0F0F0FFFFFFFFF0F0F0F0FFFFFFFFF F0F0F0F0000000000000000000000000 F0F0F0F00F0F0F0F0000000000000000 F0F0F0F000000000000000000F0F0F0F F0F0F0F00F0F0F0F000000000F0F0F0F F0F0F0F0F0F0F0F00000000000000000 F0F0F0F0FFFFFFFF0000000000000000 F0F0F0F0F0F0F0F0000000000F0F0F0F F0F0F0F0FFFFFFFF000000000F0F0F0F F0F0F0F00000000000000000F0F0F0F0 F0F0F0F00F0F0F0F00000000F0F0F0F0 F0F0F0F00000000000000000FFFFFFFF F0F0F0F00F0F0F0F00000000FFFFFFFF F0F0F0F0F0F0F0F000000000F0F0F0F0 F0F0F0F0FFFFFFFF00000000F0F0F0F0 F0F0F0F0F0F0F0F000000000FFFFFFFF F0F0F0F0FFFFFFFF00000000FFFFFFFF FFFFFFFF000000000000000000000000 FFFFFFFF0F0F0F0F0000000000000000 FFFFFFFF00000000000000000F0F0F0F FFFFFFFF0F0F0F0F000000000F0F0F0F FFFFFFFFF0F0F0F00000000000000000 FFFFFFFFFFFFFFFF0000000000000000 FFFFFFFFF0F0F0F0000000000F0F0F0F FFFFFFFFFFFFFFFF000000000F0F0F0F FFFFFFFF0000000000000000F0F0F0F0 FFFFFFFF0F0F0F0F00000000F0F0F0F0 FFFFFFFF0000000000000000FFFFFFFF FFFFFFFF0F0F0F0F00000000FFFFFFFF FFFFFFFFF0F0F0F000000000F0F0F0F0 FFFFFFFFFFFFFFFF00000000F0F0F0F0 FFFFFFFFF0F0F0F000000000FFFFFFFF FFFFFFFFFFFFFFFF00000000FFFFFFFF F0F0F0F0000000000F0F0F0F00000000 F0F0F0F00F0F0F0F0F0F0F0F00000000 F0F0F0F0000000000F0F0F0F0F0F0F0F F0F0F0F00F0F0F0F0F0F0F0F0F0F0F0F F0F0F0F0F0F0F0F00F0F0F0F00000000 F0F0F0F0FFFFFFFF0F0F0F0F00000000 F0F0F0F0F0F0F0F00F0F0F0F0F0F0F0F F0F0F0F0FFFFFFFF0F0F0F0F0F0F0F0F F0F0F0F0000000000F0F0F0FF0F0F0F0 F0F0F0F00F0F0F0F0F0F0F0FF0F0F0F0 F0F0F0F0000000000F0F0F0FFFFFFFFF F0F0F0F00F0F0F0F0F0F0F0FFFFFFFFF F0F0F0F0F0F0F0F00F0F0F0FF0F0F0F0 F0F0F0F0FFFFFFFF0F0F0F0FF0F0F0F0 F0F0F0F0F0F0F0F00F0F0F0FFFFFFFFF F0F0F0F0FFFFFFFF0F0F0F0FFFFFFFFF FFFFFFFF000000000F0F0F0F00000000 FFFFFFFF0F0F0F0F0F0F0F0F00000000 FFFFFFFF000000000F0F0F0F0F0F0F0F FFFFFFFF0F0F0F0F0F0F0F0F0F0F0F0F FFFFFFFFF0F0F0F00F0F0F0F00000000 FFFFFFFFFFFFFFFF0F0F0F0F00000000 FFFFFFFFF0F0F0F00F0F0F0F0F0F0F0F FFFFFFFFFFFFFFFF0F0F0F0F0F0F0F0F FFFFFFFF000000000F0F0F0FF0F0F0F0 FFFFFFFF0F0F0F0F0F0F0F0FF0F0F0F0 FFFFFFFF000000000F0F0F0FFFFFFFFF FFFFFFFF0F0F0F0F0F0F0F0FFFFFFFFF FFFFFFFFF0F0F0F00F0F0F0FF0F0F0F0 FFFFFFFFFFFFFFFF0F0F0F0FF0F0F0F0 FFFFFFFFF0F0F0F00F0F0F0FFFFFFFFF FFFFFFFFFFFFFFFF0F0F0F0FFFFFFFFF 0000000000000000F0F0F0F000000000 000000000F0F0F0FF0F0F0F000000000 0000000000000000F0F0F0F00F0F0F0F 000000000F0F0F0FF0F0F0F00F0F0F0F 00000000F0F0F0F0F0F0F0F000000000 00000000FFFFFFFFF0F0F0F000000000 00000000F0F0F0F0F0F0F0F00F0F0F0F 00000000FFFFFFFFF0F0F0F00F0F0F0F 0000000000000000F0F0F0F0F0F0F0F0 000000000F0F0F0FF0F0F0F0F0F0F0F0 0000000000000000F0F0F0F0FFFFFFFF 000000000F0F0F0FF0F0F0F0FFFFFFFF 00000000F0F0F0F0F0F0F0F0F0F0F0F0 00000000FFFFFFFFF0F0F0F0F0F0F0F0 00000000F0F0F0F0F0F0F0F0FFFFFFFF 00000000FFFFFFFFF0F0F0F0FFFFFFFF 0F0F0F0F00000000F0F0F0F000000000 0F0F0F0F0F0F0F0FF0F0F0F000000000 0F0F0F0F00000000F0F0F0F00F0F0F0F 0F0F0F0F0F0F0F0FF0F0F0F00F0F0F0F 0F0F0F0FF0F0F0F0F0F0F0F000000000 0F0F0F0FFFFFFFFFF0F0F0F000000000 0F0F0F0FF0F0F0F0F0F0F0F00F0F0F0F 0F0F0F0FFFFFFFFFF0F0F0F00F0F0F0F 0F0F0F0F00000000F0F0F0F0F0F0F0F0 0F0F0F0F0F0F0F0FF0F0F0F0F0F0F0F0 0F0F0F0F00000000F0F0F0F0FFFFFFFF 0F0F0F0F0F0F0F0FF0F0F0F0FFFFFFFF 0F0F0F0FF0F0F0F0F0F0F0F0F0F0F0F0 0F0F0F0FFFFFFFFFF0F0F0F0F0F0F0F0 0F0F0F0FF0F0F0F0F0F0F0F0FFFFFFFF 0F0F0F0FFFFFFFFFF0F0F0F0FFFFFFFF 0000000000000000FFFFFFFF00000000 000000000F0F0F0FFFFFFFFF00000000 0000000000000000FFFFFFFF0F0F0F0F 000000000F0F0F0FFFFFFFFF0F0F0F0F 00000000F0F0F0F0FFFFFFFF00000000 00000000FFFFFFFFFFFFFFFF00000000 00000000F0F0F0F0FFFFFFFF0F0F0F0F 00000000FFFFFFFFFFFFFFFF0F0F0F0F 0000000000000000FFFFFFFFF0F0F0F0 000000000F0F0F0FFFFFFFFFF0F0F0F0 0000000000000000FFFFFFFFFFFFFFFF 000000000F0F0F0FFFFFFFFFFFFFFFFF 00000000F0F0F0F0FFFFFFFFF0F0F0F0 00000000FFFFFFFFFFFFFFFFF0F0F0F0 00000000F0F0F0F0FFFFFFFFFFFFFFFF 00000000FFFFFFFFFFFFFFFFFFFFFFFF 0F0F0F0F00000000FFFFFFFF00000000 0F0F0F0F0F0F0F0FFFFFFFFF00000000 0F0F0F0F00000000FFFFFFFF0F0F0F0F 0F0F0F0F0F0F0F0FFFFFFFFF0F0F0F0F 0F0F0F0FF0F0F0F0FFFFFFFF00000000 0F0F0F0FFFFFFFFFFFFFFFFF00000000 0F0F0F0FF0F0F0F0FFFFFFFF0F0F0F0F 0F0F0F0FFFFFFFFFFFFFFFFF0F0F0F0F 0F0F0F0F00000000FFFFFFFFF0F0F0F0 0F0F0F0F0F0F0F0FFFFFFFFFF0F0F0F0 0F0F0F0F00000000FFFFFFFFFFFFFFFF 0F0F0F0F0F0F0F0FFFFFFFFFFFFFFFFF 0F0F0F0FF0F0F0F0FFFFFFFFF0F0F0F0 0F0F0F0FFFFFFFFFFFFFFFFFF0F0F0F0 0F0F0F0FF0F0F0F0FFFFFFFFFFFFFFFF 0F0F0F0FFFFFFFFFFFFFFFFFFFFFFFFF F0F0F0F000000000F0F0F0F000000000 F0F0F0F00F0F0F0FF0F0F0F000000000 F0F0F0F000000000F0F0F0F00F0F0F0F F0F0F0F00F0F0F0FF0F0F0F00F0F0F0F F0F0F0F0F0F0F0F0F0F0F0F000000000 F0F0F0F0FFFFFFFFF0F0F0F000000000 F0F0F0F0F0F0F0F0F0F0F0F00F0F0F0F F0F0F0F0FFFFFFFFF0F0F0F00F0F0F0F F0F0F0F000000000F0F0F0F0F0F0F0F0 F0F0F0F00F0F0F0FF0F0F0F0F0F0F0F0 F0F0F0F000000000F0F0F0F0FFFFFFFF F0F0F0F00F0F0F0FF0F0F0F0FFFFFFFF F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0 F0F0F0F0FFFFFFFFF0F0F0F0F0F0F0F0 F0F0F0F0F0F0F0F0F0F0F0F0FFFFFFFF F0F0F0F0FFFFFFFFF0F0F0F0FFFFFFFF FFFFFFFF00000000F0F0F0F000000000 FFFFFFFF0F0F0F0FF0F0F0F000000000 FFFFFFFF00000000F0F0F0F00F0F0F0F FFFFFFFF0F0F0F0FF0F0F0F00F0F0F0F FFFFFFFFF0F0F0F0F0F0F0F000000000 FFFFFFFFFFFFFFFFF0F0F0F000000000 FFFFFFFFF0F0F0F0F0F0F0F00F0F0F0F FFFFFFFFFFFFFFFFF0F0F0F00F0F0F0F FFFFFFFF00000000F0F0F0F0F0F0F0F0 FFFFFFFF0F0F0F0FF0F0F0F0F0F0F0F0 FFFFFFFF00000000F0F0F0F0FFFFFFFF FFFFFFFF0F0F0F0FF0F0F0F0FFFFFFFF FFFFFFFFF0F0F0F0F0F0F0F0F0F0F0F0 FFFFFFFFFFFFFFFFF0F0F0F0F0F0F0F0 FFFFFFFFF0F0F0F0F0F0F0F0FFFFFFFF FFFFFFFFFFFFFFFFF0F0F0F0FFFFFFFF F0F0F0F000000000FFFFFFFF00000000 F0F0F0F00F0F0F0FFFFFFFFF00000000 F0F0F0F000000000FFFFFFFF0F0F0F0F F0F0F0F00F0F0F0FFFFFFFFF0F0F0F0F F0F0F0F0F0F0F0F0FFFFFFFF00000000 F0F0F0F0FFFFFFFFFFFFFFFF00000000 F0F0F0F0F0F0F0F0FFFFFFFF0F0F0F0F F0F0F0F0FFFFFFFFFFFFFFFF0F0F0F0F F0F0F0F000000000FFFFFFFFF0F0F0F0 F0F0F0F00F0F0F0FFFFFFFFFF0F0F0F0 F0F0F0F000000000FFFFFFFFFFFFFFFF F0F0F0F00F0F0F0FFFFFFFFFFFFFFFFF F0F0F0F0F0F0F0F0FFFFFFFFF0F0F0F0 F0F0F0F0FFFFFFFFFFFFFFFFF0F0F0F0 F0F0F0F0F0F0F0F0FFFFFFFFFFFFFFFF F0F0F0F0FFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFF00000000FFFFFFFF00000000 FFFFFFFF0F0F0F0FFFFFFFFF00000000 FFFFFFFF00000000FFFFFFFF0F0F0F0F FFFFFFFF0F0F0F0FFFFFFFFF0F0F0F0F FFFFFFFFF0F0F0F0FFFFFFFF00000000 FFFFFFFFFFFFFFFFFFFFFFFF00000000 FFFFFFFFF0F0F0F0FFFFFFFF0F0F0F0F FFFFFFFFFFFFFFFFFFFFFFFF0F0F0F0F FFFFFFFF00000000FFFFFFFFF0F0F0F0 FFFFFFFF0F0F0F0FFFFFFFFFF0F0F0F0 FFFFFFFF00000000FFFFFFFFFFFFFFFF FFFFFFFF0F0F0F0FFFFFFFFFFFFFFFFF FFFFFFFFF0F0F0F0FFFFFFFFF0F0F0F0 FFFFFFFFFFFFFFFFFFFFFFFFF0F0F0F0 FFFFFFFFF0F0F0F0FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF #3:MAIN BG 00001410010000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000