8000 DATA 8: REM 00001000 8001 DATA 16: REM 00010000 8002 DATA 60: REM 00111100 8003 DATA 66: REM 01000010 8004 DATA 66: REM 01000010 8005 DATA 126: REM 01111110 8006 DATA 66: REM 01000010 8007 DATA 0: REM 00000000 8010 DATA 8: REM 00001000 8011 DATA 16: REM 00010000 8012 DATA 126: REM 01111110 8013 DATA 64: REM 01000000 8014 DATA 124: REM 01111100 8015 DATA 64: REM 01000000 8016 DATA 126: REM 01111110 8017 DATA 0: REM 00000000 8020 DATA 4: REM 00000100 8021 DATA 8: REM 00001000 8022 DATA 62: REM 00111110 8023 DATA 8: REM 00001000 8024 DATA 8: REM 00001000 8025 DATA 8: REM 00001000 8026 DATA 62: REM 00111110 8027 DATA 0: REM 00000000 8030 DATA 8: REM 00001000 8031 DATA 16: REM 00010000 8032 DATA 60: REM 00111100 8033 DATA 66: REM 01000010 8034 DATA 66: REM 01000010 8035 DATA 66: REM 01000010 8036 DATA 60: REM 00111100 8037 DATA 0: REM 00000000 8040 DATA 8: REM 00001000 8041 DATA 16: REM 00010000 8042 DATA 66: REM 01000010 8043 DATA 66: REM 01000010 8044 DATA 66: REM 01000010 8045 DATA 66: REM 01000010 8046 DATA 60: REM 00111100 8047 DATA 0: REM 00000000 8050 DATA 102: REM 01100110 8051 DATA 0: REM 00000000 8052 DATA 66: REM 01000010 8053 DATA 66: REM 01000010 8054 DATA 66: REM 01000010 8055 DATA 66: REM 01000010 8056 DATA 60: REM 00111100 8057 DATA 0: REM 00000000 8060 DATA 50: REM 00110010 8061 DATA 76: REM 01001100 8062 DATA 0: REM 00000000 8063 DATA 98: REM 01100010 8064 DATA 82: REM 01010010 8065 DATA 74: REM 01001010 8066 DATA 70: REM 01000110 8067 DATA 0: REM 00000000 8070 DATA 8: REM 00001000 8071 DATA 16: REM 00010000 8072 DATA 56: REM 00111000 8073 DATA 4: REM 00000100 8074 DATA 60: REM 00111100 8075 DATA 68: REM 01000100 8076 DATA 60: REM 00111100 8077 DATA 0: REM 00000000 8080 DATA 8: REM 00001000 8081 DATA 16: REM 00010000 8082 DATA 56: REM 00111000 8083 DATA 68: REM 01000100 8084 DATA 120: REM 01111000 8085 DATA 64: REM 01000000 8086 DATA 60: REM 00111100 8087 DATA 0: REM 00000000 8090 DATA 8: REM 00001000 8091 DATA 16: REM 00010000 8092 DATA 0: REM 00000000 8093 DATA 48: REM 00110000 8094 DATA 16: REM 00010000 8095 DATA 16: REM 00010000 8096 DATA 56: REM 00111000 8097 DATA 0: REM 00000000 8100 DATA 8: REM 00001000 8101 DATA 16: REM 00010000 8102 DATA 56: REM 00111000 8103 DATA 68: REM 01000100 8104 DATA 68: REM 01000100 8105 DATA 68: REM 01000100 8106 DATA 56: REM 00111000 8107 DATA 0: REM 00000000 8110 DATA 8: REM 00001000 8111 DATA 16: REM 00010000 8112 DATA 68: REM 01000100 8113 DATA 68: REM 01000100 8114 DATA 68: REM 01000100 8115 DATA 68: REM 01000100 8116 DATA 56: REM 00111000 8117 DATA 0: REM 00000000 8120 DATA 68: REM 01000100 8121 DATA 0: REM 00000000 8122 DATA 68: REM 01000100 8123 DATA 68: REM 01000100 8124 DATA 68: REM 01000100 8125 DATA 68: REM 01000100 8126 DATA 56: REM 00111000 8127 DATA 0: REM 00000000 8130 DATA 52: REM 00110100 8131 DATA 72: REM 01001000 8132 DATA 0: REM 00000000 8133 DATA 120: REM 01111000 8134 DATA 68: REM 01000100 8135 DATA 68: REM 01000100 8136 DATA 68: REM 01000100 8137 DATA 0: REM 00000000 8500 RESTORE 8000 8505 CLS : PRINT AT 1,1;"GENERANDO UDGs..." 8510 FOR F=0 TO (8*7*2)-1 8520 READ byte: POKE USR "A"+F,byte 8530 NEXT f 8540 RETURN