T.BASICS
FILE INFORMATION
FILENAME(S): T.BASICS
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 18:12:10
APPEARS ON: 1 disk(s)
FILE HASH
12202f093b9f2b1ff8041340b4766684e068145fcaff90dec8a3e48c277f04c2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 50 S 1 | T.BASICS | PRG | Sailor, Ganheden | 12 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 80 5E 55 3A 5A 45 52 4F 0D 0D 20 20 20 C2 C1 |..^U:ZERO.. ..| 00000010: D3 C9 C3 D3 3A 20 CC CF C1 C4 D3 D4 C1 D2 20 C8 |....: ........ .| 00000020: 49 4E 54 53 20 41 4E 44 20 D4 49 50 53 0D 0D 20 |INTS AND .IPS.. | 00000030: 20 20 20 20 20 20 20 20 42 59 20 C6 45 4E 44 45 | BY .ENDE| 00000040: 52 20 D4 55 43 4B 45 52 0D 0D 20 20 20 20 C9 46 |R .UCKER.. .F| 00000050: 20 59 4F 55 20 52 45 41 44 20 C3 4F 4D 4D 4F 44 | YOU READ .OMMOD| 00000060: 4F 52 45 20 CD 41 47 41 5A 49 4E 45 2C 0D D2 D5 |ORE .AGAZINE,...| 00000070: CE 2C 20 C1 C8 CF D9 2C 20 C3 4F 4D 50 55 54 45 |., ...., .OMPUTE| 00000080: 21 27 53 20 C7 41 5A 45 54 54 45 20 4F 52 0D D4 |!'S .AZETTE OR..| 00000090: 52 41 4E 53 41 43 54 4F 52 2C 20 59 4F 55 20 41 |RANSACTOR, YOU A| 000000A0: 52 45 20 50 52 4F 42 41 42 4C 59 20 41 57 41 52 |RE PROBABLY AWAR| 000000B0: 45 20 4F 46 0D 48 55 4E 44 52 45 44 53 20 4F 46 |E OF.HUNDREDS OF| 000000C0: 20 D0 C5 C5 CB 53 20 41 4E 44 20 D0 CF CB C5 53 | ....S AND ....S| 000000D0: 20 54 48 41 54 20 41 52 45 0D 48 41 4E 44 59 20 | THAT ARE.HANDY | 000000E0: 46 4F 52 20 41 4C 4C 20 50 52 4F 47 52 41 4D 4D |FOR ALL PROGRAMM| 000000F0: 45 52 53 2E 20 20 D4 48 49 53 0D 4D 4F 4E 54 48 |ERS. .HIS.MONTH| 00000100: 20 C9 20 48 41 56 45 20 41 54 54 45 4D 50 54 45 | . HAVE ATTEMPTE| 00000110: 44 20 54 4F 20 43 4F 4D 50 49 4C 45 0D 53 4F 4D |D TO COMPILE.SOM| 00000120: 45 20 54 48 41 54 20 41 52 45 20 4F 46 20 49 4E |E THAT ARE OF IN| 00000130: 54 45 52 45 53 54 20 54 4F 20 52 45 41 44 45 52 |TEREST TO READER| 00000140: 53 0D 41 4E 44 20 50 52 4F 47 52 41 4D 4D 45 52 |S.AND PROGRAMMER| 00000150: 53 20 4F 46 20 CC CF C1 C4 D3 D4 C1 D2 0D 53 50 |S OF .........SP| 00000160: 45 43 49 46 49 43 41 4C 4C 59 2E 20 20 C9 46 20 |ECIFICALLY. .F | 00000170: 59 4F 55 20 48 41 56 45 20 41 20 50 52 4F 47 52 |YOU HAVE A PROGR| 00000180: 41 4D 0D 59 4F 55 20 41 52 45 20 54 48 49 4E 4B |AM.YOU ARE THINK| 00000190: 49 4E 47 20 4F 46 20 53 55 42 4D 49 54 54 49 4E |ING OF SUBMITTIN| 000001A0: 47 20 54 4F 20 55 53 2C 0D C9 20 54 48 49 4E 4B |G TO US,.. THINK| 000001B0: 20 59 4F 55 27 4C 4C 20 46 49 4E 44 20 53 45 56 | YOU'LL FIND SEV| 000001C0: 45 52 41 4C 20 52 4F 55 54 49 4E 45 53 0D 4F 46 |ERAL ROUTINES.OF| 000001D0: 20 49 4E 54 45 52 45 53 54 20 48 45 52 45 2E 0D | INTEREST HERE..| 000001E0: 0D 0D 23 31 20 2D 20 C1 4C 4C 20 50 52 4F 47 52 |..#1 - .LL PROGR| 000001F0: 41 4D 53 20 53 48 4F 55 4C 44 20 41 4C 4C 4F 57 |AMS SHOULD ALLOW| 00000200: 20 41 20 55 53 45 52 0D 54 4F 20 52 45 54 55 52 | A USER.TO RETUR| 00000210: 4E 20 54 4F 20 CC CF C1 C4 D3 D4 C1 D2 20 45 41 |N TO ........ EA| 00000220: 53 49 4C 59 2E 20 20 C8 41 56 45 20 41 0D 4D 45 |SILY. .AVE A.ME| 00000230: 53 53 41 47 45 20 4F 4E 20 54 48 45 20 50 4C 41 |SSAGE ON THE PLA| 00000240: 59 20 53 43 52 45 45 4E 20 4F 52 20 4F 4E 20 41 |Y SCREEN OR ON A| 00000250: 0D 48 45 4C 50 20 53 43 52 45 45 4E 20 54 48 41 |.HELP SCREEN THA| 00000260: 54 20 53 41 59 53 20 53 4F 4D 45 54 48 49 4E 47 |T SAYS SOMETHING| 00000270: 20 4C 49 4B 45 2C 0D 22 D0 52 45 53 53 20 D1 20 | LIKE,.".RESS . | 00000280: 54 4F 20 51 55 49 54 22 20 4F 52 20 22 C6 37 20 |TO QUIT" OR ".7 | 00000290: 2D 20 D2 45 54 55 52 4E 20 54 4F 0D CC CF C1 C4 |- .ETURN TO.....| 000002A0: D3 D4 C1 D2 22 2E 20 20 D7 48 45 4E 20 54 48 45 |....". .HEN THE| 000002B0: 20 55 53 45 52 20 50 52 45 53 53 45 53 20 54 48 | USER PRESSES TH| 000002C0: 45 0D 4B 45 59 20 41 20 50 52 4F 4D 50 54 20 53 |E.KEY A PROMPT S| 000002D0: 48 4F 55 4C 44 20 41 50 50 45 41 52 2C 20 22 C1 |HOULD APPEAR, ".| 000002E0: 52 45 20 59 4F 55 0D 53 55 52 45 20 59 4F 55 20 |RE YOU.SURE YOU | 000002F0: 57 41 4E 54 20 54 4F 20 51 55 49 54 3F 20 28 D9 |WANT TO QUIT? (.| 00000300: 2F CE 29 22 2E 20 20 C1 54 0D 54 48 49 53 20 50 |/.)". .T.THIS P| 00000310: 4F 49 4E 54 20 59 4F 55 52 20 43 4F 44 45 20 53 |OINT YOUR CODE S| 00000320: 48 4F 55 4C 44 20 4C 4F 4F 4B 20 4C 49 4B 45 3A |HOULD LOOK LIKE:| 00000330: 0D 0D 35 30 30 20 C7 C5 D4 C1 24 3A C9 C6 C1 24 |..500 ....$:...$| 00000340: 3C 3E 22 D9 22 C1 CE C4 C1 24 3C 3E 22 CE 22 D4 |<>"."....$<>".".| 00000350: C8 C5 CE 35 30 30 0D 35 31 30 20 C9 C6 C1 24 3D |...500.510 ...$=| 00000360: 22 CE 22 D4 C8 C5 CE 2E 2E 2E 2E 42 41 43 4B 20 |"."........BACK | 00000370: 54 4F 20 50 52 4F 47 52 41 4D 0D 35 32 30 20 CF |TO PROGRAM.520 .| 00000380: D0 C5 CE 31 35 2C 38 2C 31 35 2C 22 D2 30 3A C8 |...15,8,15,".0:.| 00000390: C5 CC CC CF 20 C3 CF CE CE C5 C3 D4 3D 0D 20 20 |.... .......=. | 000003A0: C8 C5 CC CC CF 20 C3 CF CE CE C5 C3 D4 22 3A C9 |..... .......":.| 000003B0: CE D0 D5 D4 23 31 35 2C C5 D2 25 3A C3 CC CF D3 |....#15,..%:....| 000003C0: C5 31 35 0D 35 33 30 20 C9 C6 C5 D2 25 3C 3E 36 |.15.530 ....%<>6| 000003D0: 33 D4 C8 C5 CE C5 CE C4 0D 35 34 30 20 CC CF C1 |3........540 ...| 000003E0: C4 22 C8 C5 CC CC CF 20 C3 CF CE CE C5 C3 D4 22 |."..... ......."| 000003F0: 2C 38 0D 0D CC 49 4E 45 20 35 32 30 20 49 53 20 |,8...INE 520 IS | 00000400: 41 20 53 4C 49 43 4B 20 57 41 59 20 4F 46 20 4D |A SLICK WAY OF M| 00000410: 41 4B 49 4E 47 0D 53 55 52 45 20 41 20 CC CF C1 |AKING.SURE A ...| 00000420: C4 D3 D4 C1 D2 20 44 49 53 4B 20 49 53 20 49 4E |..... DISK IS IN| 00000430: 20 54 48 45 20 44 52 49 56 45 2E 0D 23 32 20 2D | THE DRIVE..#2 -| 00000440: 20 C1 20 50 52 4F 47 52 41 4D 20 54 48 41 54 20 | . PROGRAM THAT | 00000450: 53 48 4F 57 53 20 54 48 45 20 55 53 45 52 0D 54 |SHOWS THE USER.T| 00000460: 48 45 20 4C 49 53 54 20 4F 46 20 43 4F 4D 4D 41 |HE LIST OF COMMA| 00000470: 4E 44 53 20 41 54 20 54 48 45 20 42 45 47 49 4E |NDS AT THE BEGIN| 00000480: 4E 49 4E 47 0D 4F 46 20 54 48 45 20 50 52 4F 47 |NING.OF THE PROG| 00000490: 52 41 4D 20 41 4E 44 20 45 58 50 45 43 54 53 20 |RAM AND EXPECTS | 000004A0: 54 48 45 20 55 53 45 52 0D 54 4F 20 52 45 4D 45 |THE USER.TO REME| 000004B0: 4D 42 45 52 20 54 48 45 4D 20 54 48 52 4F 55 47 |MBER THEM THROUG| 000004C0: 48 4F 55 54 20 54 48 45 0D 50 52 4F 47 52 41 4D |HOUT THE.PROGRAM| 000004D0: 20 49 53 20 4E 4F 54 20 56 45 52 59 20 46 52 49 | IS NOT VERY FRI| 000004E0: 45 4E 44 4C 59 2E 20 20 D3 45 45 0D D3 C3 D2 C5 |ENDLY. .EE.....| 000004F0: C5 CE 20 D3 D7 C9 D4 C3 C8 C5 D2 20 4F 4E 20 54 |.. ........ ON T| 00000500: 48 49 53 20 49 53 53 55 45 20 46 4F 52 20 4F 4E |HIS ISSUE FOR ON| 00000510: 45 0D 57 41 59 20 4F 46 20 4D 41 4B 49 4E 47 20 |E.WAY OF MAKING | 00000520: 59 4F 55 52 20 50 52 4F 47 52 41 4D 20 42 45 54 |YOUR PROGRAM BET| 00000530: 54 45 52 2E 0D 0D 23 33 20 2D 20 CF 46 54 45 4E |TER...#3 - .FTEN| 00000540: 20 41 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 | A PROGRAM WILL | 00000550: 48 41 56 45 20 54 48 49 4E 47 53 0D 53 43 52 4F |HAVE THINGS.SCRO| 00000560: 4C 4C 49 4E 47 20 55 50 20 41 4E 44 20 4F 46 46 |LLING UP AND OFF| 00000570: 20 54 48 45 20 53 43 52 45 45 4E 2E 20 20 D4 48 | THE SCREEN. .H| 00000580: 45 0D 46 52 49 45 4E 44 4C 59 20 54 48 49 4E 47 |E.FRIENDLY THING| 00000590: 20 49 53 20 54 4F 20 48 41 56 45 20 41 20 50 52 | IS TO HAVE A PR| 000005A0: 4F 4D 50 54 20 4F 4E 0D 54 48 45 20 53 43 52 45 |OMPT ON.THE SCRE| 000005B0: 45 4E 20 54 4F 20 54 45 4C 4C 20 54 48 45 20 55 |EN TO TELL THE U| 000005C0: 53 45 52 20 57 48 49 43 48 20 4B 45 59 0D 54 4F |SER WHICH KEY.TO| 000005D0: 20 50 52 45 53 53 20 54 4F 20 50 41 55 53 45 20 | PRESS TO PAUSE | 000005E0: 4F 52 20 48 41 4C 54 20 54 48 45 20 4C 49 53 54 |OR HALT THE LIST| 000005F0: 49 4E 47 0D 42 55 54 20 48 4F 57 20 43 41 4E 20 |ING.BUT HOW CAN | 00000600: 59 4F 55 20 4B 45 45 50 20 54 48 45 20 50 52 4F |YOU KEEP THE PRO| 00000610: 4D 50 54 20 46 52 4F 4D 0D 53 43 52 4F 4C 4C 49 |MPT FROM.SCROLLI| 00000620: 4E 47 3F 20 20 C5 41 53 59 2C 20 4A 55 53 54 20 |NG? .ASY, JUST | 00000630: 43 48 45 43 4B 20 4F 55 54 20 CA 49 4D 0D D2 4F |CHECK OUT .IM..O| 00000640: 57 27 53 20 C2 D9 D4 C5 D3 20 53 45 43 54 49 4F |W'S ..... SECTIO| 00000650: 4E 20 4F 46 20 DA C5 D2 CF 20 D0 C1 C7 C5 20 4F |N OF .... .... O| 00000660: 4E 0D 54 48 49 53 20 49 53 53 55 45 2E 0D 0D 0D |N.THIS ISSUE....| 00000670: 23 34 20 2D 20 C8 41 56 45 20 59 4F 55 20 45 56 |#4 - .AVE YOU EV| 00000680: 45 52 20 50 52 49 4E 54 45 44 20 41 20 4C 49 53 |ER PRINTED A LIS| 00000690: 54 20 4F 46 0D 54 48 49 4E 47 53 20 54 4F 20 54 |T OF.THINGS TO T| 000006A0: 48 45 20 53 43 52 45 45 4E 20 41 4E 44 20 46 4F |HE SCREEN AND FO| 000006B0: 55 4E 44 20 54 48 41 54 0D 54 48 45 52 45 20 49 |UND THAT.THERE I| 000006C0: 53 20 41 20 42 4C 41 4E 4B 20 4C 49 4E 45 20 49 |S A BLANK LINE I| 000006D0: 4E 20 54 48 45 20 4D 49 44 44 4C 45 0D 4F 46 20 |N THE MIDDLE.OF | 000006E0: 59 4F 55 52 20 4C 49 53 54 20 41 4E 44 20 49 54 |YOUR LIST AND IT| 000006F0: 27 53 20 41 20 52 45 41 4C 20 50 41 49 4E 20 54 |'S A REAL PAIN T| 00000700: 4F 0D 54 52 59 20 54 4F 20 47 45 54 20 52 49 44 |O.TRY TO GET RID| 00000710: 20 4F 46 20 54 48 49 53 20 42 4C 41 4E 4B 20 4C | OF THIS BLANK L| 00000720: 49 4E 45 3F 0D D4 48 49 53 20 55 53 55 41 4C 4C |INE?..HIS USUALL| 00000730: 59 20 48 41 50 50 45 4E 53 20 57 48 45 4E 20 41 |Y HAPPENS WHEN A| 00000740: 20 4C 49 4E 45 20 55 53 45 53 0D 54 48 45 20 46 | LINE USES.THE F| 00000750: 41 52 20 52 49 47 48 54 20 43 4F 4C 55 4D 4E 20 |AR RIGHT COLUMN | 00000760: 4F 46 20 54 48 45 20 53 43 52 45 45 4E 2E 0D CF |OF THE SCREEN...| 00000770: 4E 45 20 57 41 59 20 54 4F 20 47 45 54 20 41 52 |NE WAY TO GET AR| 00000780: 4F 55 4E 44 20 54 48 49 53 20 49 53 20 54 4F 20 |OUND THIS IS TO | 00000790: 4E 4F 54 0D 55 53 45 20 54 48 45 20 34 30 54 48 |NOT.USE THE 40TH| 000007A0: 20 43 4F 4C 55 4D 4E 2E 20 20 C1 4E 4F 54 48 45 | COLUMN. .NOTHE| 000007B0: 52 20 57 41 59 20 49 53 0D 54 4F 20 52 45 53 45 |R WAY IS.TO RESE| 000007C0: 54 20 54 48 45 20 4C 49 4E 45 20 4C 49 4E 4B 20 |T THE LINE LINK | 000007D0: 54 41 42 4C 45 20 57 48 49 43 48 0D 43 4F 4E 53 |TABLE WHICH.CONS| 000007E0: 49 53 54 53 20 4F 46 20 32 35 20 42 59 54 45 53 |ISTS OF 25 BYTES| 000007F0: 20 46 52 4F 4D 20 4D 45 4D 4F 52 59 0D 4C 4F 43 | FROM MEMORY.LOC| 00000800: 41 54 49 4F 4E 20 32 31 37 20 54 4F 20 32 34 32 |ATION 217 TO 242| 00000810: 20 49 4E 20 5A 45 52 4F 20 50 41 47 45 2E 0D C5 | IN ZERO PAGE...| 00000820: 41 43 48 20 42 59 54 45 20 52 45 50 52 45 53 45 |ACH BYTE REPRESE| 00000830: 4E 54 53 20 41 20 53 43 52 45 45 4E 20 4C 49 4E |NTS A SCREEN LIN| 00000840: 45 20 2D 0D 32 31 37 20 54 48 45 20 54 4F 50 20 |E -.217 THE TOP | 00000850: 4C 49 4E 45 20 41 4E 44 20 32 34 32 20 54 48 45 |LINE AND 242 THE| 00000860: 20 42 4F 54 54 4F 4D 0D 4C 49 4E 45 2E 20 20 D4 | BOTTOM.LINE. .| 00000870: 48 45 20 48 49 47 48 20 42 49 54 20 4F 46 20 54 |HE HIGH BIT OF T| 00000880: 48 45 20 4F 46 46 45 4E 44 49 4E 47 0D 4C 49 4E |HE OFFENDING.LIN| 00000890: 4B 20 42 59 54 45 20 4D 55 53 54 20 42 45 20 D3 |K BYTE MUST BE .| 000008A0: C5 D4 2E 20 20 D4 48 49 53 20 43 4F 44 45 0D 52 |... .HIS CODE.R| 000008B0: 45 53 45 54 53 20 41 4C 4C 20 4F 46 20 54 48 45 |ESETS ALL OF THE| 000008C0: 20 4C 49 4E 45 20 4C 49 4E 4B 53 2E 0D 0D C6 CF | LINE LINKS.....| 000008D0: D2 C9 3D 32 31 37 D4 CF 32 34 32 3A D0 CF CB C5 |..=217..242:....| 000008E0: C9 2C D0 C5 C5 CB 28 C9 29 CF D2 31 32 38 3A CE |.,....(.)..128:.| 000008F0: C5 D8 D4 0D D4 48 49 53 20 49 53 20 4F 46 54 45 |.....HIS IS OFTE| 00000900: 4E 20 45 41 53 49 45 52 20 54 48 41 4E 20 43 4F |N EASIER THAN CO| 00000910: 55 4E 54 49 4E 47 0D 57 48 49 43 48 20 4C 49 4E |UNTING.WHICH LIN| 00000920: 45 20 49 53 20 54 48 45 20 43 55 4C 50 52 49 54 |E IS THE CULPRIT| 00000930: 2C 20 41 44 44 49 4E 47 0D 54 48 41 54 20 4E 55 |, ADDING.THAT NU| 00000940: 4D 42 45 52 20 54 4F 20 32 31 37 20 41 4E 44 20 |MBER TO 217 AND | 00000950: 53 45 54 54 49 4E 47 20 54 48 45 0D 48 49 47 48 |SETTING THE.HIGH| 00000960: 20 42 49 54 20 4F 46 20 54 48 41 54 20 42 59 54 | BIT OF THAT BYT| 00000970: 45 2E 0D 0D 23 35 20 2D 20 D7 48 45 4E 45 56 45 |E...#5 - .HENEVE| 00000980: 52 20 C9 20 53 45 45 20 54 4F 4F 20 4D 41 4E 59 |R . SEE TOO MANY| 00000990: 20 52 45 56 45 52 53 45 44 0D 51 27 53 20 49 4E | REVERSED.Q'S IN| 000009A0: 20 41 20 4C 49 53 54 49 4E 47 20 C9 20 54 48 49 | A LISTING . THI| 000009B0: 4E 4B 20 41 42 4F 55 54 20 45 58 54 52 41 0D CC |NK ABOUT EXTRA..| 000009C0: CF C1 C4 49 4E 47 20 54 49 4D 45 20 41 4E 44 20 |...ING TIME AND | 000009D0: 57 41 53 54 45 44 20 44 49 53 4B 20 53 50 41 43 |WASTED DISK SPAC| 000009E0: 45 2E 0D C9 20 52 45 41 4C 49 5A 45 20 54 48 41 |E... REALIZE THA| 000009F0: 54 20 54 48 45 53 45 20 41 52 45 20 52 45 4C 41 |T THESE ARE RELA| 00000A00: 54 49 56 45 4C 59 0D 4D 49 4E 4F 52 20 43 4F 4E |TIVELY.MINOR CON| 00000A10: 53 49 44 45 52 41 54 49 4F 4E 53 20 49 4E 20 54 |SIDERATIONS IN T| 00000A20: 48 45 53 45 20 44 41 59 53 20 4F 46 0D C6 41 53 |HESE DAYS OF..AS| 00000A30: 54 CC 4F 41 44 53 20 41 4E 44 20 43 48 45 41 50 |T.OADS AND CHEAP| 00000A40: 20 4D 45 4D 4F 52 59 2C 20 42 55 54 20 C9 0D 53 | MEMORY, BUT ..S| 00000A50: 54 49 4C 4C 20 43 52 49 4E 47 45 20 41 20 4C 49 |TILL CRINGE A LI| 00000A60: 54 54 4C 45 2E 20 20 D4 4F 20 50 4F 53 49 54 49 |TTLE. .O POSITI| 00000A70: 4F 4E 0D 59 4F 55 52 20 43 55 52 53 4F 52 20 54 |ON.YOUR CURSOR T| 00000A80: 4F 20 41 20 50 41 52 54 49 43 55 4C 41 52 20 53 |O A PARTICULAR S| 00000A90: 43 52 45 45 4E 0D 4C 49 4E 45 20 28 53 41 59 2C |CREEN.LINE (SAY,| 00000AA0: 20 32 33 29 20 55 53 45 20 54 48 49 53 20 43 4F | 23) USE THIS CO| 00000AB0: 4D 4D 41 4E 44 3A 0D 0D D0 CF CB C5 32 31 34 2C |MMAND:......214,| 00000AC0: 32 33 2D 32 3A D0 D2 C9 CE D4 3A D0 D2 C9 CE D4 |23-2:.....:.....| 00000AD0: 22 4D 45 53 53 41 47 45 22 0D 0D D9 4F 55 20 43 |"MESSAGE"...OU C| 00000AE0: 41 4E 20 45 56 45 4E 20 D0 CF CB C5 20 41 20 56 |AN EVEN .... A V| 00000AF0: 41 52 49 41 42 4C 45 20 49 4E 54 4F 20 32 31 34 |ARIABLE INTO 214| 00000B00: 0D 41 4E 44 20 43 41 4C 43 55 4C 41 54 45 20 54 |.AND CALCULATE T| 00000B10: 48 45 20 54 41 52 47 45 54 20 4C 49 4E 45 2E 0D |HE TARGET LINE..| 00000B20: 23 36 20 2D 20 C8 45 52 45 27 53 20 41 20 4E 49 |#6 - .ERE'S A NI| 00000B30: 46 54 59 20 54 52 49 43 4B 20 C9 20 4C 45 41 52 |FTY TRICK . LEAR| 00000B40: 4E 45 44 0D 46 52 4F 4D 20 CA 49 4D 20 C8 49 4C |NED.FROM .IM .IL| 00000B50: 54 59 2E 20 20 D2 45 4D 45 4D 42 45 52 20 41 4C |TY. .EMEMBER AL| 00000B60: 4C 20 54 48 45 0D 54 49 4D 45 53 20 C9 27 56 45 |L THE.TIMES .'VE| 00000B70: 20 45 58 50 4C 41 49 4E 45 44 20 54 48 41 54 20 | EXPLAINED THAT | 00000B80: 57 48 45 4E 20 59 4F 55 0D 55 53 45 20 54 48 45 |WHEN YOU.USE THE| 00000B90: 20 CC CF C1 C4 22 4E 41 4D 45 22 2C 38 2C 31 20 | ...."NAME",8,1 | 00000BA0: 46 52 4F 4D 0D 57 49 54 48 49 4E 20 41 20 C2 C1 |FROM.WITHIN A ..| 00000BB0: D3 C9 C3 20 50 52 4F 47 52 41 4D 20 54 48 45 20 |... PROGRAM THE | 00000BC0: 50 52 4F 47 52 41 4D 0D 43 4F 55 4E 54 45 52 20 |PROGRAM.COUNTER | 00000BD0: 53 54 41 52 54 53 20 4F 56 45 52 20 41 54 20 54 |STARTS OVER AT T| 00000BE0: 48 45 20 42 45 47 49 4E 4E 49 4E 47 0D 4F 46 20 |HE BEGINNING.OF | 00000BF0: 54 48 45 20 50 52 4F 47 52 41 4D 20 53 4F 20 59 |THE PROGRAM SO Y| 00000C00: 4F 55 20 4E 45 45 44 20 41 20 4C 49 4E 45 0D 4C |OU NEED A LINE.L| 00000C10: 49 4B 45 20 35 20 C9 C6 C1 3D 30 D4 C8 C5 CE C1 |IKE 5 ...=0.....| 00000C20: 3D 31 3A CC CF C1 C4 22 4E 41 4D 45 22 2C 38 2C |=1:...."NAME",8,| 00000C30: 31 20 41 53 0D 59 4F 55 52 20 46 49 52 53 54 20 |1 AS.YOUR FIRST | 00000C40: 4C 49 4E 45 2E 20 20 D7 45 4C 4C 2C 20 46 4F 52 |LINE. .ELL, FOR| 00000C50: 47 45 54 20 54 48 41 54 2E 0D D4 48 49 53 20 53 |GET THAT...HIS S| 00000C60: 59 4E 54 41 58 20 57 49 4C 4C 20 CC CF C1 C4 20 |YNTAX WILL .... | 00000C70: 49 4E 20 41 20 46 49 4C 45 20 41 4E 44 0D CE CF |IN A FILE AND...| 00000C80: D4 20 53 54 41 52 54 20 54 48 45 20 50 52 4F 47 |. START THE PROG| 00000C90: 52 41 4D 20 43 4F 55 4E 54 45 52 20 4F 56 45 52 |RAM COUNTER OVER| 00000CA0: 2C 0D 4E 4F 20 4D 41 54 54 45 52 20 57 48 45 52 |,.NO MATTER WHER| 00000CB0: 45 20 49 54 27 53 20 46 4F 55 4E 44 20 49 4E 20 |E IT'S FOUND IN | 00000CC0: 59 4F 55 52 0D C2 C1 D3 C9 C3 20 50 52 4F 47 52 |YOUR...... PROGR| 00000CD0: 41 4D 2E 0D 0D 35 30 30 20 D0 CF CB C5 31 34 37 |AM...500 ....147| 00000CE0: 2C 30 3A D3 D9 D3 35 37 38 31 32 22 4E 41 4D 45 |,0:...57812"NAME| 00000CF0: 22 2C 38 2C 31 3A 0D 20 20 20 20 20 D3 D9 D3 36 |",8,1:. ...6| 00000D00: 32 36 33 31 0D 0D D4 48 41 4E 4B 53 2C 20 CA 49 |2631...HANKS, .I| 00000D10: 4D 2C 20 C9 20 4E 45 45 44 45 44 20 54 48 41 54 |M, . NEEDED THAT| 00000D20: 2E 0D 0D 23 37 20 2D 20 C5 56 45 52 59 42 4F 44 |...#7 - .VERYBOD| 00000D30: 59 20 53 45 45 4D 53 20 54 4F 20 48 41 56 45 20 |Y SEEMS TO HAVE | 00000D40: 54 48 45 49 52 0D 4F 57 4E 20 53 59 53 54 45 4D |THEIR.OWN SYSTEM| 00000D50: 20 46 4F 52 20 50 52 49 4E 54 49 4E 47 20 41 20 | FOR PRINTING A | 00000D60: 42 55 4E 43 48 20 4F 46 0D 54 45 58 54 20 54 4F |BUNCH OF.TEXT TO| 00000D70: 20 54 48 45 20 53 43 52 45 45 4E 2E 20 20 D3 4F | THE SCREEN. .O| 00000D80: 4D 45 20 55 53 45 0D 53 45 4D 49 2D 43 4F 4C 4F |ME USE.SEMI-COLO| 00000D90: 4E 53 20 41 46 54 45 52 20 45 41 43 48 20 4C 49 |NS AFTER EACH LI| 00000DA0: 4E 45 2C 20 53 4F 4D 45 20 55 53 45 0D 43 55 52 |NE, SOME USE.CUR| 00000DB0: 53 4F 52 2D 52 49 47 48 54 53 20 49 4E 53 54 45 |SOR-RIGHTS INSTE| 00000DC0: 41 44 20 4F 46 20 53 50 41 43 45 53 2C 20 41 4E |AD OF SPACES, AN| 00000DD0: 44 0D 53 4F 4D 45 20 55 53 45 20 D4 C1 C2 20 41 |D.SOME USE ... A| 00000DE0: 4E 44 20 D3 D0 C3 20 43 4F 4D 4D 41 4E 44 53 2E |ND ... COMMANDS.| 00000DF0: 20 20 C1 53 0D 45 44 49 54 4F 52 20 4F 46 20 CC | .S.EDITOR OF .| 00000E00: CF C1 C4 D3 D4 C1 D2 2C 20 4D 59 20 4D 41 49 4E |......., MY MAIN| 00000E10: 20 43 4F 4E 43 45 52 4E 0D 49 53 20 54 48 41 54 | CONCERN.IS THAT| 00000E20: 20 54 48 45 20 43 4F 44 45 20 49 53 20 45 41 53 | THE CODE IS EAS| 00000E30: 59 20 46 4F 52 20 4D 45 20 54 4F 0D 45 44 49 54 |Y FOR ME TO.EDIT| 00000E40: 2C 20 53 4F 20 C9 20 50 52 45 46 45 52 20 54 48 |, SO . PREFER TH| 00000E50: 41 54 20 59 4F 55 52 20 54 45 58 54 20 4C 4F 4F |AT YOUR TEXT LOO| 00000E60: 4B 0D 4C 49 4B 45 20 54 48 49 53 3A 0D 0D 31 30 |K.LIKE THIS:..10| 00000E70: 30 20 D0 D2 C9 CE D4 22 20 20 20 20 D4 C8 C9 D3 |0 ....." ....| 00000E80: 20 C9 D3 20 D4 C8 C5 20 C6 C9 D2 D3 D4 20 CC C9 | .. ... ..... ..| 00000E90: CE C5 0D CF C6 20 D4 C5 D8 D4 22 0D 31 31 30 20 |..... ....".110 | 00000EA0: D0 D2 C9 CE D4 22 C1 CE C4 20 D4 C8 C9 D3 20 C9 |....."... .... .| 00000EB0: D3 20 D4 C8 C5 20 D3 C5 C3 CF CE C4 2E 20 20 C9 |. ... ....... .| 00000EC0: CE 0D C7 C5 CE C5 D2 C1 CC 2C 22 0D 31 32 30 20 |.........,".120 | 00000ED0: D0 D2 C9 CE D4 22 C8 C1 D6 C5 20 C1 20 D3 C5 D0 |.....".... . ...| 00000EE0: C1 D2 C1 D4 C5 20 CC C9 CE C5 20 CF C6 0D C3 CF |..... .... .....| 00000EF0: C4 C5 20 C6 CF D2 22 0D 31 33 30 20 D0 D2 C9 CE |.. ...".130 ....| 00000F00: D4 22 C5 C1 C3 C8 20 CC C9 CE C5 20 CF C6 20 D4 |.".... .... .. .| 00000F10: C5 D8 D4 20 D4 CF 20 C2 C5 0D D0 D2 C9 CE D4 C5 |... .. .........| 00000F20: C4 2E 22 0D C1 20 52 55 4C 45 20 4F 46 20 54 48 |..".. RULE OF TH| 00000F30: 55 4D 42 20 46 4F 52 20 55 53 49 4E 47 20 54 48 |UMB FOR USING TH| 00000F40: 45 20 D3 D0 C3 0D 43 4F 4D 4D 41 4E 44 20 49 53 |E ....COMMAND IS| 00000F50: 20 54 4F 20 55 53 45 20 49 54 20 49 4E 53 54 45 | TO USE IT INSTE| 00000F60: 41 44 20 4F 46 20 53 49 58 0D 4F 52 20 4D 4F 52 |AD OF SIX.OR MOR| 00000F70: 45 20 53 50 41 43 45 53 2E 20 20 D3 45 45 20 4C |E SPACES. .EE L| 00000F80: 49 4E 45 20 31 30 30 20 4F 4E 20 54 48 45 0D 50 |INE 100 ON THE.P| 00000F90: 52 45 56 49 4F 55 53 20 50 41 47 45 20 46 4F 52 |REVIOUS PAGE FOR| 00000FA0: 20 41 4E 20 45 58 41 4D 50 4C 45 2E 0D 0D 23 38 | AN EXAMPLE...#8| 00000FB0: 20 2D 20 C9 46 20 59 4F 55 20 48 41 56 45 20 57 | - .F YOU HAVE W| 00000FC0: 52 49 54 54 45 4E 20 59 4F 55 52 20 50 52 4F 47 |RITTEN YOUR PROG| 00000FD0: 52 41 4D 0D 57 49 54 48 20 53 54 59 4C 45 2C 20 |RAM.WITH STYLE, | 00000FE0: 49 54 20 57 49 4C 4C 20 4D 41 4B 45 20 41 20 44 |IT WILL MAKE A D| 00000FF0: 49 46 46 45 52 45 4E 43 45 0D 57 48 45 54 48 45 |IFFERENCE.WHETHE| 00001000: 52 20 59 4F 55 20 41 52 45 20 49 4E 20 55 50 50 |R YOU ARE IN UPP| 00001010: 45 52 20 4F 52 20 47 52 41 50 48 49 43 53 0D 43 |ER OR GRAPHICS.C| 00001020: 41 53 45 2E 20 20 D9 4F 55 20 53 48 4F 55 4C 44 |ASE. .OU SHOULD| 00001030: 20 53 45 54 20 54 48 45 20 43 41 53 45 20 59 4F | SET THE CASE YO| 00001040: 55 0D 57 41 4E 54 20 41 4E 44 20 4C 4F 43 4B 20 |U.WANT AND LOCK | 00001050: 49 54 20 49 4E 20 50 4C 41 43 45 20 53 4F 20 54 |IT IN PLACE SO T| 00001060: 48 41 54 0D 50 52 45 53 53 49 4E 47 20 54 48 45 |HAT.PRESSING THE| 00001070: 20 C3 4F 4D 4D 4F 44 4F 52 45 2D D3 C8 C9 C6 D4 | .OMMODORE-.....| 00001080: 0D 43 4F 4D 42 49 4E 41 54 49 4F 4E 20 57 4F 4E |.COMBINATION WON| 00001090: 27 54 20 43 48 41 4E 47 45 20 59 4F 55 52 20 53 |'T CHANGE YOUR S| 000010A0: 43 52 45 45 4E 2E 0D CC 4F 43 4B 49 4E 47 20 49 |CREEN...OCKING I| 000010B0: 4E 54 4F 20 55 50 50 45 52 2D 4C 4F 57 45 52 20 |NTO UPPER-LOWER | 000010C0: 43 41 53 45 20 28 4F 52 0D 47 52 41 50 48 49 43 |CASE (OR.GRAPHIC| 000010D0: 53 29 20 4D 4F 44 45 20 49 53 20 45 41 53 59 2E |S) MODE IS EASY.| 000010E0: 20 20 CA 55 53 54 20 54 59 50 45 0D D0 D2 C9 CE | .UST TYPE.....| 000010F0: D4 22 5B C3 D4 D2 CC 2D CE 5D 5B C3 D4 D2 CC 2D |."[....-.][....-| 00001100: C8 5D 22 20 57 48 49 43 48 20 57 49 4C 4C 0D 53 |.]" WHICH WILL.S| 00001110: 48 4F 57 20 55 50 20 4F 4E 20 59 4F 55 52 20 53 |HOW UP ON YOUR S| 00001120: 43 52 45 45 4E 20 41 53 20 52 45 56 45 52 53 45 |CREEN AS REVERSE| 00001130: 44 20 CE 0D 41 4E 44 20 C8 2E 20 20 C6 4F 52 20 |D ..AND .. .OR | 00001140: 55 50 50 45 52 20 43 41 53 45 20 54 59 50 45 20 |UPPER CASE TYPE | 00001150: D0 D2 C9 CE D4 0D C3 C8 D2 24 28 31 34 32 29 C3 |.........$(142).| 00001160: C8 D2 24 28 38 29 2E 20 20 C3 C8 D2 24 28 39 29 |..$(8). ...$(9)| 00001170: 20 4F 52 20 C3 D4 D2 CC 2D C9 0D 49 4E 20 51 55 | OR ....-..IN QU| 00001180: 4F 54 45 53 20 57 49 4C 4C 20 55 4E 4C 4F 43 4B |OTES WILL UNLOCK| 00001190: 20 54 48 45 20 43 41 53 45 2E 0D D4 48 45 20 4E | THE CASE...HE N| 000011A0: 45 58 54 20 43 4F 55 50 4C 45 20 4F 46 20 48 49 |EXT COUPLE OF HI| 000011B0: 4E 54 53 20 41 52 45 20 46 4F 52 0D 55 53 45 52 |NTS ARE FOR.USER| 000011C0: 53 20 57 48 4F 20 57 4F 55 4C 44 20 4C 49 4B 45 |S WHO WOULD LIKE| 000011D0: 20 54 4F 20 4D 4F 44 49 46 59 20 54 48 45 0D 4A | TO MODIFY THE.J| 000011E0: 55 4B 45 42 4F 58 20 4F 52 20 53 4C 49 44 45 20 |UKEBOX OR SLIDE | 000011F0: 53 48 4F 57 20 50 52 4F 47 52 41 4D 53 20 54 4F |SHOW PROGRAMS TO| 00001200: 0D 41 4C 4C 4F 57 20 4D 4F 52 45 20 53 4F 4E 47 |.ALLOW MORE SONG| 00001210: 53 20 4F 52 20 50 49 43 54 55 52 45 53 2E 0D 0D |S OR PICTURES...| 00001220: 23 39 20 2D 20 CA 55 4B 45 42 4F 58 2E 20 20 CC |#9 - .UKEBOX. .| 00001230: 49 53 54 20 54 48 45 20 50 52 4F 47 52 41 4D 20 |IST THE PROGRAM | 00001240: 41 4E 44 0D 43 48 41 4E 47 45 20 54 48 45 20 56 |AND.CHANGE THE V| 00001250: 41 52 49 41 42 4C 45 20 CE D3 20 54 4F 20 52 45 |ARIABLE .. TO RE| 00001260: 46 4C 45 43 54 20 54 48 45 0D 4E 55 4D 42 45 52 |FLECT THE.NUMBER| 00001270: 20 4F 46 20 53 45 4C 45 43 54 49 4F 4E 53 20 59 | OF SELECTIONS Y| 00001280: 4F 55 20 50 4C 41 4E 20 54 4F 20 48 41 56 45 0D |OU PLAN TO HAVE.| 00001290: 49 4E 20 54 48 45 20 4A 55 4B 45 42 4F 58 2E 20 |IN THE JUKEBOX. | 000012A0: 20 C9 54 27 53 20 49 4E 20 4C 49 4E 45 20 31 31 | .T'S IN LINE 11| 000012B0: 2E 0D D4 48 45 20 4A 55 4B 45 42 4F 58 45 53 20 |...HE JUKEBOXES | 000012C0: 48 41 56 45 20 45 56 4F 4C 56 45 44 20 53 4F 4D |HAVE EVOLVED SOM| 000012D0: 45 57 48 41 54 0D 46 52 4F 4D 20 49 53 53 55 45 |EWHAT.FROM ISSUE| 000012E0: 20 54 4F 20 49 53 53 55 45 20 42 55 54 20 41 52 | TO ISSUE BUT AR| 000012F0: 4F 55 4E 44 20 4C 49 4E 45 0D 31 32 32 30 20 49 |OUND LINE.1220 I| 00001300: 53 20 41 20 4C 49 4E 45 20 54 48 41 54 20 D2 C5 |S A LINE THAT ..| 00001310: C1 C4 53 20 44 41 54 41 2E 20 20 D4 48 45 0D 46 |..S DATA. .HE.F| 00001320: 49 52 53 54 20 56 41 52 49 41 42 4C 45 20 49 53 |IRST VARIABLE IS| 00001330: 20 CE C1 24 28 C1 29 20 57 48 49 43 48 20 49 53 | ..$(.) WHICH IS| 00001340: 20 54 48 45 0D 4E 41 4D 45 20 4F 46 20 54 48 45 | THE.NAME OF THE| 00001350: 20 53 4F 4E 47 2E 20 20 D4 48 45 20 4C 41 53 54 | SONG. .HE LAST| 00001360: 20 56 41 52 49 41 42 4C 45 0D 49 53 20 C6 C9 24 | VARIABLE.IS ..$| 00001370: 28 C1 29 20 57 48 49 43 48 20 49 53 20 54 48 45 |(.) WHICH IS THE| 00001380: 20 46 49 4C 45 4E 41 4D 45 20 4F 46 0D 54 48 45 | FILENAME OF.THE| 00001390: 20 53 4F 4E 47 2E 20 20 C9 4E 20 54 48 45 20 C4 | SONG. .N THE .| 000013A0: C1 D4 C1 20 53 54 41 54 45 4D 45 4E 54 53 20 41 |... STATEMENTS A| 000013B0: 54 0D 4C 49 4E 45 20 31 30 30 30 30 20 59 4F 55 |T.LINE 10000 YOU| 000013C0: 27 4C 4C 20 4E 4F 54 49 43 45 20 54 48 41 54 20 |'LL NOTICE THAT | 000013D0: CE C1 24 20 49 53 0D 49 4E 20 51 55 4F 54 45 53 |..$ IS.IN QUOTES| 000013E0: 20 41 4E 44 20 48 41 53 20 43 41 50 49 54 41 4C | AND HAS CAPITAL| 000013F0: 20 4C 45 54 54 45 52 53 2C 0D 57 48 49 4C 45 20 | LETTERS,.WHILE | 00001400: C6 C9 24 20 49 53 20 54 48 45 20 53 49 4D 50 4C |..$ IS THE SIMPL| 00001410: 45 20 46 49 4C 45 4E 41 4D 45 2E 0D 5B C2 59 20 |E FILENAME..[.Y | 00001420: 54 48 45 20 57 41 59 2C 20 C9 20 41 4C 57 41 59 |THE WAY, . ALWAY| 00001430: 53 20 53 48 4F 57 20 43 4F 44 45 20 49 4E 0D 54 |S SHOW CODE IN.T| 00001440: 48 45 53 45 20 54 45 58 54 20 46 49 4C 45 53 20 |HESE TEXT FILES | 00001450: 41 53 20 D5 D0 D0 C5 D2 20 C3 C1 D3 C5 2E 5D 0D |AS ..... .....].| 00001460: CF 4E 20 4F 4C 44 45 52 20 49 53 53 55 45 53 20 |.N OLDER ISSUES | 00001470: 4F 46 20 CC CF C1 C4 D3 D4 C1 D2 20 54 48 45 20 |OF ........ THE | 00001480: 53 4F 4E 47 53 0D 57 45 52 45 20 42 59 20 44 49 |SONGS.WERE BY DI| 00001490: 46 46 45 52 45 4E 54 20 54 52 41 4E 53 43 52 49 |FFERENT TRANSCRI| 000014A0: 42 45 52 53 20 53 4F 0D 54 48 45 52 45 20 4D 41 |BERS SO.THERE MA| 000014B0: 59 20 42 45 20 41 20 4D 49 44 44 4C 45 20 56 41 |Y BE A MIDDLE VA| 000014C0: 52 49 41 42 4C 45 20 49 4E 0D 4C 49 4E 45 20 31 |RIABLE IN.LINE 1| 000014D0: 32 32 30 2E 20 20 C9 46 20 53 4F 20 54 48 45 52 |220. .F SO THER| 000014E0: 45 20 4D 55 53 54 20 42 45 20 54 48 52 45 45 0D |E MUST BE THREE.| 000014F0: 50 49 45 43 45 53 20 4F 46 20 C4 C1 D4 C1 20 4F |PIECES OF .... O| 00001500: 4E 20 45 41 43 48 20 C4 C1 D4 C1 20 4C 49 4E 45 |N EACH .... LINE| 00001510: 20 41 54 0D 31 30 30 30 30 2E 20 20 C1 44 44 20 | AT.10000. .DD | 00001520: 54 48 45 20 54 49 54 4C 45 53 20 41 4E 44 20 46 |THE TITLES AND F| 00001530: 49 4C 45 4E 41 4D 45 53 0D 4F 46 20 54 48 45 20 |ILENAMES.OF THE | 00001540: 53 4F 4E 47 53 20 59 4F 55 20 57 49 53 48 20 54 |SONGS YOU WISH T| 00001550: 4F 20 41 44 44 20 54 4F 20 54 48 45 0D 4A 55 4B |O ADD TO THE.JUK| 00001560: 45 42 4F 58 20 54 4F 20 54 48 45 20 45 4E 44 20 |EBOX TO THE END | 00001570: 4F 46 20 54 48 45 20 C4 C1 D4 C1 0D 53 54 41 54 |OF THE .....STAT| 00001580: 45 4D 45 4E 54 53 20 41 4E 44 20 53 43 52 41 54 |EMENTS AND SCRAT| 00001590: 43 48 20 41 4E 44 20 53 41 56 45 20 54 48 45 0D |CH AND SAVE THE.| 000015A0: 4A 55 4B 45 42 4F 58 20 50 52 4F 47 52 41 4D 2E |JUKEBOX PROGRAM.| 000015B0: 0D 0D 23 31 30 20 2D 20 D3 4C 49 44 45 20 D3 48 |..#10 - .LIDE .H| 000015C0: 4F 57 2E 20 20 D4 48 45 20 56 41 52 49 41 42 4C |OW. .HE VARIABL| 000015D0: 45 20 54 4F 0D 43 48 41 4E 47 45 20 49 53 20 CE |E TO.CHANGE IS .| 000015E0: D0 20 49 4E 20 4C 49 4E 45 20 35 35 20 4F 52 0D |. IN LINE 55 OR.| 000015F0: 54 48 45 52 45 41 42 4F 55 54 53 2E 20 20 C2 45 |THEREABOUTS. .E| 00001600: 43 41 55 53 45 20 54 48 45 52 45 20 48 41 56 45 |CAUSE THERE HAVE| 00001610: 20 42 45 45 4E 0D 4D 41 4E 59 20 43 48 41 4E 47 | BEEN.MANY CHANG| 00001620: 45 53 20 54 4F 20 54 48 45 20 53 4C 49 44 45 20 |ES TO THE SLIDE | 00001630: 53 48 4F 57 0D 50 52 4F 47 52 41 4D 2C 20 C9 20 |SHOW.PROGRAM, . | 00001640: 57 4F 4E 27 54 20 47 4F 20 49 4E 54 4F 20 44 45 |WON'T GO INTO DE| 00001650: 54 41 49 4C 2C 20 42 55 54 0D 54 48 45 20 54 45 |TAIL, BUT.THE TE| 00001660: 43 48 4E 49 51 55 45 20 49 53 20 54 48 45 20 53 |CHNIQUE IS THE S| 00001670: 41 4D 45 20 41 53 20 41 42 4F 56 45 2E 0D 20 20 |AME AS ABOVE.. | 00001680: 20 20 C9 20 48 4F 50 45 20 54 48 45 53 45 20 54 | . HOPE THESE T| 00001690: 49 50 53 20 57 49 4C 4C 20 48 45 4C 50 20 59 4F |IPS WILL HELP YO| 000016A0: 55 0D 57 49 54 48 20 59 4F 55 52 20 CC CF C1 C4 |U.WITH YOUR ....| 000016B0: D3 D4 C1 D2 20 44 49 53 4B 53 20 41 4E 44 0D 53 |.... DISKS AND.S| 000016C0: 55 42 4D 49 53 53 49 4F 4E 53 2E 20 20 CE 45 58 |UBMISSIONS. .EX| 000016D0: 54 20 4D 4F 4E 54 48 20 57 45 20 50 4C 41 4E 20 |T MONTH WE PLAN | 000016E0: 4F 4E 0D 50 55 42 4C 49 53 48 49 4E 47 20 54 48 |ON.PUBLISHING TH| 000016F0: 45 20 56 45 52 53 49 4F 4E 20 4F 46 20 C4 49 53 |E VERSION OF .IS| 00001700: 4B D7 52 49 54 45 52 0D 54 48 41 54 20 57 45 20 |K.RITER.THAT WE | 00001710: 55 53 45 20 54 4F 20 43 52 45 41 54 45 20 56 41 |USE TO CREATE VA| 00001720: 52 49 4F 55 53 20 46 49 4C 45 53 0D 4F 4E 20 54 |RIOUS FILES.ON T| 00001730: 48 45 20 49 53 53 55 45 53 2E 20 20 D4 48 49 53 |HE ISSUES. .HIS| 00001740: 20 57 49 4C 4C 20 45 4E 41 42 4C 45 20 59 4F 55 | WILL ENABLE YOU| 00001750: 0D 54 4F 20 50 4C 41 59 20 41 52 4F 55 4E 44 20 |.TO PLAY AROUND | 00001760: 57 49 54 48 20 4F 55 52 20 22 46 45 41 54 55 52 |WITH OUR "FEATUR| 00001770: 45 53 22 0D 46 49 4C 45 20 41 4E 44 20 41 4E 59 |ES".FILE AND ANY| 00001780: 20 22 54 2E 22 20 46 49 4C 45 53 20 59 4F 55 20 | "T." FILES YOU | 00001790: 54 48 49 4E 4B 0D 59 4F 55 27 44 20 4C 49 4B 45 |THINK.YOU'D LIKE| 000017A0: 20 43 48 41 4E 47 45 44 2E 0D 0D 20 20 20 20 D7 | CHANGED... .| 000017B0: 45 20 48 41 56 45 20 4E 4F 20 53 45 43 52 45 54 |E HAVE NO SECRET| 000017C0: 53 20 41 54 20 CC CF C1 C4 D3 D4 C1 D2 2E 0D D4 |S AT ...........| 000017D0: 48 45 20 4D 4F 52 45 20 59 4F 55 20 55 4E 44 45 |HE MORE YOU UNDE| 000017E0: 52 53 54 41 4E 44 20 54 48 45 20 57 4F 52 4B 49 |RSTAND THE WORKI| 000017F0: 4E 47 53 0D 4F 46 20 54 48 45 20 53 59 53 54 45 |NGS.OF THE SYSTE| 00001800: 4D 20 54 48 45 20 42 45 54 54 45 52 20 4F 46 46 |M THE BETTER OFF| 00001810: 20 57 45 20 41 4C 4C 0D 41 52 45 2E 20 20 CF 46 | WE ALL.ARE. .F| 00001820: 20 43 4F 55 52 53 45 20 59 4F 55 20 44 4F 4E 27 | COURSE YOU DON'| 00001830: 54 20 C8 C1 D6 C5 20 54 4F 0D 55 4E 44 45 52 53 |T .... TO.UNDERS| 00001840: 54 41 4E 44 20 54 48 45 20 43 4F 44 45 2C 20 42 |TAND THE CODE, B| 00001850: 55 54 20 50 52 4F 47 52 41 4D 4D 49 4E 47 0D 49 |UT PROGRAMMING.I| 00001860: 53 20 47 52 45 41 54 20 46 55 4E 20 41 4E 44 20 |S GREAT FUN AND | 00001870: C9 20 48 4F 50 45 20 59 4F 55 20 44 4F 4E 27 54 |. HOPE YOU DON'T| 00001880: 0D 4D 49 4E 44 20 4D 59 20 54 52 59 49 4E 47 20 |.MIND MY TRYING | 00001890: 54 4F 20 45 58 50 4C 41 49 4E 20 54 48 49 4E 47 |TO EXPLAIN THING| 000018A0: 53 2E 0D 0D 20 20 20 20 20 20 20 20 2A 2A 2A 2A |S... ****| 000018B0: 20 C5 4E 44 20 4F 46 20 D4 45 58 54 20 2A 2A 2A | .ND OF .EXT ***| 000018C0: 2A 0D |*. |
..^U:ZERO.. BASICS: LOADSTAR HINTS AND
TIPS.. BY FENDER TUCKER.. IF
YOU READ COMMODORE MAGAZINE,.RUN, AHOY,
COMPUTE!'S GAZETTE OR.TRANSACTOR, YOU A
RE PROBABLY AWARE OF.HUNDREDS OF PEEKS A
ND POKES THAT ARE.HANDY FOR ALL PROGRAMM
ERS. THIS.MONTH I HAVE ATTEMPTED TO COM
PILE.SOME THAT ARE OF INTEREST TO READER
S.AND PROGRAMMERS OF LOADSTAR.SPECIFICAL
LY. IF YOU HAVE A PROGRAM.YOU ARE THINK
ING OF SUBMITTING TO US,.I THINK YOU'LL
FIND SEVERAL ROUTINES.OF INTEREST HERE..
..#1 - ALL PROGRAMS SHOULD ALLOW A USER.
TO RETURN TO LOADSTAR EASILY. HAVE A.ME
SSAGE ON THE PLAY SCREEN OR ON A.HELP SC
REEN THAT SAYS SOMETHING LIKE,."PRESS Q
TO QUIT" OR "F7 - RETURN TO.LOADSTAR".
WHEN THE USER PRESSES THE.KEY A PROMPT S
HOULD APPEAR, "ARE YOU.SURE YOU WANT TO
QUIT? (Y/N)". AT.THIS POINT YOUR CODE S
HOULD LOOK LIKE:..500 GETA$:IFA$<>"Y"AND
A$<>"N"THEN500.510 IFA$="N"THEN....BACK
TO PROGRAM.520 OPEN15,8,15,"R0:HELLO CON
NECT=. HELLO CONNECT":INPUT#15,ER%:CLOS
E15.530 IFER%<>63THENEND.540 LOAD"HELLO
CONNECT",8..LINE 520 IS A SLICK WAY OF M
AKING.SURE A LOADSTAR DISK IS IN THE DRI
VE..#2 - A PROGRAM THAT SHOWS THE USER.T
HE LIST OF COMMANDS AT THE BEGINNING.OF
THE PROGRAM AND EXPECTS THE USER.TO REME
MBER THEM THROUGHOUT THE.PROGRAM IS NOT
VERY FRIENDLY. SEE.SCREEN SWITCHER ON T
HIS ISSUE FOR ONE.WAY OF MAKING YOUR PRO
GRAM BETTER...#3 - OFTEN A PROGRAM WILL
HAVE THINGS.SCROLLING UP AND OFF THE SCR
EEN. THE.FRIENDLY THING IS TO HAVE A PR
OMPT ON.THE SCREEN TO TELL THE USER WHIC
H KEY.TO PRESS TO PAUSE OR HALT THE LIST
ING.BUT HOW CAN YOU KEEP THE PROMPT FROM
.SCROLLING? EASY, JUST CHECK OUT JIM.RO
W'S BYTES SECTION OF ZERO PAGE ON.THIS I
SSUE....#4 - HAVE YOU EVER PRINTED A LIS
T OF.THINGS TO THE SCREEN AND FOUND THAT
.THERE IS A BLANK LINE IN THE MIDDLE.OF
YOUR LIST AND IT'S A REAL PAIN TO.TRY TO
GET RID OF THIS BLANK LINE?.THIS USUALL
Y HAPPENS WHEN A LINE USES.THE FAR RIGHT
COLUMN OF THE SCREEN..ONE WAY TO GET AR
OUND THIS IS TO NOT.USE THE 40TH COLUMN.
ANOTHER WAY IS.TO RESET THE LINE LINK
TABLE WHICH.CONSISTS OF 25 BYTES FROM ME
MORY.LOCATION 217 TO 242 IN ZERO PAGE..E
ACH BYTE REPRESENTS A SCREEN LINE -.217
THE TOP LINE AND 242 THE BOTTOM.LINE. T
HE HIGH BIT OF THE OFFENDING.LINK BYTE M
UST BE SET. THIS CODE.RESETS ALL OF THE
LINE LINKS...FORI=217TO242:POKEI,PEEK(I
)OR128:NEXT.THIS IS OFTEN EASIER THAN CO
UNTING.WHICH LINE IS THE CULPRIT, ADDING
.THAT NUMBER TO 217 AND SETTING THE.HIGH
BIT OF THAT BYTE...#5 - WHENEVER I SEE
TOO MANY REVERSED.Q'S IN A LISTING I THI
NK ABOUT EXTRA.LOADING TIME AND WASTED D
ISK SPACE..I REALIZE THAT THESE ARE RELA
TIVELY.MINOR CONSIDERATIONS IN THESE DAY
S OF.FASTLOADS AND CHEAP MEMORY, BUT I.S
TILL CRINGE A LITTLE. TO POSITION.YOUR
CURSOR TO A PARTICULAR SCREEN.LINE (SAY,
23) USE THIS COMMAND:..POKE214,23-2:PRI
NT:PRINT"MESSAGE"..YOU CAN EVEN POKE A V
ARIABLE INTO 214.AND CALCULATE THE TARGE
T LINE..#6 - HERE'S A NIFTY TRICK I LEAR
NED.FROM JIM HILTY. REMEMBER ALL THE.TI
MES I'VE EXPLAINED THAT WHEN YOU.USE THE
LOAD"NAME",8,1 FROM.WITHIN A BASIC PROG
RAM THE PROGRAM.COUNTER STARTS OVER AT T
HE BEGINNING.OF THE PROGRAM SO YOU NEED
A LINE.LIKE 5 IFA=0THENA=1:LOAD"NAME",8,
1 AS.YOUR FIRST LINE. WELL, FORGET THAT
..THIS SYNTAX WILL LOAD IN A FILE AND.NO
T START THE PROGRAM COUNTER OVER,.NO MAT
TER WHERE IT'S FOUND IN YOUR.BASIC PROGR
AM...500 POKE147,0:SYS57812"NAME",8,1:.
SYS62631..THANKS, JIM, I NEEDED THAT
...#7 - EVERYBODY SEEMS TO HAVE THEIR.OW
N SYSTEM FOR PRINTING A BUNCH OF.TEXT TO
THE SCREEN. SOME USE.SEMI-COLONS AFTER
EACH LINE, SOME USE.CURSOR-RIGHTS INSTE
AD OF SPACES, AND.SOME USE TAB AND SPC C
OMMANDS. AS.EDITOR OF LOADSTAR, MY MAIN
CONCERN.IS THAT THE CODE IS EASY FOR ME
TO.EDIT, SO I PREFER THAT YOUR TEXT LOO
K.LIKE THIS:..100 PRINT" THIS IS THE
FIRST LINE.OF TEXT".110 PRINT"AND THIS I
S THE SECOND. IN.GENERAL,".120 PRINT"HA
VE A SEPARATE LINE OF.CODE FOR".130 PRIN
T"EACH LINE OF TEXT TO BE.PRINTED.".A RU
LE OF THUMB FOR USING THE SPC.COMMAND IS
TO USE IT INSTEAD OF SIX.OR MORE SPACES
. SEE LINE 100 ON THE.PREVIOUS PAGE FOR
AN EXAMPLE...#8 - IF YOU HAVE WRITTEN Y
OUR PROGRAM.WITH STYLE, IT WILL MAKE A D
IFFERENCE.WHETHER YOU ARE IN UPPER OR GR
APHICS.CASE. YOU SHOULD SET THE CASE YO
U.WANT AND LOCK IT IN PLACE SO THAT.PRES
SING THE COMMODORE-SHIFT.COMBINATION WON
'T CHANGE YOUR SCREEN..LOCKING INTO UPPE
R-LOWER CASE (OR.GRAPHICS) MODE IS EASY.
JUST TYPE.PRINT"[CTRL-N][CTRL-H]" WHIC
H WILL.SHOW UP ON YOUR SCREEN AS REVERSE
D N.AND H. FOR UPPER CASE TYPE PRINT.CH
R$(142)CHR$(8). CHR$(9) OR CTRL-I.IN QU
OTES WILL UNLOCK THE CASE..THE NEXT COUP
LE OF HINTS ARE FOR.USERS WHO WOULD LIKE
TO MODIFY THE.JUKEBOX OR SLIDE SHOW PRO
GRAMS TO.ALLOW MORE SONGS OR PICTURES...
#9 - JUKEBOX. LIST THE PROGRAM AND.CHAN
GE THE VARIABLE NS TO REFLECT THE.NUMBER
OF SELECTIONS YOU PLAN TO HAVE.IN THE J
UKEBOX. IT'S IN LINE 11..THE JUKEBOXES
HAVE EVOLVED SOMEWHAT.FROM ISSUE TO ISSU
E BUT AROUND LINE.1220 IS A LINE THAT RE
ADS DATA. THE.FIRST VARIABLE IS NA$(A)
WHICH IS THE.NAME OF THE SONG. THE LAST
VARIABLE.IS FI$(A) WHICH IS THE FILENAM
E OF.THE SONG. IN THE DATA STATEMENTS A
T.LINE 10000 YOU'LL NOTICE THAT NA$ IS.I
N QUOTES AND HAS CAPITAL LETTERS,.WHILE
FI$ IS THE SIMPLE FILENAME..[BY THE WAY,
I ALWAYS SHOW CODE IN.THESE TEXT FILES
AS UPPER CASE.].ON OLDER ISSUES OF LOADS
TAR THE SONGS.WERE BY DIFFERENT TRANSCRI
BERS SO.THERE MAY BE A MIDDLE VARIABLE I
N.LINE 1220. IF SO THERE MUST BE THREE.
PIECES OF DATA ON EACH DATA LINE AT.1000
0. ADD THE TITLES AND FILENAMES.OF THE
SONGS YOU WISH TO ADD TO THE.JUKEBOX TO
THE END OF THE DATA.STATEMENTS AND SCRAT
CH AND SAVE THE.JUKEBOX PROGRAM...#10 -
SLIDE SHOW. THE VARIABLE TO.CHANGE IS N
P IN LINE 55 OR.THEREABOUTS. BECAUSE TH
ERE HAVE BEEN.MANY CHANGES TO THE SLIDE
SHOW.PROGRAM, I WON'T GO INTO DETAIL, BU
T.THE TECHNIQUE IS THE SAME AS ABOVE..
I HOPE THESE TIPS WILL HELP YOU.WITH Y
OUR LOADSTAR DISKS AND.SUBMISSIONS. NEX
T MONTH WE PLAN ON.PUBLISHING THE VERSIO
N OF DISKWRITER.THAT WE USE TO CREATE VA
RIOUS FILES.ON THE ISSUES. THIS WILL EN
ABLE YOU.TO PLAY AROUND WITH OUR "FEATUR
ES".FILE AND ANY "T." FILES YOU THINK.YO
U'D LIKE CHANGED... WE HAVE NO SECRET
S AT LOADSTAR..THE MORE YOU UNDERSTAND T
HE WORKINGS.OF THE SYSTEM THE BETTER OFF
WE ALL.ARE. OF COURSE YOU DON'T HAVE T
O.UNDERSTAND THE CODE, BUT PROGRAMMING.I
S GREAT FUN AND I HOPE YOU DON'T.MIND MY
TRYING TO EXPLAIN THINGS... ****
END OF TEXT ****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL