in the row with a value of 8 and one in the row with 16. The value for that column is then 24. You' II get sixteen column values to use later for your DATA statements for this bit image. 5) Now add 128 to each total for each column from step 4. The first column value would now be 152 (24 + 128). These values are now what you will use for DATA statements to produce the bit image. The DATA statements in a program for this bit image: DATA 152, 152,254,254, 146, 146,255,255 DATA 146, 146,254,254, 152, 152, 128, 128 Once you figure out the DATA values for your bit image, you can write a program to print the image.
In this example, the image is a 'flying object', which the following program prints five times. 10 OPEN 4,4 20 A$="" 30 FOR I = 1 TO 16 40 READ A:A$ =A$+ CHR$(A) 50NEXTI 60FORJ= 1TO5 70 PRINT#4,CHR$(8);A$;CHR$(15) This control code defines 80 NEXT J 1 1 I 6" line feed for a sepa- 90 FORK= 1 TO 8:PRINT#4:NEXT K rate printed line. 100 CLOSE4 llOEND 200 DATA 152, 152,254,254, 146, 146,255,255 210 DATA 146, 146,254,254, 152, 152, 128,128 Result: ·11=il : l- -11:t11 .. of.R· -f.1111 .. -tr-:tf::ll- Combining Bit Images to Form a Larger Image You can create images larger than the seven row grid allows by com- bining grids.
The following program provides an example of how you can design a larger character by using DATA statements to place three programmed bit images together to form a larger character. lOOPEN 4,4 20FORR= 1TO3 30FORC= 1TO16 40 READ A:A$(R) = A$(R) + CHR$(A) 50NEXTC 76