_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

T.BITS

FILE INFORMATION

FILENAME(S): T.BITS

FILE TYPE(S): PRG

FILE SIZE: 4.6K

FIRST SEEN: 2025-11-30 18:05:24

APPEARS ON: 1 disk(s)

FILE HASH

0d37a8b65576f04e86cbb1ab91fd760a54aff3b1299c2afa483c5e408d277b93

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 71 S 1 T.BITS PRG Xii 25 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 80 5E 55 3A 5A 45 52  4F 0D 20 20 20 C2 C9 D4  |..^U:ZERO.   ...|
00000010: D3 3A 20 C1 CC CC 20 C1  C2 CF D5 D4 20 22 D3 C8  |.: ... ..... "..|
00000020: CF D0 D0 C9 CE C7 20 C2  C1 C7 2E CF 22 0D 0D 20  |...... .....".. |
00000030: 20 20 20 20 20 20 20 20  20 42 59 20 C6 45 4E 44  |         BY .END|
00000040: 45 52 20 D4 55 43 4B 45  52 0D 0D 20 20 20 20 D4  |ER .UCKER..    .|
00000050: 48 49 53 20 4C 49 54 54  4C 45 20 4F 42 4A 45 43  |HIS LITTLE OBJEC|
00000060: 54 20 46 49 4C 45 20 48  41 53 20 47 52 4F 57 4E  |T FILE HAS GROWN|
00000070: 0D 46 52 4F 4D 20 32 20  42 4C 4F 43 4B 53 20 54  |.FROM 2 BLOCKS T|
00000080: 4F 20 34 20 42 4C 4F 43  4B 53 20 53 49 4E 43 45  |O 4 BLOCKS SINCE|
00000090: 20 49 54 0D 57 41 53 20  46 49 52 53 54 20 43 52  | IT.WAS FIRST CR|
000000A0: 45 41 54 45 44 20 42 59  20 D3 43 4F 54 54 20 D2  |EATED BY .COTT .|
000000B0: 45 53 48 2C 20 41 4E 44  0D 49 54 20 49 53 20 D0  |ESH, AND.IT IS .|
000000C0: CF D7 C5 D2 C6 D5 CC 21  20 20 C9 54 27 53 20 54  |.......!  .T'S T|
000000D0: 48 45 20 44 52 49 56 49  4E 47 0D 46 4F 52 43 45  |HE DRIVING.FORCE|
000000E0: 20 42 45 48 49 4E 44 20  D0 D2 C9 CE D4 20 D3 C8  | BEHIND ..... ..|
000000F0: CF D0 D0 C9 CE C7 20 C2  C1 C7 2E 20 20 C1 4C 4C  |...... ....  .LL|
00000100: 0D 4F 46 20 54 48 45 20  C2 C1 D3 C9 C3 20 43 4F  |.OF THE ..... CO|
00000110: 44 45 20 54 48 41 54 20  4D 41 4B 45 53 20 55 50  |DE THAT MAKES UP|
00000120: 20 D0 D3 C2 0D 49 53 20  4D 45 52 45 4C 59 20 41  | ....IS MERELY A|
00000130: 20 57 41 59 20 54 4F 20  43 48 4F 4F 53 45 20 46  | WAY TO CHOOSE F|
00000140: 49 4C 45 53 20 54 4F 0D  52 55 4E 20 54 48 52 4F  |ILES TO.RUN THRO|
00000150: 55 47 48 20 22 53 48 4F  50 50 49 4E 47 20 42 41  |UGH "SHOPPING BA|
00000160: 47 2E 4F 22 27 53 0D 57  52 49 4E 47 45 52 2E 20  |G.O"'S.WRINGER. |
00000170: 20 D4 48 49 53 20 49 53  20 54 48 45 20 42 41 42  | .HIS IS THE BAB|
00000180: 59 2E 0D 0D 20 20 20 20  D4 48 45 20 46 4F 4C 4C  |Y...    .HE FOLL|
00000190: 4F 57 49 4E 47 20 41 52  54 49 43 4C 45 20 45 58  |OWING ARTICLE EX|
000001A0: 50 4C 41 49 4E 53 0D 48  4F 57 20 54 4F 20 55 53  |PLAINS.HOW TO US|
000001B0: 45 20 22 53 48 4F 50 50  49 4E 47 20 42 41 47 2E  |E "SHOPPING BAG.|
000001C0: 4F 22 27 53 20 50 4F 57  45 52 2C 0D 42 45 43 41  |O"'S POWER,.BECA|
000001D0: 55 53 45 20 C9 20 54 48  49 4E 4B 20 54 48 41 54  |USE . THINK THAT|
000001E0: 20 41 4E 20 49 4D 41 47  49 4E 41 54 49 56 45 0D  | AN IMAGINATIVE.|
000001F0: 50 52 4F 47 52 41 4D 4D  45 52 20 43 41 4E 20 43  |PROGRAMMER CAN C|
00000200: 4F 4D 45 20 55 50 20 57  49 54 48 20 4F 54 48 45  |OME UP WITH OTHE|
00000210: 52 0D 55 53 45 53 20 46  4F 52 20 49 54 20 42 45  |R.USES FOR IT BE|
00000220: 53 49 44 45 53 20 D0 D3  C2 2E 0D 0D 20 20 20 20  |SIDES ......    |
00000230: D4 48 45 20 4E 45 57 20  46 45 41 54 55 52 45 20  |.HE NEW FEATURE |
00000240: 54 48 41 54 20 D3 43 4F  54 54 20 41 44 44 45 44  |THAT .COTT ADDED|
00000250: 0D 54 48 49 53 20 57 45  45 4B 20 49 53 20 54 48  |.THIS WEEK IS TH|
00000260: 45 20 22 56 49 45 57 22  20 46 55 4E 43 54 49 4F  |E "VIEW" FUNCTIO|
00000270: 4E 2E 20 20 C9 54 0D 42  41 53 49 43 41 4C 4C 59  |N.  .T.BASICALLY|
00000280: 20 54 41 4B 45 53 20 41  4E 20 49 4D 41 47 45 27  | TAKES AN IMAGE'|
00000290: 53 20 44 41 54 41 20 41  4E 44 0D 43 52 45 41 54  |S DATA AND.CREAT|
000002A0: 45 53 20 50 41 52 54 20  4F 46 20 41 20 46 4F 4E  |ES PART OF A FON|
000002B0: 54 20 4F 55 54 20 4F 46  20 49 54 2E 0D D4 48 45  |T OUT OF IT...HE|
000002C0: 20 46 49 52 53 54 20 37  37 20 52 45 56 45 52 53  | FIRST 77 REVERS|
000002D0: 45 44 20 43 48 41 52 41  43 54 45 52 53 20 41 52  |ED CHARACTERS AR|
000002E0: 45 0D 55 53 45 44 2E 20  20 CB 45 45 50 20 54 48  |E.USED.  .EEP TH|
000002F0: 49 53 20 49 4E 20 4D 49  4E 44 20 2D 2D 20 49 54  |IS IN MIND -- IT|
00000300: 20 4D 45 41 4E 53 0D 54  48 41 54 20 59 4F 55 20  | MEANS.THAT YOU |
00000310: 43 41 4E 27 54 20 55 53  45 20 52 45 56 45 52 53  |CAN'T USE REVERS|
00000320: 45 44 20 43 48 41 52 41  43 54 45 52 53 0D 4F 4E  |ED CHARACTERS.ON|
00000330: 20 54 48 45 20 53 41 4D  45 20 53 43 52 45 45 4E  | THE SAME SCREEN|
00000340: 20 41 53 20 41 4E 20 49  4D 41 47 45 2E 0D 0D 20  | AS AN IMAGE... |
00000350: 20 20 20 CD 4F 52 45 20  41 42 4F 55 54 20 54 48  |   .ORE ABOUT TH|
00000360: 45 20 56 49 45 57 20 46  55 4E 43 54 49 4F 4E 0D  |E VIEW FUNCTION.|
00000370: 4C 41 54 45 52 2C 20 4C  45 54 27 53 20 53 54 41  |LATER, LET'S STA|
00000380: 52 54 20 57 49 54 48 20  54 48 45 20 42 45 47 49  |RT WITH THE BEGI|
00000390: 4E 4E 49 4E 47 0D 4F 46  20 22 53 48 4F 50 50 49  |NNING.OF "SHOPPI|
000003A0: 4E 47 20 42 41 47 2E 4F  22 2C 20 41 54 20 34 39  |NG BAG.O", AT 49|
000003B0: 31 35 32 20 28 23 C3 30  30 30 29 2E 0D C9 4E 20  |152 (#.000)...N |
000003C0: 54 48 49 53 20 54 45 58  54 2C 20 D0 D3 20 4F 52  |THIS TEXT, .. OR|
000003D0: 20 D3 20 4D 45 41 4E 53  20 D0 52 49 4E 54 0D D3  | . MEANS .RINT..|
000003E0: 48 4F 50 20 41 4E 44 20  D0 CD 20 4F 52 20 CD 20  |HOP AND .. OR . |
000003F0: 4D 45 41 4E 53 20 D0 52  49 4E 54 4D 41 53 54 45  |MEANS .RINTMASTE|
00000400: 52 2E 0D 0D 0D 0D 0D 0D  2A 20 C3 4F 4E 56 45 52  |R.......* .ONVER|
00000410: 54 20 33 2D 42 4C 4F 43  4B 20 D0 D3 20 54 4F 20  |T 3-BLOCK .. TO |
00000420: 32 2D 42 4C 4F 43 4B 20  D0 D3 0D 0D D3 D9 D3 34  |2-BLOCK .......4|
00000430: 39 31 35 32 2C 50 41 47  45 20 50 4F 49 4E 54 45  |9152,PAGE POINTE|
00000440: 52 2C 4C 4F 47 49 43 41  4C 20 46 49 4C 45 20 23  |R,LOGICAL FILE #|
00000450: 0D 0D 20 22 D0 41 47 45  20 50 4F 49 4E 54 45 52  |.. ".AGE POINTER|
00000460: 22 20 4D 45 41 4E 53 20  54 48 45 20 50 41 47 45  |" MEANS THE PAGE|
00000470: 0D 20 57 48 45 52 45 20  54 48 45 20 49 4D 41 47  |. WHERE THE IMAG|
00000480: 45 20 44 41 54 41 20 49  53 20 4C 4F 41 44 45 44  |E DATA IS LOADED|
00000490: 2E 20 20 C9 46 0D 20 59  4F 55 20 55 53 45 20 54  |.  .F. YOU USE T|
000004A0: 48 49 53 20 53 59 4E 54  41 58 20 54 4F 20 4C 4F  |HIS SYNTAX TO LO|
000004B0: 41 44 20 41 4E 20 49 4D  41 47 45 0D 0D 20 D3 D9  |AD AN IMAGE.. ..|
000004C0: D3 35 37 38 31 32 22 46  49 4C 45 4E 41 4D 45 22  |.57812"FILENAME"|
000004D0: 2C 38 2C 30 3A D0 CF CB  C5 37 38 30 2C 30 3A 0D  |,8,0:....780,0:.|
000004E0: 20 20 20 D0 CF CB C5 37  38 31 2C 30 3A D0 CF CB  |   ....781,0:...|
000004F0: C5 37 38 32 2C 39 36 3A  D3 D9 D3 36 35 34 39 33  |.782,96:...65493|
00000500: 0D 0D 20 54 48 45 4E 20  54 48 45 20 50 41 47 45  |.. THEN THE PAGE|
00000510: 20 50 4F 49 4E 54 45 52  20 49 53 20 39 36 2E 0D  | POINTER IS 96..|
00000520: 0D 20 C1 20 43 4F 4E 56  45 52 54 45 44 20 46 49  |. . CONVERTED FI|
00000530: 4C 45 20 57 49 4C 4C 20  42 45 20 53 41 56 45 44  |LE WILL BE SAVED|
00000540: 20 54 4F 0D 20 44 49 53  4B 2E 20 20 D9 4F 55 20  | TO. DISK.  .OU |
00000550: 4D 55 53 54 20 CF D0 C5  CE 20 41 20 46 49 4C 45  |MUST .... A FILE|
00000560: 20 42 45 46 4F 52 45 0D  20 4D 41 4B 49 4E 47 20  | BEFORE. MAKING |
00000570: 54 48 45 20 D3 D9 D3 20  43 41 4C 4C 2E 0D 0D 0D  |THE ... CALL....|
00000580: 0D 20 C8 45 52 45 27 53  20 54 48 45 20 53 59 4E  |. .ERE'S THE SYN|
00000590: 54 41 58 20 54 4F 20 55  53 45 20 54 4F 20 CF D0  |TAX TO USE TO ..|
000005A0: C5 CE 20 41 0D 20 46 49  4C 45 20 46 4F 52 20 57  |.. A. FILE FOR W|
000005B0: 52 49 54 49 4E 47 20 41  20 43 4F 4E 56 45 52 54  |RITING A CONVERT|
000005C0: 45 44 20 46 49 4C 45 2E  0D 0D 20 CF D0 C5 CE 46  |ED FILE... ....F|
000005D0: 49 4C 45 23 2C 44 45 56  49 43 45 20 23 2C 31 2C  |ILE#,DEVICE #,1,|
000005E0: 46 49 4C 45 4E 41 4D 45  0D 0D 20 C9 20 55 53 45  |FILENAME.. . USE|
000005F0: 20 54 48 49 53 20 49 4E  20 D0 D2 C9 CE D4 20 D3  | THIS IN ..... .|
00000600: C8 CF D0 D0 C9 CE C7 20  C2 C1 C7 2E 0D 0D 20 CF  |....... ...... .|
00000610: D0 C5 CE 32 2C 44 4E 2C  31 2C 44 24 0D 0D 20 32  |...2,DN,1,D$.. 2|
00000620: 20 49 53 20 54 48 45 20  46 49 4C 45 20 4E 55 4D  | IS THE FILE NUM|
00000630: 42 45 52 2E 20 20 44 4E  20 49 53 20 38 2C 20 39  |BER.  DN IS 8, 9|
00000640: 2C 0D 20 31 30 20 4F 52  20 31 31 2C 20 44 45 50  |,. 10 OR 11, DEP|
00000650: 45 4E 44 49 4E 47 20 55  50 4F 4E 20 54 48 45 20  |ENDING UPON THE |
00000660: 44 45 56 49 43 45 0D 20  43 48 4F 53 45 4E 20 42  |DEVICE. CHOSEN B|
00000670: 59 20 54 48 45 20 55 53  45 52 2E 20 20 31 20 4D  |Y THE USER.  1 M|
00000680: 45 41 4E 53 20 22 57 52  49 54 45 22 0D 20 52 41  |EANS "WRITE". RA|
00000690: 54 48 45 52 20 54 48 41  4E 20 22 52 45 41 44 22  |THER THAN "READ"|
000006A0: 2C 20 41 4E 44 20 44 24  20 49 53 20 54 48 45 0D  |, AND D$ IS THE.|
000006B0: 20 46 49 4C 45 4E 41 4D  45 20 C9 20 57 41 4E 54  | FILENAME . WANT|
000006C0: 20 54 48 45 20 43 4F 4E  56 45 52 54 45 44 20 46  | THE CONVERTED F|
000006D0: 49 4C 45 0D 20 54 4F 20  42 45 20 43 41 4C 4C 45  |ILE. TO BE CALLE|
000006E0: 44 2E 0D 0D 20 D3 4F 2C  20 57 48 41 54 45 56 45  |D... .O, WHATEVE|
000006F0: 52 20 4C 4F 47 49 43 41  4C 20 46 49 4C 45 20 59  |R LOGICAL FILE Y|
00000700: 4F 55 20 CF D0 C5 CE 45  44 2C 0D 20 55 53 45 20  |OU ....ED,. USE |
00000710: 54 48 41 54 20 4E 55 4D  42 45 52 20 49 4E 20 54  |THAT NUMBER IN T|
00000720: 48 45 20 D3 D9 D3 20 43  4F 4D 4D 41 4E 44 2E 0D  |HE ... COMMAND..|
00000730: 0D 2A 20 C3 4F 4E 56 45  52 54 20 33 2D 42 4C 4F  |.* .ONVERT 3-BLO|
00000740: 43 4B 20 D0 D3 20 54 4F  20 32 2D 42 4C 4F 43 4B  |CK .. TO 2-BLOCK|
00000750: 20 D0 D3 0D 0D D3 D9 D3  34 39 31 35 35 2C 50 41  | .......49155,PA|
00000760: 47 45 20 50 4F 49 4E 54  45 52 2C 4C 4F 47 49 43  |GE POINTER,LOGIC|
00000770: 41 4C 20 46 49 4C 45 20  23 0D 0D 20 C5 56 45 52  |AL FILE #.. .VER|
00000780: 59 54 48 49 4E 47 20 41  42 4F 55 54 20 54 48 49  |YTHING ABOUT THI|
00000790: 53 20 49 53 20 54 48 45  20 53 41 4D 45 0D 20 41  |S IS THE SAME. A|
000007A0: 53 20 46 4F 52 20 D3 D9  D3 34 39 31 35 32 2E 0D  |S FOR ...49152..|
000007B0: 0D 2A 20 C3 4F 4E 56 45  52 54 20 42 45 54 57 45  |.* .ONVERT BETWE|
000007C0: 45 4E 20 D0 D3 20 41 4E  44 20 D0 CD 20 28 33 2D  |EN .. AND .. (3-|
000007D0: 42 4C 4F 43 4B 29 0D 0D  D3 D9 D3 34 39 31 35 38  |BLOCK).....49158|
000007E0: 2C 22 D3 22 20 4F 52 20  22 CD 22 2C 50 41 47 45  |,"." OR ".",PAGE|
000007F0: 20 50 4F 49 4E 54 45 52  2C 0D 20 20 4C 4F 47 49  | POINTER,.  LOGI|
00000800: 43 41 4C 20 46 49 4C 45  20 23 0D 0D 20 22 50 41  |CAL FILE #.. "PA|
00000810: 47 45 20 50 4F 49 4E 54  45 52 22 20 41 4E 44 20  |GE POINTER" AND |
00000820: 22 4C 4F 47 49 43 41 4C  20 46 49 4C 45 20 23 22  |"LOGICAL FILE #"|
00000830: 0D 20 41 52 45 20 54 48  45 20 53 41 4D 45 20 41  |. ARE THE SAME A|
00000840: 53 20 41 42 4F 56 45 2E  0D 0D 20 D5 53 45 20 22  |S ABOVE... .SE "|
00000850: D3 22 20 46 4F 52 20 D0  D3 20 54 4F 20 D0 CD 0D  |." FOR .. TO ...|
00000860: 20 D5 53 45 20 22 CD 22  20 46 4F 52 20 D0 CD 20  | .SE "." FOR .. |
00000870: 54 4F 20 D0 D3 0D 0D 0D  2A 20 C3 4F 4E 56 45 52  |TO .....* .ONVER|
00000880: 54 20 D0 CD 20 54 4F 20  32 2D 42 4C 4F 43 4B 20  |T .. TO 2-BLOCK |
00000890: D0 D3 0D 0D D3 D9 D3 34  39 31 36 31 2C 50 41 47  |.......49161,PAG|
000008A0: 45 20 50 4F 49 4E 54 45  52 2C 4C 4F 47 49 43 41  |E POINTER,LOGICA|
000008B0: 4C 20 46 49 4C 45 20 23  0D 0D 20 D3 41 4D 45 20  |L FILE #.. .AME |
000008C0: 41 53 20 41 42 4F 56 45  2E 0D 0D 2A 20 C3 4F 4E  |AS ABOVE...* .ON|
000008D0: 56 45 52 54 20 32 2D 42  4C 4F 43 4B 20 D0 D3 20  |VERT 2-BLOCK .. |
000008E0: 54 4F 20 D0 CD 0D 0D D3  D9 D3 34 39 31 36 34 2C  |TO .......49164,|
000008F0: 50 41 47 45 20 50 4F 49  4E 54 45 52 2C 4C 4F 47  |PAGE POINTER,LOG|
00000900: 49 43 41 4C 20 46 49 4C  45 20 23 0D 0D 20 D3 41  |ICAL FILE #.. .A|
00000910: 4D 45 20 41 53 20 41 42  4F 56 45 2E 0D 0D 20 20  |ME AS ABOVE...  |
00000920: 20 20 D4 48 45 20 46 4F  4C 4C 4F 57 49 4E 47 20  |  .HE FOLLOWING |
00000930: 43 4F 4D 4D 41 4E 44 53  20 41 52 45 20 46 4F 52  |COMMANDS ARE FOR|
00000940: 0D 54 48 45 20 22 56 49  45 57 22 20 46 55 4E 43  |.THE "VIEW" FUNC|
00000950: 54 49 4F 4E 2E 0D 0D 0D  0D 0D 0D 2A 20 C9 4E 49  |TION.......* .NI|
00000960: 54 49 41 4C 49 5A 45 20  49 4D 41 47 45 20 56 49  |TIALIZE IMAGE VI|
00000970: 45 57 45 52 2E 0D 0D D3  D9 D3 34 39 31 36 37 2C  |EWER......49167,|
00000980: 46 4F 4E 54 20 50 41 47  45 2C 58 20 43 4F 4F 52  |FONT PAGE,X COOR|
00000990: 44 2C 59 20 43 4F 4F 52  44 0D 0D 20 D4 48 49 53  |D,Y COORD.. .HIS|
000009A0: 20 43 4F 4D 4D 41 4E 44  20 44 4F 45 53 20 4E 4F  | COMMAND DOES NO|
000009B0: 54 20 44 49 53 50 4C 41  59 0D 20 41 4E 59 54 48  |T DISPLAY. ANYTH|
000009C0: 49 4E 47 20 2D 2D 20 49  54 20 4F 4E 4C 59 20 47  |ING -- IT ONLY G|
000009D0: 45 54 53 20 54 48 45 20  50 52 4F 47 52 41 4D 0D  |ETS THE PROGRAM.|
000009E0: 20 52 45 41 44 59 20 46  4F 52 20 44 49 53 50 4C  | READY FOR DISPL|
000009F0: 41 59 49 4E 47 2E 0D 0D  20 22 46 4F 4E 54 20 50  |AYING... "FONT P|
00000A00: 41 47 45 22 20 49 53 20  54 48 45 20 48 49 47 48  |AGE" IS THE HIGH|
00000A10: 2D 42 59 54 45 20 4F 46  20 54 48 45 0D 20 41 52  |-BYTE OF THE. AR|
00000A20: 45 41 20 57 48 45 52 45  20 59 4F 55 52 20 46 4F  |EA WHERE YOUR FO|
00000A30: 4E 54 20 49 53 20 53 54  4F 52 45 44 2E 20 20 D9  |NT IS STORED.  .|
00000A40: 4F 55 0D 20 CD D5 D3 D4  20 42 45 20 55 53 49 4E  |OU. .... BE USIN|
00000A50: 47 20 41 20 43 55 53 54  4F 4D 20 46 4F 4E 54 20  |G A CUSTOM FONT |
00000A60: 49 4E 20 59 4F 55 52 0D  20 50 52 4F 47 52 41 4D  |IN YOUR. PROGRAM|
00000A70: 2E 20 20 D4 48 45 20 44  45 46 41 55 4C 54 20 46  |.  .HE DEFAULT F|
00000A80: 4F 4E 54 20 57 4F 4E 27  54 0D 20 57 4F 52 4B 2E  |ONT WON'T. WORK.|
00000A90: 20 20 C9 46 20 59 4F 55  52 20 46 4F 4E 54 20 49  |  .F YOUR FONT I|
00000AA0: 53 20 4C 4F 43 41 54 45  44 20 41 54 0D 20 31 34  |S LOCATED AT. 14|
00000AB0: 33 33 36 20 28 24 33 38  30 30 29 20 54 48 45 4E  |336 ($3800) THEN|
00000AC0: 20 54 48 45 20 48 49 47  48 20 42 59 54 45 20 49  | THE HIGH BYTE I|
00000AD0: 53 0D 20 24 33 38 2C 20  4F 52 20 35 36 20 44 45  |S. $38, OR 56 DE|
00000AE0: 43 49 4D 41 4C 2E 20 20  D5 53 45 20 35 36 20 41  |CIMAL.  .SE 56 A|
00000AF0: 53 20 22 46 4F 4E 54 0D  20 50 41 47 45 22 2E 0D  |S "FONT. PAGE"..|
00000B00: 0D 0D 0D 20 D4 48 45 20  58 20 43 4F 4F 52 44 49  |... .HE X COORDI|
00000B10: 4E 41 54 45 20 49 53 20  41 20 4E 55 4D 42 45 52  |NATE IS A NUMBER|
00000B20: 20 42 45 54 57 45 45 4E  0D 20 30 20 41 4E 44 20  | BETWEEN. 0 AND |
00000B30: 32 39 20 54 48 41 54 20  54 45 4C 4C 53 20 57 48  |29 THAT TELLS WH|
00000B40: 45 52 45 20 4F 4E 20 54  48 45 0D 20 53 43 52 45  |ERE ON THE. SCRE|
00000B50: 45 4E 20 54 48 45 20 49  4D 41 47 45 20 57 49 4C  |EN THE IMAGE WIL|
00000B60: 4C 20 42 45 20 53 48 4F  57 4E 2E 20 20 D9 4F 55  |L BE SHOWN.  .OU|
00000B70: 0D 20 43 41 4E 27 54 20  55 53 45 20 41 20 4E 55  |. CAN'T USE A NU|
00000B80: 4D 42 45 52 20 4C 41 52  47 45 52 20 54 48 41 4E  |MBER LARGER THAN|
00000B90: 20 32 39 0D 20 42 45 43  41 55 53 45 20 41 4E 20  | 29. BECAUSE AN |
00000BA0: 49 4D 41 47 45 20 4D 41  59 20 42 45 20 55 50 20  |IMAGE MAY BE UP |
00000BB0: 54 4F 20 31 31 0D 20 43  48 41 52 41 43 54 45 52  |TO 11. CHARACTER|
00000BC0: 53 20 41 43 52 4F 53 53  2E 0D 0D 20 D4 48 45 20  |S ACROSS... .HE |
00000BD0: 59 20 43 4F 4F 52 44 49  4E 41 54 45 20 49 53 20  |Y COORDINATE IS |
00000BE0: 41 20 4E 55 4D 42 45 52  20 42 45 54 57 45 45 4E  |A NUMBER BETWEEN|
00000BF0: 0D 20 30 20 41 4E 44 20  31 38 2E 20 20 C1 4E 20  |. 0 AND 18.  .N |
00000C00: 49 4D 41 47 45 20 4D 41  59 20 42 45 20 41 53 20  |IMAGE MAY BE AS |
00000C10: 54 41 4C 4C 0D 20 41 53  20 37 20 43 48 41 52 41  |TALL. AS 7 CHARA|
00000C20: 43 54 45 52 53 2E 0D 0D  0D 0D 0D 0D 0D 0D 0D 0D  |CTERS...........|
00000C30: 2A 20 C4 49 53 50 4C 41  59 20 41 4E 20 49 4D 41  |* .ISPLAY AN IMA|
00000C40: 47 45 0D 0D D3 D9 D3 34  39 31 37 30 2C 50 41 47  |GE.....49170,PAG|
00000C50: 45 20 50 4F 49 4E 54 45  52 2C 54 59 50 45 20 4F  |E POINTER,TYPE O|
00000C60: 46 20 49 4D 41 47 45 0D  0D 20 D4 48 45 20 22 54  |F IMAGE.. .HE "T|
00000C70: 59 50 45 20 4F 46 20 49  4D 41 47 45 22 20 55 53  |YPE OF IMAGE" US|
00000C80: 45 53 20 54 48 49 53 20  43 4F 44 45 3A 0D 0D 20  |ES THIS CODE:.. |
00000C90: 31 20 2D 20 D0 CD 20 49  4D 41 47 45 0D 20 32 20  |1 - .. IMAGE. 2 |
00000CA0: 2D 20 32 2D 42 4C 4F 43  4B 20 D0 D3 20 49 4D 41  |- 2-BLOCK .. IMA|
00000CB0: 47 45 0D 20 33 20 2D 20  33 2D 42 4C 4F 43 4B 20  |GE. 3 - 3-BLOCK |
00000CC0: D0 D3 20 49 4D 41 47 45  0D 0D 2A 20 C4 49 53 41  |.. IMAGE..* .ISA|
00000CD0: 42 4C 45 20 56 49 45 57  45 52 0D 0D D3 D9 D3 34  |BLE VIEWER.....4|
00000CE0: 39 31 37 33 0D 0D 20 C4  4F 20 54 48 49 53 20 57  |9173.. .O THIS W|
00000CF0: 48 45 4E 20 59 4F 55 20  41 52 45 20 54 48 52 4F  |HEN YOU ARE THRO|
00000D00: 55 47 48 20 56 49 45 57  49 4E 47 0D 20 41 4E 20  |UGH VIEWING. AN |
00000D10: 49 4D 41 47 45 2E 20 20  D3 49 4E 43 45 20 54 48  |IMAGE.  .INCE TH|
00000D20: 45 20 56 49 45 57 45 52  20 55 53 45 53 20 41 0D  |E VIEWER USES A.|
00000D30: 20 43 4F 50 59 20 4F 46  20 59 4F 55 52 20 43 55  | COPY OF YOUR CU|
00000D40: 53 54 4F 4D 20 46 4F 4E  54 2C 20 54 48 49 53 20  |STOM FONT, THIS |
00000D50: 49 53 0D 20 4E 45 45 44  45 44 20 54 4F 20 52 45  |IS. NEEDED TO RE|
00000D60: 53 54 4F 52 45 20 59 4F  55 52 20 46 4F 4E 54 2E  |STORE YOUR FONT.|
00000D70: 0D 0D 2A 20 C3 4C 45 41  52 20 42 55 46 46 45 52  |..* .LEAR BUFFER|
00000D80: 20 41 52 45 41 20 28 46  4F 52 20 D0 D3 20 4F 4E  | AREA (FOR .. ON|
00000D90: 4C 59 29 0D 0D D3 D9 D3  34 39 31 37 36 2C 50 41  |LY).....49176,PA|
00000DA0: 47 45 20 50 4F 49 4E 54  45 52 2C 32 20 4F 52 20  |GE POINTER,2 OR |
00000DB0: 33 0D 0D 20 D3 49 4E 43  45 20 44 49 46 46 45 52  |3.. .INCE DIFFER|
00000DC0: 45 4E 54 20 56 45 52 53  49 4F 4E 53 20 4F 46 20  |ENT VERSIONS OF |
00000DD0: 54 48 45 0D 20 D0 52 49  4E 54 20 D3 48 4F 50 20  |THE. .RINT .HOP |
00000DE0: 50 52 4F 47 52 41 4D 20  42 59 20 C2 52 4F 44 45  |PROGRAM BY .RODE|
00000DF0: 52 42 55 4E 44 0D 20 53  41 56 45 20 49 4D 41 47  |RBUND. SAVE IMAG|
00000E00: 45 53 20 44 49 46 46 45  52 45 4E 54 4C 59 2C 20  |ES DIFFERENTLY, |
00000E10: 49 54 20 4D 41 59 20 42  45 0D 20 4E 45 43 45 53  |IT MAY BE. NECES|
00000E20: 53 41 52 59 20 54 4F 20  43 4C 45 41 52 20 4F 55  |SARY TO CLEAR OU|
00000E30: 54 20 54 48 45 20 41 52  45 41 0D 20 57 48 45 52  |T THE AREA. WHER|
00000E40: 45 20 59 4F 55 20 50 4C  41 4E 20 54 4F 20 4C 4F  |E YOU PLAN TO LO|
00000E50: 41 44 20 54 48 45 20 49  4D 41 47 45 53 2E 0D 20  |AD THE IMAGES.. |
00000E60: C9 46 20 59 4F 55 20 53  45 45 20 47 41 52 42 41  |.F YOU SEE GARBA|
00000E70: 47 45 20 41 54 20 54 48  45 20 56 45 52 59 0D 20  |GE AT THE VERY. |
00000E80: 42 4F 54 54 4F 4D 20 4F  46 20 41 4E 20 49 4D 41  |BOTTOM OF AN IMA|
00000E90: 47 45 2C 20 59 4F 55 20  4E 45 45 44 20 54 4F 0D  |GE, YOU NEED TO.|
00000EA0: 20 55 53 45 20 54 48 49  53 20 D3 D9 D3 20 42 45  | USE THIS ... BE|
00000EB0: 46 4F 52 45 20 4C 4F 41  44 49 4E 47 20 54 48 45  |FORE LOADING THE|
00000EC0: 0D 20 49 4D 41 47 45 2E  20 20 D5 53 45 20 32 20  |. IMAGE.  .SE 2 |
00000ED0: 41 53 20 54 48 45 20 4C  41 53 54 20 50 41 52 41  |AS THE LAST PARA|
00000EE0: 4D 45 54 45 52 0D 20 46  4F 52 20 41 20 32 2D 42  |METER. FOR A 2-B|
00000EF0: 4C 4F 43 4B 20 49 4D 41  47 45 2C 20 41 4E 44 20  |LOCK IMAGE, AND |
00000F00: 33 20 46 4F 52 20 41 0D  20 33 2D 42 4C 4F 43 4B  |3 FOR A. 3-BLOCK|
00000F10: 20 49 4D 41 47 45 2E 0D  0D 0D 0D 0D 20 20 20 20  | IMAGE......    |
00000F20: D4 48 45 52 45 20 54 48  45 59 20 41 52 45 2C 20  |.HERE THEY ARE, |
00000F30: 54 48 45 20 43 4F 4D 4D  41 4E 44 53 20 55 53 45  |THE COMMANDS USE|
00000F40: 44 0D 49 4E 20 22 53 48  4F 50 50 49 4E 47 20 42  |D.IN "SHOPPING B|
00000F50: 41 47 2E 4F 22 2E 20 20  D4 52 59 20 4C 4F 41 44  |AG.O".  .RY LOAD|
00000F60: 49 4E 47 0D 53 45 56 45  52 41 4C 20 49 4D 41 47  |ING.SEVERAL IMAG|
00000F70: 45 53 20 49 4E 54 4F 20  D0 D2 C9 CE D4 20 D3 C8  |ES INTO ..... ..|
00000F80: CF D0 D0 C9 CE C7 0D C2  C1 C7 20 41 4E 44 20 56  |.......... AND V|
00000F90: 49 45 57 20 54 48 45 4D  20 48 4F 4C 44 49 4E 47  |IEW THEM HOLDING|
00000FA0: 20 54 48 45 20 C3 D2 D3  D2 0D 4B 45 59 20 44 4F  | THE .....KEY DO|
00000FB0: 57 4E 20 41 4E 44 20 59  4F 55 27 4C 4C 20 53 45  |WN AND YOU'LL SE|
00000FC0: 45 20 54 48 41 54 20 54  48 45 0D 49 4D 41 47 45  |E THAT THE.IMAGE|
00000FD0: 53 20 46 4C 49 50 20 42  59 20 50 52 45 54 54 59  |S FLIP BY PRETTY|
00000FE0: 20 46 41 53 54 2E 20 20  D7 49 54 48 0D 4D 4F 52  | FAST.  .ITH.MOR|
00000FF0: 45 20 53 50 45 43 49 46  49 43 20 43 4F 44 45 20  |E SPECIFIC CODE |
00001000: 54 48 49 53 20 46 4C 49  50 50 49 4E 47 20 43 41  |THIS FLIPPING CA|
00001010: 4E 0D 42 45 20 44 4F 4E  45 20 51 55 49 54 45 20  |N.BE DONE QUITE |
00001020: 41 20 42 49 54 20 46 41  53 54 45 52 2E 20 20 C6  |A BIT FASTER.  .|
00001030: 41 53 54 0D 45 4E 4F 55  47 48 20 46 4F 52 20 D0  |AST.ENOUGH FOR .|
00001040: D3 20 4F 52 20 D0 CD 20  41 4E 49 4D 41 54 49 4F  |. OR .. ANIMATIO|
00001050: 4E 2E 0D 0D 20 20 20 20  C9 27 44 20 42 45 20 49  |N...    .'D BE I|
00001060: 4E 54 45 52 45 53 54 45  44 20 49 4E 20 53 45 45  |NTERESTED IN SEE|
00001070: 49 4E 47 20 57 48 41 54  0D 41 20 47 52 41 50 48  |ING WHAT.A GRAPH|
00001080: 49 43 53 20 41 46 49 43  49 4F 4E 41 44 4F 20 43  |ICS AFICIONADO C|
00001090: 41 4E 20 43 4F 4D 45 20  55 50 0D 57 49 54 48 20  |AN COME UP.WITH |
000010A0: 55 53 49 4E 47 20 22 53  48 4F 50 50 49 4E 47 20  |USING "SHOPPING |
000010B0: 42 41 47 2E 4F 22 20 41  4E 44 20 41 0D 42 55 4E  |BAG.O" AND A.BUN|
000010C0: 43 48 20 4F 46 20 53 4C  49 47 48 54 4C 59 20 44  |CH OF SLIGHTLY D|
000010D0: 49 46 46 45 52 49 4E 47  20 49 4D 41 47 45 53 2E  |IFFERING IMAGES.|
000010E0: 0D D4 48 45 20 42 55 46  46 45 52 20 41 52 45 41  |..HE BUFFER AREA|
000010F0: 20 55 53 45 44 20 49 4E  20 D0 D3 C2 20 49 53 0D  | USED IN ... IS.|
00001100: 4C 49 4D 49 54 45 44 20  54 4F 20 31 38 20 49 4D  |LIMITED TO 18 IM|
00001110: 41 47 45 53 2C 20 42 55  54 20 54 48 45 52 45 27  |AGES, BUT THERE'|
00001120: 53 20 4E 4F 0D 52 45 41  53 4F 4E 20 57 48 59 20  |S NO.REASON WHY |
00001130: 59 4F 55 20 43 41 4E 27  54 20 55 53 45 20 44 4F  |YOU CAN'T USE DO|
00001140: 5A 45 4E 53 20 4F 46 0D  49 4D 41 47 45 53 2E 0D  |ZENS OF.IMAGES..|
00001150: 0D 20 20 20 20 D4 48 41  4E 4B 53 20 46 4F 52 20  |.    .HANKS FOR |
00001160: 4A 4F 49 4E 49 4E 47 20  55 53 20 4F 4E 20 4F 55  |JOINING US ON OU|
00001170: 52 0D D0 D2 C9 CE D4 20  D3 C8 CF D0 D0 C9 CE C7  |R...... ........|
00001180: 20 C2 C1 C7 20 41 44 56  45 4E 54 55 52 45 2E 20  | ... ADVENTURE. |
00001190: 20 C9 54 27 53 20 41 0D  4E 45 56 45 52 2D 45 4E  | .T'S A.NEVER-EN|
000011A0: 44 49 4E 47 20 53 41 47  41 20 4F 46 20 47 4F 4F  |DING SAGA OF GOO|
000011B0: 44 20 56 45 52 53 55 53  0D 45 56 49 4C 2C 20 46  |D VERSUS.EVIL, F|
000011C0: 52 41 55 47 48 54 20 57  49 54 48 20 44 41 4E 47  |RAUGHT WITH DANG|
000011D0: 45 52 20 41 4E 44 0D 50  45 53 54 49 4C 45 4E 43  |ER AND.PESTILENC|
000011E0: 45 2E 20 20 CC 45 54 27  53 20 48 4F 50 45 20 4E  |E.  .ET'S HOPE N|
000011F0: 4F 20 49 4E 53 45 43 54  2D 0D 4C 49 4B 45 20 43  |O INSECT-.LIKE C|
00001200: 52 45 41 54 55 52 45 53  20 49 4E 48 41 42 49 54  |REATURES INHABIT|
00001210: 20 54 48 49 53 20 4C 41  54 45 53 54 0D 56 45 52  | THIS LATEST.VER|
00001220: 53 49 4F 4E 20 4F 46 20  D0 D2 C9 CE D4 20 D3 C8  |SION OF ..... ..|
00001230: CF D0 D0 C9 CE C7 20 C2  C1 C7 2E 0D 20 20 20 20  |...... .....    |
00001240: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001250: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 C6 D4  |              ..|
00001260: 0D 20 20 20 20 20 20 20  20 20 2A 2A 2A 2A 20 C5  |.         **** .|
00001270: 4E 44 20 4F 46 20 D4 45  58 54 20 2A 2A 2A 2A 0D  |ND OF .EXT ****.|
..^U:ZERO.   BITS: ALL ABOUT "SHOPPING B
AG.O"..          BY FENDER TUCKER..    T
HIS LITTLE OBJECT FILE HAS GROWN.FROM 2 
BLOCKS TO 4 BLOCKS SINCE IT.WAS FIRST CR
EATED BY SCOTT RESH, AND.IT IS POWERFUL!
  IT'S THE DRIVING.FORCE BEHIND PRINT SH
OPPING BAG.  ALL.OF THE BASIC CODE THAT 
MAKES UP PSB.IS MERELY A WAY TO CHOOSE F
ILES TO.RUN THROUGH "SHOPPING BAG.O"'S.W
RINGER.  THIS IS THE BABY...    THE FOLL
OWING ARTICLE EXPLAINS.HOW TO USE "SHOPP
ING BAG.O"'S POWER,.BECAUSE I THINK THAT
 AN IMAGINATIVE.PROGRAMMER CAN COME UP W
ITH OTHER.USES FOR IT BESIDES PSB...    
THE NEW FEATURE THAT SCOTT ADDED.THIS WE
EK IS THE "VIEW" FUNCTION.  IT.BASICALLY
 TAKES AN IMAGE'S DATA AND.CREATES PART 
OF A FONT OUT OF IT..THE FIRST 77 REVERS
ED CHARACTERS ARE.USED.  KEEP THIS IN MI
ND -- IT MEANS.THAT YOU CAN'T USE REVERS
ED CHARACTERS.ON THE SAME SCREEN AS AN I
MAGE...    MORE ABOUT THE VIEW FUNCTION.
LATER, LET'S START WITH THE BEGINNING.OF
 "SHOPPING BAG.O", AT 49152 (#C000)..IN 
THIS TEXT, PS OR S MEANS PRINT.SHOP AND 
PM OR M MEANS PRINTMASTER.......* CONVER
T 3-BLOCK PS TO 2-BLOCK PS..SYS49152,PAG
E POINTER,LOGICAL FILE #.. "PAGE POINTER
" MEANS THE PAGE. WHERE THE IMAGE DATA I
S LOADED.  IF. YOU USE THIS SYNTAX TO LO
AD AN IMAGE.. SYS57812"FILENAME",8,0:POK
E780,0:.   POKE781,0:POKE782,96:SYS65493
.. THEN THE PAGE POINTER IS 96... A CONV
ERTED FILE WILL BE SAVED TO. DISK.  YOU 
MUST OPEN A FILE BEFORE. MAKING THE SYS 
CALL..... HERE'S THE SYNTAX TO USE TO OP
EN A. FILE FOR WRITING A CONVERTED FILE.
.. OPENFILE#,DEVICE #,1,FILENAME.. I USE
 THIS IN PRINT SHOPPING BAG... OPEN2,DN,
1,D$.. 2 IS THE FILE NUMBER.  DN IS 8, 9
,. 10 OR 11, DEPENDING UPON THE DEVICE. 
CHOSEN BY THE USER.  1 MEANS "WRITE". RA
THER THAN "READ", AND D$ IS THE. FILENAM
E I WANT THE CONVERTED FILE. TO BE CALLE
D... SO, WHATEVER LOGICAL FILE YOU OPENE
D,. USE THAT NUMBER IN THE SYS COMMAND..
.* CONVERT 3-BLOCK PS TO 2-BLOCK PS..SYS
49155,PAGE POINTER,LOGICAL FILE #.. EVER
YTHING ABOUT THIS IS THE SAME. AS FOR SY
S49152...* CONVERT BETWEEN PS AND PM (3-
BLOCK)..SYS49158,"S" OR "M",PAGE POINTER
,.  LOGICAL FILE #.. "PAGE POINTER" AND 
"LOGICAL FILE #". ARE THE SAME AS ABOVE.
.. USE "S" FOR PS TO PM. USE "M" FOR PM 
TO PS...* CONVERT PM TO 2-BLOCK PS..SYS4
9161,PAGE POINTER,LOGICAL FILE #.. SAME 
AS ABOVE...* CONVERT 2-BLOCK PS TO PM..S
YS49164,PAGE POINTER,LOGICAL FILE #.. SA
ME AS ABOVE...    THE FOLLOWING COMMANDS
 ARE FOR.THE "VIEW" FUNCTION.......* INI
TIALIZE IMAGE VIEWER...SYS49167,FONT PAG
E,X COORD,Y COORD.. THIS COMMAND DOES NO
T DISPLAY. ANYTHING -- IT ONLY GETS THE 
PROGRAM. READY FOR DISPLAYING... "FONT P
AGE" IS THE HIGH-BYTE OF THE. AREA WHERE
 YOUR FONT IS STORED.  YOU. MUST BE USIN
G A CUSTOM FONT IN YOUR. PROGRAM.  THE D
EFAULT FONT WON'T. WORK.  IF YOUR FONT I
S LOCATED AT. 14336 ($3800) THEN THE HIG
H BYTE IS. $38, OR 56 DECIMAL.  USE 56 A
S "FONT. PAGE"..... THE X COORDINATE IS 
A NUMBER BETWEEN. 0 AND 29 THAT TELLS WH
ERE ON THE. SCREEN THE IMAGE WILL BE SHO
WN.  YOU. CAN'T USE A NUMBER LARGER THAN
 29. BECAUSE AN IMAGE MAY BE UP TO 11. C
HARACTERS ACROSS... THE Y COORDINATE IS 
A NUMBER BETWEEN. 0 AND 18.  AN IMAGE MA
Y BE AS TALL. AS 7 CHARACTERS...........
* DISPLAY AN IMAGE..SYS49170,PAGE POINTE
R,TYPE OF IMAGE.. THE "TYPE OF IMAGE" US
ES THIS CODE:.. 1 - PM IMAGE. 2 - 2-BLOC
K PS IMAGE. 3 - 3-BLOCK PS IMAGE..* DISA
BLE VIEWER..SYS49173.. DO THIS WHEN YOU 
ARE THROUGH VIEWING. AN IMAGE.  SINCE TH
E VIEWER USES A. COPY OF YOUR CUSTOM FON
T, THIS IS. NEEDED TO RESTORE YOUR FONT.
..* CLEAR BUFFER AREA (FOR PS ONLY)..SYS
49176,PAGE POINTER,2 OR 3.. SINCE DIFFER
ENT VERSIONS OF THE. PRINT SHOP PROGRAM 
BY BRODERBUND. SAVE IMAGES DIFFERENTLY, 
IT MAY BE. NECESSARY TO CLEAR OUT THE AR
EA. WHERE YOU PLAN TO LOAD THE IMAGES.. 
IF YOU SEE GARBAGE AT THE VERY. BOTTOM O
F AN IMAGE, YOU NEED TO. USE THIS SYS BE
FORE LOADING THE. IMAGE.  USE 2 AS THE L
AST PARAMETER. FOR A 2-BLOCK IMAGE, AND 
3 FOR A. 3-BLOCK IMAGE......    THERE TH
EY ARE, THE COMMANDS USED.IN "SHOPPING B
AG.O".  TRY LOADING.SEVERAL IMAGES INTO 
PRINT SHOPPING.BAG AND VIEW THEM HOLDING
 THE CRSR.KEY DOWN AND YOU'LL SEE THAT T
HE.IMAGES FLIP BY PRETTY FAST.  WITH.MOR
E SPECIFIC CODE THIS FLIPPING CAN.BE DON
E QUITE A BIT FASTER.  FAST.ENOUGH FOR P
S OR PM ANIMATION...    I'D BE INTERESTE
D IN SEEING WHAT.A GRAPHICS AFICIONADO C
AN COME UP.WITH USING "SHOPPING BAG.O" A
ND A.BUNCH OF SLIGHTLY DIFFERING IMAGES.
.THE BUFFER AREA USED IN PSB IS.LIMITED 
TO 18 IMAGES, BUT THERE'S NO.REASON WHY 
YOU CAN'T USE DOZENS OF.IMAGES...    THA
NKS FOR JOINING US ON OUR.PRINT SHOPPING
 BAG ADVENTURE.  IT'S A.NEVER-ENDING SAG
A OF GOOD VERSUS.EVIL, FRAUGHT WITH DANG
ER AND.PESTILENCE.  LET'S HOPE NO INSECT
-.LIKE CREATURES INHABIT THIS LATEST.VER
SION OF PRINT SHOPPING BAG..            
                      FT.         **** E
ND OF TEXT ****.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL