99 '* GRPHCS.BA shareware by H. Veludo *
100 CLEAR256,-5793!:POKE -321!,96:POKE -320!,233:AD=59744!:RESTORE131
110 FORI=0TO28:FORJ=0TO5:READD:POKE AD+I*6+J,D:NEXT:NEXT
131 DATA 255,255,255,255,255,255
132 DATA 255,193,213,201,255,0
133 DATA 0,255,201,213,193,255
134 DATA 255,255,255,255,255,255
135 DATA 255,193,223,223,255,0
136 DATA 239,223,129,223,239,0
137 DATA 247,251,129,251,247,0
138 DATA 235,221,128,221,235,0
139 DATA 255,193,245,253,255,0
140 DATA 255,255,255,255,255,255
141 DATA 247,227,213,247,247,0
142 DATA 255,255,255,255,255,255
143 DATA 255,255,255,255,255,255
144 DATA 255,241,245,193,255,0
145 DATA 0,255,213,213,193,255
146 DATA 255,193,213,213,255,0
147 DATA 255,193,245,203,255,0
148 DATA 255,199,215,193,255,0
149 DATA 0,255,193,253,193,255
150 DATA 255,193,223,193,255,0
151 DATA 255,221,193,221,255,0
152 DATA 0,255,213,193,213,255
153 DATA 255,129,245,241,255,0
154 DATA 255,193,221,193,255,0
155 DATA 255,219,193,223,255,0
156 DATA 255,197,213,209,255,0
157 DATA 255,213,193,255,255,0
158 DATA 255,193,213,197,255,0
159 DATA 255,253,197,249,255,0