TIPS
FILE INFORMATION
FILENAME(S): TIPS
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-10-19 22:49:15
APPEARS ON: 1 disk(s)
FILE HASH
20e73aad135022bc6f435a9042483d93a9b3ea927abb9fd0b5921842aadfb0e6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GOLD DISK SEP85 | TIPS | PRG | Radd Maxx | 20 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 0A 00 8F 00 24 08 14 00 8F 20 28 43 |........$.... (C| 00000010: 29 20 31 39 38 35 20 47 4F 4C 44 20 44 49 53 4B |) 1985 GOLD DISK| 00000020: 20 49 4E 43 00 2A 08 1E 00 8F 00 3E 08 28 00 8F | INC.*.....>.(..| 00000030: 20 54 49 50 53 3A 20 52 45 4D 41 52 4B 53 00 44 | TIPS: REMARKS.D| 00000040: 08 32 00 8F 00 56 08 3C 00 99 20 C7 28 31 34 29 |.2...V.<.. .(14)| 00000050: 3A 99 C7 28 38 29 00 79 08 46 00 44 30 B2 31 33 |:..(8).y.F.D0.13| 00000060: AC 34 30 39 36 3A 44 34 B2 44 30 AA 31 30 32 34 |.4096:D4.D0.1024| 00000070: 3A 51 24 B2 C7 28 33 34 29 00 83 08 50 00 89 20 |:Q$..(34)...P.. | 00000080: 31 36 30 00 99 08 5A 00 81 49 4D B2 31 A4 31 31 |160...Z..IM.1.11| 00000090: 3A A1 49 4E 24 3A 82 49 4D 00 B3 08 64 00 44 30 |:.IN$:.IM...d.D0| 000000A0: B2 31 33 AC 34 30 39 36 3A 44 34 B2 44 30 AA 31 |.13.4096:D4.D0.1| 000000B0: 30 32 34 00 D6 08 6E 00 99 20 22 13 11 11 11 11 |024...n.. ".....| 000000C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000000D0: 11 11 11 11 22 3B 00 0E 09 78 00 99 20 22 12 5E |....";...x.. ".^| 000000E0: 92 20 50 52 45 56 20 50 41 47 45 20 20 12 53 50 |. PREV PAGE .SP| 000000F0: 41 43 45 92 20 4E 45 58 54 20 50 41 47 45 20 20 |ACE. NEXT PAGE | 00000100: 12 5F 92 20 C7 C4 20 4D 45 4E 55 91 91 22 00 24 |._. .. MENU..".$| 00000110: 09 82 00 A1 20 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.... IN$:.IN$.""| 00000120: A7 31 33 30 00 4E 09 8C 00 8B 20 49 4E 24 B3 B1 |.130.N.... IN$..| 00000130: 22 5E 22 20 AF 20 49 4E 24 B3 B1 22 20 22 20 AF |"^" . IN$.." " .| 00000140: 20 49 4E 24 B3 B1 22 5F 22 20 A7 31 33 30 00 54 | IN$.."_" .130.T| 00000150: 09 96 00 8E 00 5E 09 A0 00 99 22 93 90 22 00 78 |.....^...."..".x| 00000160: 09 AA 00 97 20 44 30 AA 33 32 2C 31 35 3A 97 20 |.... D0.32,15:. | 00000170: 44 30 AA 33 33 2C 31 35 00 AA 09 B4 00 99 20 22 |D0.33,15...... "| 00000180: 11 12 D7 48 41 54 20 54 4F 20 44 4F 20 57 49 54 |...HAT TO DO WIT| 00000190: 48 20 59 4F 55 52 20 D2 C5 CD 3A 20 20 20 20 20 |H YOUR ...: | 000001A0: D2 C5 CD 20 54 49 54 4C 45 22 00 D9 09 BE 00 99 |... TITLE"......| 000001B0: 22 11 12 D2 C5 CD 92 20 49 53 20 4E 4F 52 4D 41 |"...... IS NORMA| 000001C0: 4C 4C 59 20 55 53 45 44 20 54 4F 20 41 44 44 20 |LLY USED TO ADD | 000001D0: 43 4F 4D 4D 45 4E 54 53 22 00 07 0A C8 00 99 22 |COMMENTS"......"| 000001E0: 54 4F 20 59 4F 55 52 20 50 52 4F 47 52 41 4D 2E |TO YOUR PROGRAM.| 000001F0: 20 20 D4 48 49 53 20 49 53 20 D6 C5 D2 D9 20 48 | .HIS IS .... H| 00000200: 45 4C 50 46 55 4C 22 00 33 0A D2 00 99 22 57 48 |ELPFUL".3...."WH| 00000210: 45 4E 20 59 4F 55 20 4C 45 41 56 45 20 41 20 50 |EN YOU LEAVE A P| 00000220: 52 4F 47 52 41 4D 20 46 4F 52 20 41 20 57 48 49 |ROGRAM FOR A WHI| 00000230: 4C 45 22 00 61 0A DC 00 99 22 41 4E 44 20 54 48 |LE".a...."AND TH| 00000240: 45 4E 20 43 41 4E 27 54 20 54 45 4C 4C 20 49 46 |EN CAN'T TELL IF| 00000250: 20 49 54 27 53 20 59 4F 55 52 20 D3 50 41 43 45 | IT'S YOUR .PACE| 00000260: 22 00 8B 0A E6 00 99 22 C9 4E 56 41 44 45 52 53 |"......".NVADERS| 00000270: 20 4F 52 20 59 4F 55 52 20 CD 4F 52 54 47 41 47 | OR YOUR .ORTGAG| 00000280: 45 20 50 52 4F 47 52 41 4D 2E 22 00 BA 0A F0 00 |E PROGRAM.".....| 00000290: 99 20 22 11 D4 48 45 20 D0 52 4F 47 52 41 4D 4D |. "..HE .ROGRAMM| 000002A0: 45 52 27 53 20 D2 45 46 45 52 45 4E 43 45 20 C7 |ER'S .EFERENCE .| 000002B0: 55 49 44 45 20 53 41 59 53 22 00 EA 0A FA 00 99 |UIDE SAYS"......| 000002C0: 20 22 54 48 45 20 12 D2 C5 CD 92 20 53 54 41 54 | "THE ..... STAT| 000002D0: 45 4D 45 4E 54 20 4D 41 4B 45 53 20 59 4F 55 52 |EMENT MAKES YOUR| 000002E0: 20 50 52 4F 47 52 41 4D 53 22 00 16 0B 04 01 99 | PROGRAMS"......| 000002F0: 20 22 4D 4F 52 45 20 45 41 53 49 4C 59 20 55 4E | "MORE EASILY UN| 00000300: 44 45 52 53 54 4F 4F 44 20 57 48 45 4E 20 CC C9 |DERSTOOD WHEN ..| 00000310: D3 D4 27 44 2E 22 00 46 0B 0E 01 99 20 22 11 D4 |..'D.".F.... "..| 00000320: 48 41 54 27 53 20 46 49 4E 45 20 41 53 20 41 20 |HAT'S FINE AS A | 00000330: 53 54 41 52 54 20 42 55 54 20 49 54 20 53 4F 55 |START BUT IT SOU| 00000340: 4E 44 53 20 41 22 00 67 0B 18 01 99 22 4C 49 54 |NDS A".g...."LIT| 00000350: 54 4C 45 20 42 4F 52 49 4E 47 20 44 4F 45 53 4E |TLE BORING DOESN| 00000360: 27 54 20 49 54 3F 22 00 88 0B 22 01 99 22 11 C3 |'T IT?"...".."..| 00000370: 41 4E 20 57 45 20 44 4F 20 41 4E 59 54 48 49 4E |AN WE DO ANYTHIN| 00000380: 47 20 45 4C 53 45 3F 22 00 9A 0B 2C 01 99 22 11 |G ELSE?"...,..".| 00000390: 11 D9 4F 55 20 42 45 54 21 22 00 B0 0B 36 01 81 |..OU BET!"...6..| 000003A0: 49 4D B2 31 A4 31 31 3A A1 49 4E 24 3A 82 49 4D |IM.1.11:.IN$:.IM| 000003B0: 00 D3 0B 40 01 99 20 22 13 11 11 11 11 11 11 11 |...@.. "........| 000003C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000003D0: 11 22 3B 00 09 0C 4A 01 99 20 22 12 53 50 41 43 |.";...J.. ".SPAC| 000003E0: 45 92 20 4E 45 58 54 20 50 41 47 45 20 20 20 20 |E. NEXT PAGE | 000003F0: 20 20 20 20 20 20 20 20 20 20 20 12 5F 92 20 C7 | ._. .| 00000400: C4 20 4D 45 4E 55 91 91 22 00 1F 0C 54 01 A1 20 |. MENU.."...T.. | 00000410: 49 4E 24 3A 8B 49 4E 24 B2 22 22 A7 33 34 30 00 |IN$:.IN$."".340.| 00000420: 3E 0C 5E 01 8B 20 49 4E 24 B3 B1 22 20 22 20 AF |>.^.. IN$.." " .| 00000430: 20 49 4E 24 B3 B1 22 5F 22 20 A7 33 34 30 00 53 | IN$.."_" .340.S| 00000440: 0C 68 01 8B 20 49 4E 24 B2 22 5F 22 20 A7 20 31 |.h.. IN$."_" . 1| 00000450: 38 35 30 00 83 0C 72 01 99 22 93 12 3A D2 C5 CD |850...r.."..:...| 00000460: 20 41 44 44 49 4E 47 20 43 4F 4C 4F 52 20 20 20 | ADDING COLOR | 00000470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000480: 20 20 22 00 B0 0C 7C 01 99 22 11 C8 41 56 45 20 | "...|.."..AVE | 00000490: 59 4F 55 20 45 56 45 52 20 57 41 4E 54 45 44 20 |YOU EVER WANTED | 000004A0: 54 4F 20 41 44 44 20 43 4F 4C 4F 52 20 54 4F 22 |TO ADD COLOR TO"| 000004B0: 00 DF 0C 86 01 99 22 59 4F 55 52 20 4C 49 53 54 |......"YOUR LIST| 000004C0: 49 4E 47 53 3F 20 D7 45 4C 4C 20 59 4F 55 20 43 |INGS? .ELL YOU C| 000004D0: 41 4E 21 20 20 C9 27 4C 4C 20 53 48 4F 57 22 00 |AN! .'LL SHOW".| 000004E0: EF 0C 90 01 99 22 59 4F 55 20 48 4F 57 2E 22 00 |....."YOU HOW.".| 000004F0: 19 0D 9A 01 99 22 11 31 30 20 46 4F 52 20 49 3D |.....".10 FOR I=| 00000500: 50 45 45 4B 28 34 33 29 2B 32 35 36 2A 50 45 45 |PEEK(43)+256*PEE| 00000510: 4B 28 34 34 29 20 54 4F 22 00 39 0D A4 01 99 22 |K(44) TO".9...."| 00000520: 20 20 20 50 45 45 4B 28 34 35 29 2B 32 35 36 2A | PEEK(45)+256*| 00000530: 50 45 45 4B 28 34 36 29 22 00 68 0D AE 01 99 22 |PEEK(46)".h...."| 00000540: 32 30 20 49 46 20 50 45 45 4B 28 49 29 3D 31 34 |20 IF PEEK(I)=14| 00000550: 33 20 41 4E 44 20 50 45 45 4B 28 49 2B 31 29 3D |3 AND PEEK(I+1)=| 00000560: 33 34 20 54 48 45 4E 22 00 7E 0D B8 01 99 22 20 |34 THEN".~...." | 00000570: 20 20 50 4F 4B 45 20 49 2B 31 2C 33 32 22 00 8F | POKE I+1,32"..| 00000580: 0D C2 01 99 22 33 30 20 4E 45 58 54 20 49 22 00 |...."30 NEXT I".| 00000590: C5 0D CC 01 99 22 34 30 20 50 52 49 4E 54 20 22 |....."40 PRINT "| 000005A0: 3B C7 28 33 34 29 3B 22 4D 55 4C 54 49 22 3B C7 |;.(34);"MULTI";.| 000005B0: 28 33 34 29 3B 22 3B 3A 52 45 4D 22 3B C7 28 33 |(34);";:REM";.(3| 000005C0: 34 29 3B 22 1F 00 F2 0D D6 01 99 22 35 30 20 50 |4);"......."50 P| 000005D0: 52 49 4E 54 20 22 3B C7 28 33 34 29 3B 22 43 4F |RINT ";.(34);"CO| 000005E0: 4C 4F 52 20 4C 49 53 54 49 4E 47 22 3B C7 28 33 |LOR LISTING";.(3| 000005F0: 34 29 00 12 0E E0 01 99 22 11 D0 52 45 53 53 20 |4)......"..RESS | 00000600: 41 20 4B 45 59 20 54 4F 20 CC C9 D3 D4 20 49 54 |A KEY TO .... IT| 00000610: 2E 22 00 27 0E EA 01 A1 49 4E 24 3A 8B 49 4E 24 |.".'....IN$:.IN$| 00000620: B2 22 22 A7 34 39 30 00 51 0E F4 01 99 22 90 31 |."".490.Q....".1| 00000630: 30 20 46 4F 52 20 49 3D 50 45 45 4B 28 34 33 29 |0 FOR I=PEEK(43)| 00000640: 2B 32 35 36 2A 50 45 45 4B 28 34 34 29 20 54 4F |+256*PEEK(44) TO| 00000650: 22 00 71 0E FE 01 99 22 20 20 20 50 45 45 4B 28 |".q...." PEEK(| 00000660: 34 35 29 2B 32 35 36 2A 50 45 45 4B 28 34 36 29 |45)+256*PEEK(46)| 00000670: 22 00 A0 0E 08 02 99 22 32 30 20 49 46 20 50 45 |"......"20 IF PE| 00000680: 45 4B 28 49 29 3D 31 34 33 20 41 4E 44 20 50 45 |EK(I)=143 AND PE| 00000690: 45 4B 28 49 2B 31 29 3D 33 34 20 54 48 45 4E 22 |EK(I+1)=34 THEN"| 000006A0: 00 B6 0E 12 02 99 22 20 20 20 50 4F 4B 45 20 49 |......" POKE I| 000006B0: 2B 31 2C 33 32 22 00 C7 0E 1C 02 99 22 33 30 20 |+1,32"......"30 | 000006C0: 4E 45 58 54 20 49 22 00 F4 0E 26 02 99 22 34 30 |NEXT I"...&.."40| 000006D0: 20 50 52 49 4E 54 20 22 3B C7 28 33 34 29 3B 22 | PRINT ";.(34);"| 000006E0: 4D 55 4C 54 49 22 3B C7 28 33 34 29 3B 22 3B 3A |MULTI";.(34);";:| 000006F0: 52 45 4D 22 00 22 0F 30 02 99 22 1F 35 30 20 50 |REM".".0..".50 P| 00000700: 52 49 4E 54 20 22 3B C7 28 33 34 29 3B 22 43 4F |RINT ";.(34);"CO| 00000710: 4C 4F 52 20 4C 49 53 54 49 4E 47 22 3B C7 28 33 |LOR LISTING";.(3| 00000720: 34 29 00 3E 0F 3A 02 99 22 90 22 3A 8D 20 39 30 |4).>.:..".":. 90| 00000730: 3A 8B 20 49 4E 24 B2 22 20 22 A7 36 30 30 00 51 |:. IN$." ".600.Q| 00000740: 0F 44 02 8B 20 49 4E 24 B2 22 5E 22 A7 20 31 36 |.D.. IN$."^". 16| 00000750: 30 00 5C 0F 4E 02 89 20 31 38 35 30 00 8D 0F 58 |0.\.N.. 1850...X| 00000760: 02 99 22 93 12 3A D2 C5 CD 20 41 43 54 49 56 41 |.."..:... ACTIVA| 00000770: 54 49 4E 47 20 43 4F 4E 54 52 4F 4C 20 43 48 41 |TING CONTROL CHA| 00000780: 52 41 43 54 45 52 53 20 20 20 20 20 22 00 AC 0F |RACTERS "...| 00000790: 62 02 99 22 11 CE 4F 57 20 57 48 59 20 44 49 44 |b.."..OW WHY DID| 000007A0: 20 54 48 41 54 20 57 4F 52 4B 3F 22 00 D7 0F 6C | THAT WORK?"...l| 000007B0: 02 99 22 D7 48 45 4E 20 59 4F 55 20 47 4F 20 49 |..".HEN YOU GO I| 000007C0: 4E 54 4F 20 51 55 4F 54 45 20 4D 4F 44 45 20 59 |NTO QUOTE MODE Y| 000007D0: 4F 55 20 43 41 4E 22 00 05 10 76 02 99 22 45 4E |OU CAN"...v.."EN| 000007E0: 54 45 52 20 43 4F 4E 54 52 4F 4C 20 43 48 41 52 |TER CONTROL CHAR| 000007F0: 41 43 54 45 52 53 20 53 55 43 48 20 41 53 20 43 |ACTERS SUCH AS C| 00000800: 4F 4C 4F 52 22 00 34 10 80 02 99 22 4F 52 20 43 |OLOR".4...."OR C| 00000810: 55 52 53 4F 52 20 4D 4F 56 45 4D 45 4E 54 53 2C |URSOR MOVEMENTS,| 00000820: 20 45 54 43 2E 20 C8 4F 57 45 56 45 52 20 54 48 | ETC. .OWEVER TH| 00000830: 45 53 45 22 00 61 10 8A 02 99 22 53 41 4D 45 20 |ESE".a...."SAME | 00000840: 51 55 4F 54 45 53 20 49 4E 48 49 42 49 54 20 54 |QUOTES INHIBIT T| 00000850: 48 45 20 43 4F 4E 54 52 4F 4C 20 43 48 41 52 2D |HE CONTROL CHAR-| 00000860: 22 00 8E 10 94 02 99 22 41 43 54 45 52 53 20 46 |"......"ACTERS F| 00000870: 52 4F 4D 20 4F 50 45 52 41 54 49 4E 47 20 44 55 |ROM OPERATING DU| 00000880: 52 49 4E 47 20 CC C9 D3 D4 49 4E 47 2E 22 00 BD |RING ....ING."..| 00000890: 10 9E 02 99 22 D4 48 45 20 41 4E 53 57 45 52 20 |....".HE ANSWER | 000008A0: 49 53 20 54 4F 20 45 4E 54 45 52 20 54 48 45 4D |IS TO ENTER THEM| 000008B0: 20 57 49 54 48 20 51 55 4F 54 45 53 22 00 E6 10 | WITH QUOTES"...| 000008C0: A8 02 99 22 41 4E 44 20 54 48 45 4E 20 44 45 4C |..."AND THEN DEL| 000008D0: 45 54 45 20 54 48 45 20 51 55 4F 54 45 53 20 4C |ETE THE QUOTES L| 000008E0: 41 54 45 52 2E 22 00 11 11 B2 02 99 22 D4 48 41 |ATER."......".HA| 000008F0: 54 27 53 20 57 48 41 54 20 4C 49 4E 45 53 20 31 |T'S WHAT LINES 1| 00000900: 30 2D 33 30 20 44 4F 20 46 4F 52 20 59 4F 55 2E |0-30 DO FOR YOU.| 00000910: 22 00 3B 11 BC 02 99 22 11 31 30 20 46 4F 52 20 |".;....".10 FOR | 00000920: 49 3D 50 45 45 4B 28 34 33 29 2B 32 35 36 2A 50 |I=PEEK(43)+256*P| 00000930: 45 45 4B 28 34 34 29 20 54 4F 22 00 5B 11 C6 02 |EEK(44) TO".[...| 00000940: 99 22 20 20 20 50 45 45 4B 28 34 35 29 2B 32 35 |." PEEK(45)+25| 00000950: 36 2A 50 45 45 4B 28 34 36 29 22 00 8A 11 D0 02 |6*PEEK(46)".....| 00000960: 99 22 32 30 20 49 46 20 50 45 45 4B 28 49 29 3D |."20 IF PEEK(I)=| 00000970: 31 34 33 20 41 4E 44 20 50 45 45 4B 28 49 2B 31 |143 AND PEEK(I+1| 00000980: 29 3D 33 34 20 54 48 45 4E 22 00 A0 11 DA 02 99 |)=34 THEN"......| 00000990: 22 20 20 20 50 4F 4B 45 20 49 2B 31 2C 33 32 22 |" POKE I+1,32"| 000009A0: 00 B1 11 E4 02 99 22 33 30 20 4E 45 58 54 20 49 |......"30 NEXT I| 000009B0: 22 00 E1 11 EE 02 99 22 11 D4 48 45 53 45 20 4C |"......"..HESE L| 000009C0: 49 4E 45 53 20 4C 4F 4F 4B 20 46 4F 52 20 20 D2 |INES LOOK FOR .| 000009D0: C5 CD 22 3B C7 28 33 34 29 3B 22 20 20 41 4E 44 |..";.(34);" AND| 000009E0: 22 00 0E 12 F8 02 99 22 52 45 50 4C 41 43 45 20 |"......"REPLACE | 000009F0: 54 48 45 20 20 22 3B C7 28 33 34 29 3B 22 20 20 |THE ";.(34);" | 00000A00: 57 49 54 48 20 41 20 53 50 41 43 45 2E 22 00 3D |WITH A SPACE.".=| 00000A10: 12 02 03 99 22 D4 48 45 20 4E 45 58 54 20 43 48 |....".HE NEXT CH| 00000A20: 41 52 41 43 54 45 52 20 49 53 20 54 48 45 20 43 |ARACTER IS THE C| 00000A30: 4F 4E 54 52 4F 4C 20 43 48 41 52 2D 22 00 69 12 |ONTROL CHAR-".i.| 00000A40: 0C 03 99 22 41 43 54 45 52 20 59 4F 55 20 57 41 |..."ACTER YOU WA| 00000A50: 4E 54 20 54 4F 20 41 43 54 49 56 41 54 45 2E 20 |NT TO ACTIVATE. | 00000A60: 20 D9 4F 55 20 43 41 4E 22 00 97 12 16 03 99 22 | .OU CAN"......"| 00000A70: 43 4F 4D 42 49 4E 45 20 4D 4F 52 45 20 54 48 41 |COMBINE MORE THA| 00000A80: 4E 20 31 20 43 4F 4E 54 52 4F 4C 20 43 48 41 52 |N 1 CONTROL CHAR| 00000A90: 41 43 54 45 52 2E 22 00 AC 12 20 03 8D 39 30 3A |ACTER."... ..90:| 00000AA0: 8B 49 4E 24 B2 22 20 22 A7 38 33 30 00 BE 12 2A |.IN$." ".830...*| 00000AB0: 03 8B 49 4E 24 B2 22 5F 22 A7 31 38 35 30 00 C7 |..IN$."_".1850..| 00000AC0: 12 34 03 89 33 37 30 00 F8 12 3E 03 99 22 93 12 |.4..370...>.."..| 00000AD0: 3A D2 C5 CD 20 57 48 49 43 48 20 43 4F 4E 54 52 |:... WHICH CONTR| 00000AE0: 4F 4C 20 43 48 41 52 41 43 54 45 52 53 20 20 20 |OL CHARACTERS | 00000AF0: 20 20 20 20 20 20 20 22 00 27 13 48 03 99 22 11 | ".'.H..".| 00000B00: CE 4F 57 20 46 4F 52 20 54 48 45 20 42 41 44 20 |.OW FOR THE BAD | 00000B10: 4E 45 57 53 2E 20 20 CE 4F 54 20 41 4C 4C 20 43 |NEWS. .OT ALL C| 00000B20: 4F 4E 54 52 4F 4C 22 00 54 13 52 03 99 22 43 48 |ONTROL".T.R.."CH| 00000B30: 41 52 41 43 54 45 52 53 20 43 41 4E 20 42 45 20 |ARACTERS CAN BE | 00000B40: 41 43 54 49 56 41 54 45 44 20 54 48 49 53 20 57 |ACTIVATED THIS W| 00000B50: 41 59 2E 22 00 81 13 5C 03 99 22 C2 C1 D3 C9 C3 |AY."...\..".....| 00000B60: 20 52 45 53 45 52 56 45 53 20 55 4E 51 55 4F 54 | RESERVES UNQUOT| 00000B70: 45 44 20 43 4F 44 45 53 20 31 32 38 2D 32 35 35 |ED CODES 128-255| 00000B80: 22 00 AE 13 66 03 99 22 46 4F 52 20 C2 C1 D3 C9 |"...f.."FOR ....| 00000B90: C3 20 4B 45 59 57 4F 52 44 20 54 4F 4B 45 4E 53 |. KEYWORD TOKENS| 00000BA0: 2E 20 20 D4 48 49 53 20 4D 45 41 4E 53 22 00 D8 |. .HIS MEANS"..| 00000BB0: 13 70 03 99 22 4F 4E 4C 59 20 43 4F 4E 54 52 4F |.p.."ONLY CONTRO| 00000BC0: 4C 20 43 48 41 52 41 43 54 45 52 53 20 57 49 54 |L CHARACTERS WIT| 00000BD0: 48 20 43 4F 44 45 53 22 00 FB 13 7A 03 99 22 30 |H CODES"...z.."0| 00000BE0: 2D 31 32 37 20 28 42 45 4C 4F 57 29 20 41 52 45 |-127 (BELOW) ARE| 00000BF0: 20 50 4F 53 53 49 42 4C 45 2E 22 00 15 14 84 03 | POSSIBLE.".....| 00000C00: 99 22 43 4F 44 45 20 35 20 2D 20 57 48 49 54 45 |."CODE 5 - WHITE| 00000C10: 20 12 2A 92 22 00 38 14 8E 03 99 22 20 20 20 20 | .*.".8...." | 00000C20: 20 38 20 2D 20 44 49 53 41 42 4C 45 20 D3 C8 C9 | 8 - DISABLE ...| 00000C30: C6 D4 2F CC CF C7 CF 22 00 5B 14 98 03 99 22 20 |../....".[...." | 00000C40: 20 20 20 20 39 20 2D 20 45 4E 41 42 4C 45 20 20 | 9 - ENABLE | 00000C50: D3 C8 C9 C6 D4 2F CC CF C7 CF 22 00 72 14 A2 03 |...../....".r...| 00000C60: 99 22 20 20 20 20 31 33 20 2D 20 52 45 54 55 52 |." 13 - RETUR| 00000C70: 4E 22 00 8D 14 AC 03 99 22 20 20 20 20 31 34 20 |N"......" 14 | 00000C80: 2D 20 4C 4F 57 45 52 20 43 41 53 45 22 00 AD 14 |- LOWER CASE"...| 00000C90: B6 03 99 22 20 20 20 20 31 37 20 2D 20 43 55 52 |..." 17 - CUR| 00000CA0: 53 4F 52 20 44 4F 57 4E 20 12 2A 92 22 00 CC 14 |SOR DOWN .*."...| 00000CB0: C0 03 99 22 20 20 20 20 31 38 20 2D 20 52 45 56 |..." 18 - REV| 00000CC0: 45 52 53 45 20 4F 4E 20 12 2A 92 22 00 E5 14 CA |ERSE ON .*."....| 00000CD0: 03 99 22 20 20 20 20 31 39 20 2D 20 48 4F 4D 45 |.." 19 - HOME| 00000CE0: 20 12 2A 92 22 00 FC 14 D4 03 99 22 20 20 20 20 | .*."......" | 00000CF0: 32 30 20 2D 20 44 45 4C 45 54 45 22 00 14 15 DE |20 - DELETE"....| 00000D00: 03 99 22 20 20 20 20 32 38 20 2D 20 52 45 44 20 |.." 28 - RED | 00000D10: 12 2A 92 22 00 35 15 E8 03 99 22 20 20 20 20 32 |.*.".5...." 2| 00000D20: 39 20 2D 20 43 55 52 53 4F 52 20 52 49 47 48 54 |9 - CURSOR RIGHT| 00000D30: 20 12 2A 92 22 00 4F 15 F2 03 99 22 20 20 20 20 | .*.".O...." | 00000D40: 33 30 20 2D 20 47 52 45 45 4E 20 12 2A 92 22 00 |30 - GREEN .*.".| 00000D50: 68 15 FC 03 99 22 20 20 20 20 33 31 20 2D 20 42 |h...." 31 - B| 00000D60: 4C 55 45 20 12 2A 92 22 00 8C 15 06 04 99 22 20 |LUE .*."......" | 00000D70: 20 20 32 30 34 20 2D 20 45 52 52 4F 52 20 4F 55 | 204 - ERROR OU| 00000D80: 54 20 28 53 50 45 43 49 41 4C 29 22 00 B8 15 10 |T (SPECIAL)"....| 00000D90: 04 99 22 12 2A 92 2D C5 4E 54 52 59 20 49 53 20 |..".*.-.NTRY IS | 00000DA0: 50 4F 53 53 49 42 4C 45 20 46 52 4F 4D 20 4B 45 |POSSIBLE FROM KE| 00000DB0: 59 42 4F 41 52 44 2E 22 00 CF 15 1A 04 8D 39 30 |YBOARD."......90| 00000DC0: 3A 8B 20 49 4E 24 B2 22 20 22 A7 31 30 38 30 00 |:. IN$." ".1080.| 00000DD0: E0 15 24 04 8B 49 4E 24 B2 22 5E 22 A7 36 30 30 |..$..IN$."^".600| 00000DE0: 00 EB 15 2E 04 89 20 31 38 35 30 00 1C 16 38 04 |...... 1850...8.| 00000DF0: 99 22 93 12 3A D2 C5 CD 20 45 58 41 4D 50 4C 45 |."..:... EXAMPLE| 00000E00: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S | 00000E10: 20 20 20 20 20 20 20 20 20 20 20 22 00 54 16 42 | ".T.B| 00000E20: 04 99 22 11 05 D7 48 49 54 45 90 2C 1F 42 4C 55 |.."...HITE.,.BLU| 00000E30: 45 90 2C 1E 47 52 45 45 4E 90 20 41 4E 44 20 1C |E.,.GREEN. AND .| 00000E40: 52 45 44 90 20 57 4F 52 4B 20 54 48 45 20 53 41 |RED. WORK THE SA| 00000E50: 4D 45 2E 22 00 84 16 4C 04 99 22 11 12 C3 55 52 |ME."...L.."...UR| 00000E60: 53 4F 52 20 44 4F 57 4E 92 2D CD 41 4E 59 20 43 |SOR DOWN.-.ANY C| 00000E70: 41 4E 20 42 45 20 50 55 54 20 49 4E 20 41 20 52 |AN BE PUT IN A R| 00000E80: 4F 57 2E 22 00 A0 16 56 04 99 22 11 34 30 20 46 |OW."...V..".40 F| 00000E90: 4F 52 20 49 3D 31 20 54 4F 20 32 30 3A 52 45 4D |OR I=1 TO 20:REM| 00000EA0: 00 C5 16 60 04 99 22 11 11 20 20 20 20 20 20 20 |...`..".. | 00000EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 | RE| 00000EC0: 4D 41 52 4B 22 00 D6 16 6A 04 99 22 35 30 20 4E |MARK"...j.."50 N| 00000ED0: 45 58 54 20 49 22 00 09 17 74 04 99 22 11 12 D2 |EXT I"...t.."...| 00000EE0: 45 56 45 52 53 45 20 4F 4E 92 2D D7 49 4C 4C 20 |EVERSE ON.-.ILL | 00000EF0: 4F 4E 4C 59 20 52 45 56 45 52 53 45 20 54 48 45 |ONLY REVERSE THE| 00000F00: 20 52 45 4D 41 52 4B 2E 22 00 36 17 7E 04 99 22 | REMARK.".6.~.."| 00000F10: 34 30 20 41 3D 33 2E 31 34 31 35 39 2A 52 2A 52 |40 A=3.14159*R*R| 00000F20: 3A 52 45 4D 20 12 53 45 54 20 27 41 27 20 54 4F |:REM .SET 'A' TO| 00000F30: 20 41 52 45 41 22 00 5E 17 88 04 99 22 11 12 C8 | AREA".^...."...| 00000F40: 4F 4D 45 92 2D C9 20 57 4F 4E 27 54 20 53 48 4F |OME.-. WON'T SHO| 00000F50: 57 20 49 54 20 48 45 52 45 20 42 55 54 22 00 84 |W IT HERE BUT"..| 00000F60: 17 92 04 99 22 4C 49 53 54 49 4E 47 53 20 52 45 |...."LISTINGS RE| 00000F70: 41 4C 4C 59 20 47 45 54 20 4D 45 53 53 45 44 20 |ALLY GET MESSED | 00000F80: 55 50 2E 22 00 B2 17 9C 04 99 22 11 12 C3 55 52 |UP."......"...UR| 00000F90: 53 4F 52 20 52 49 47 48 54 92 2D C3 4F 53 4D 45 |SOR RIGHT.-.OSME| 00000FA0: 54 49 43 20 45 46 46 45 43 54 53 20 4F 4E 4C 59 |TIC EFFECTS ONLY| 00000FB0: 2E 22 00 D7 17 A6 04 99 22 11 34 30 20 41 3D 32 |."......".40 A=2| 00000FC0: 2E 35 34 3A 52 45 4D 20 20 49 4E 43 48 45 53 20 |.54:REM INCHES | 00000FD0: 20 54 4F 20 20 43 4D 00 ED 17 B0 04 8D 39 30 3A | TO CM......90:| 00000FE0: 8B 49 4E 24 B2 22 20 22 A7 31 32 33 30 00 FF 17 |.IN$." ".1230...| 00000FF0: BA 04 8B 49 4E 24 B2 22 5F 22 A7 31 38 35 30 00 |...IN$."_".1850.| 00001000: 08 18 C4 04 89 38 33 30 00 38 18 CE 04 99 22 93 |.....830.8....".| 00001010: 12 3A D2 C5 CD 20 4E 4F 4E 2D 4B 45 59 42 4F 41 |.:... NON-KEYBOA| 00001020: 52 44 20 45 4E 54 52 59 20 43 4F 4E 54 52 4F 4C |RD ENTRY CONTROL| 00001030: 20 43 48 41 52 27 53 22 00 68 18 D8 04 99 20 22 | CHAR'S".h.... "| 00001040: 11 C8 4F 57 20 44 4F 20 57 45 20 45 4E 54 45 52 |..OW DO WE ENTER| 00001050: 20 4E 4F 4E 2D 4B 45 59 42 4F 41 52 44 20 43 4F | NON-KEYBOARD CO| 00001060: 4E 54 52 4F 4C 53 2E 22 00 96 18 E2 04 99 22 11 |NTROLS."......".| 00001070: D4 48 45 53 45 20 41 52 45 20 4D 4F 52 45 20 44 |.HESE ARE MORE D| 00001080: 49 46 46 49 43 55 4C 54 20 54 4F 20 41 43 54 49 |IFFICULT TO ACTI| 00001090: 56 41 54 45 2E 22 00 C2 18 EC 04 99 22 D7 45 20 |VATE."......".E | 000010A0: 48 41 56 45 20 54 4F 20 44 4F 20 41 20 53 45 41 |HAVE TO DO A SEA| 000010B0: 52 43 48 20 46 4F 52 20 41 20 43 45 52 54 41 49 |RCH FOR A CERTAI| 000010C0: 4E 22 00 EC 18 F6 04 99 22 43 4F 4D 42 49 4E 41 |N"......"COMBINA| 000010D0: 54 49 4F 4E 20 4F 46 20 43 48 41 52 41 43 54 45 |TION OF CHARACTE| 000010E0: 52 53 20 41 4E 44 20 54 48 45 4E 22 00 16 19 00 |RS AND THEN"....| 000010F0: 05 99 22 52 45 50 4C 41 43 45 20 4F 4E 45 20 57 |.."REPLACE ONE W| 00001100: 49 54 48 20 54 48 45 20 43 4F 44 45 20 57 45 20 |ITH THE CODE WE | 00001110: 57 41 4E 54 2E 22 00 42 19 0A 05 99 22 D4 48 49 |WANT.".B....".HI| 00001120: 53 20 49 53 20 43 4F 4D 50 4C 49 43 41 54 45 44 |S IS COMPLICATED| 00001130: 20 42 59 20 54 48 45 20 46 41 43 54 20 54 48 41 | BY THE FACT THA| 00001140: 54 22 00 70 19 14 05 99 22 C2 C1 D3 C9 C3 20 4C |T".p...."..... L| 00001150: 49 4E 45 20 23 27 53 20 41 4E 44 20 4C 49 4E 45 |INE #'S AND LINE| 00001160: 20 4C 49 4E 4B 53 20 41 52 45 20 41 4C 53 4F 22 | LINKS ARE ALSO"| 00001170: 00 9D 19 1E 05 99 22 49 4E 20 54 48 45 20 53 45 |......"IN THE SE| 00001180: 41 52 43 48 20 41 52 45 41 2E 20 20 C3 48 4F 4F |ARCH AREA. .HOO| 00001190: 53 45 20 53 4F 4D 45 54 48 49 4E 47 22 00 C3 19 |SE SOMETHING"...| 000011A0: 28 05 99 22 4C 49 4B 45 20 5A 5E 5F 20 41 4E 44 |(.."LIKE Z^_ AND| 000011B0: 20 59 4F 55 20 53 48 4F 55 4C 44 20 42 45 20 CF | YOU SHOULD BE .| 000011C0: CB 2E 22 00 F5 19 32 05 99 22 11 12 C4 45 4C 45 |.."...2.."...ELE| 000011D0: 54 45 92 2D D2 45 50 4C 41 43 45 20 5A 5E 5F 44 |TE.-.EPLACE Z^_D| 000011E0: 44 2E 2E 20 57 49 54 48 20 31 33 20 44 45 4C 45 |D.. WITH 13 DELE| 000011F0: 54 45 53 2E 22 00 03 1A 3C 05 99 22 C1 43 54 55 |TES."...<..".CTU| 00001200: 41 4C 22 00 35 1A 46 05 99 22 34 30 20 47 4F 54 |AL".5.F.."40 GOT| 00001210: 4F 20 31 30 30 3A 52 45 4D 22 3B C7 28 33 34 29 |O 100:REM";.(34)| 00001220: 3B 22 5A 5E 5F 44 44 44 44 44 44 44 44 44 44 50 |;"Z^_DDDDDDDDDDP| 00001230: 52 49 4E 54 22 00 59 1A 50 05 99 22 35 30 20 27 |RINT".Y.P.."50 '| 00001240: 50 55 54 20 41 20 46 41 4B 45 20 50 52 4F 47 52 |PUT A FAKE PROGR| 00001250: 41 4D 20 48 45 52 45 27 22 00 80 1A 5A 05 99 22 |AM HERE'"...Z.."| 00001260: 31 30 30 20 27 50 55 54 20 54 48 45 20 52 45 41 |100 'PUT THE REA| 00001270: 4C 20 50 52 4F 47 52 41 4D 20 48 45 52 45 27 22 |L PROGRAM HERE'"| 00001280: 00 91 1A 64 05 99 20 22 11 CC 49 53 54 49 4E 47 |...d.. "..ISTING| 00001290: 22 00 A0 1A 6E 05 99 22 34 30 20 50 52 49 4E 54 |"...n.."40 PRINT| 000012A0: 00 C2 1A 78 05 99 22 35 30 20 27 50 55 54 20 46 |...x.."50 'PUT F| 000012B0: 41 4B 45 20 50 52 4F 47 52 41 4D 20 48 45 52 45 |AKE PROGRAM HERE| 000012C0: 27 22 00 E5 1A 82 05 99 22 31 30 30 20 27 50 55 |'"......"100 'PU| 000012D0: 54 20 52 45 41 4C 20 50 52 4F 47 52 41 4D 20 48 |T REAL PROGRAM H| 000012E0: 45 52 45 27 22 00 FD 1A 8C 05 8D 20 39 30 3A 8B |ERE'"...... 90:.| 000012F0: 20 49 4E 24 B2 22 20 22 A7 31 34 35 30 00 0F 1B | IN$." ".1450...| 00001300: 96 05 8B 49 4E 24 B2 22 5E 22 A7 31 30 38 30 00 |...IN$."^".1080.| 00001310: 1A 1B A0 05 89 20 31 38 35 30 00 4A 1B AA 05 99 |..... 1850.J....| 00001320: 22 93 12 3A D2 C5 CD 20 53 50 45 43 49 41 4C 20 |"..:... SPECIAL | 00001330: 43 4F 4E 54 52 4F 4C 20 43 4F 44 45 20 32 30 34 |CONTROL CODE 204| 00001340: 20 20 20 20 20 20 20 20 20 22 00 79 1B B4 05 99 | ".y....| 00001350: 22 11 C3 4F 44 45 20 32 30 34 20 49 53 20 41 20 |"..ODE 204 IS A | 00001360: 4E 4F 4E 2D 4B 45 59 42 4F 41 52 44 20 45 4E 54 |NON-KEYBOARD ENT| 00001370: 52 59 20 43 48 41 52 2E 22 00 A4 1B BE 05 99 22 |RY CHAR."......"| 00001380: D4 48 49 53 20 50 41 52 54 49 43 55 4C 41 52 20 |.HIS PARTICULAR | 00001390: 43 4F 44 45 20 57 49 4C 4C 20 43 41 55 53 45 20 |CODE WILL CAUSE | 000013A0: 54 48 45 22 00 CF 1B C8 05 99 22 CC C9 D3 D4 49 |THE"......"....I| 000013B0: 4E 47 20 54 4F 20 12 45 52 52 4F 52 20 4F 55 54 |NG TO .ERROR OUT| 000013C0: 92 20 42 55 54 20 44 4F 45 53 20 4E 4F 54 22 00 |. BUT DOES NOT".| 000013D0: F1 1B D2 05 99 22 41 46 46 45 43 54 20 54 48 45 |....."AFFECT THE| 000013E0: 20 41 43 54 55 41 4C 20 D2 D5 CE 4E 49 4E 47 2E | ACTUAL ...NING.| 000013F0: 22 00 1D 1C DC 05 99 22 11 D0 4C 41 43 45 20 20 |"......"..LACE | 00001400: 20 52 45 4D 22 3B C7 28 33 34 29 3B 22 5A 5E 5F | REM";.(34);"Z^_| 00001410: 20 20 54 48 52 4F 55 47 48 4F 55 54 22 00 49 1C | THROUGHOUT".I.| 00001420: E6 05 99 22 54 48 45 20 50 52 4F 47 52 41 4D 2E |..."THE PROGRAM.| 00001430: 20 20 D4 48 45 4E 20 44 4F 20 54 48 45 20 53 45 | .HEN DO THE SE| 00001440: 41 52 43 48 20 41 4E 44 22 00 77 1C F0 05 99 22 |ARCH AND".w...."| 00001450: 52 45 50 4C 41 43 45 20 57 49 54 48 20 43 4F 44 |REPLACE WITH COD| 00001460: 45 20 32 30 34 2E 20 20 D4 48 45 20 50 52 4F 47 |E 204. .HE PROG| 00001470: 52 41 4D 20 49 53 22 00 8E 1C FA 05 99 22 4E 4F |RAM IS"......"NO| 00001480: 57 20 4C 49 53 54 20 50 52 4F 4F 46 21 22 00 BA |W LIST PROOF!"..| 00001490: 1C 04 06 99 22 11 D9 4F 55 20 57 41 4E 54 20 54 |...."..OU WANT T| 000014A0: 4F 20 50 4C 41 43 45 20 49 54 20 49 4E 20 4D 41 |O PLACE IT IN MA| 000014B0: 4E 59 20 50 4C 41 43 45 53 22 00 E6 1C 0E 06 99 |NY PLACES"......| 000014C0: 22 53 4F 20 54 48 41 54 20 54 48 45 20 55 53 45 |"SO THAT THE USE| 000014D0: 52 20 43 41 4E 4E 4F 54 20 45 56 45 4E 20 4C 4F |R CANNOT EVEN LO| 000014E0: 4F 4B 20 41 54 22 00 02 1D 18 06 99 22 50 41 52 |OK AT"......"PAR| 000014F0: 54 20 4F 46 20 54 48 45 20 50 52 4F 47 52 41 4D |T OF THE PROGRAM| 00001500: 2E 22 00 29 1D 22 06 99 22 11 12 C8 45 52 45 27 |.".).".."...ERE'| 00001510: 53 20 41 4E 4F 54 48 45 52 20 53 4E 45 41 4B 59 |S ANOTHER SNEAKY| 00001520: 20 54 52 49 43 4B 2E 92 22 00 58 1D 2C 06 99 22 | TRICK..".X.,.."| 00001530: 11 D0 55 54 20 54 48 45 20 43 4F 4C 4F 52 20 1F |..UT THE COLOR .| 00001540: 42 4C 55 45 90 20 41 54 20 54 48 45 20 53 54 41 |BLUE. AT THE STA| 00001550: 52 54 20 4F 46 20 41 22 00 87 1D 36 06 99 22 4C |RT OF A"...6.."L| 00001560: 49 53 54 49 4E 47 2E 20 20 D7 48 45 4E 20 59 4F |ISTING. .HEN YO| 00001570: 55 20 54 55 52 4E 20 4F 4E 20 54 48 45 20 43 4F |U TURN ON THE CO| 00001580: 4D 50 55 54 45 52 22 00 B6 1D 40 06 99 22 54 48 |MPUTER"...@.."TH| 00001590: 45 20 42 41 43 4B 47 52 4F 55 4E 44 20 49 53 20 |E BACKGROUND IS | 000015A0: 42 4C 55 45 2E 20 20 D4 48 49 53 20 57 49 4C 4C |BLUE. .HIS WILL| 000015B0: 20 4D 41 4B 45 22 00 E3 1D 4A 06 99 22 54 48 45 | MAKE"...J.."THE| 000015C0: 20 4C 49 53 54 49 4E 47 20 49 4E 56 49 53 49 42 | LISTING INVISIB| 000015D0: 4C 45 20 55 4E 54 49 4C 20 54 48 45 20 42 41 43 |LE UNTIL THE BAC| 000015E0: 4B 2D 22 00 FD 1D 54 06 99 22 47 52 4F 55 4E 44 |K-"...T.."GROUND| 000015F0: 20 49 53 20 43 48 41 4E 47 45 44 2E 22 00 13 1E | IS CHANGED."...| 00001600: 5E 06 8D 39 30 3A 8B 49 4E 24 B2 22 20 22 A7 31 |^..90:.IN$." ".1| 00001610: 36 36 30 00 25 1E 68 06 8B 49 4E 24 B2 22 5F 22 |660.%.h..IN$."_"| 00001620: A7 31 38 35 30 00 2F 1E 72 06 89 31 32 33 30 00 |.1850./.r..1230.| 00001630: 5F 1E 7C 06 99 22 93 12 3A D2 C5 CD 20 54 57 4F |_.|.."..:... TWO| 00001640: 20 4C 41 53 54 20 54 49 50 53 20 20 20 20 20 20 | LAST TIPS | 00001650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 00001660: 83 1E 86 06 99 22 11 C8 45 52 45 20 41 52 45 20 |....."..ERE ARE | 00001670: 54 57 4F 20 4C 41 53 54 20 D2 C5 CD 20 54 49 50 |TWO LAST ... TIP| 00001680: 53 2E 22 00 B9 1E 90 06 99 22 11 12 1F 31 90 92 |S."......"...1..| 00001690: 2D 12 3A D2 C5 CD 92 20 49 53 20 4E 4F 54 20 4E |-.:.... IS NOT N| 000016A0: 45 45 44 45 44 20 41 46 54 45 52 20 54 48 45 20 |EEDED AFTER THE | 000016B0: 4E 55 4D 45 52 49 43 53 22 00 E1 1E 9A 06 99 22 |NUMERICS"......"| 000016C0: 54 48 41 54 20 46 4F 4C 4C 4F 57 20 C7 CF D4 CF |THAT FOLLOW ....| 000016D0: 2C 20 C7 CF D3 D5 C2 20 4F 52 20 D4 C8 C5 CE 2E |, ..... OR .....| 000016E0: 22 00 0A 1F A4 06 99 22 11 34 30 20 47 4F 54 4F |"......".40 GOTO| 000016F0: 31 30 30 20 20 4A 55 4D 50 20 54 4F 20 54 48 45 |100 JUMP TO THE| 00001700: 20 4C 49 4E 45 20 31 30 30 22 00 3D 1F AE 06 99 | LINE 100".=....| 00001710: 22 11 12 1F 32 90 92 2D C8 41 56 45 20 59 4F 55 |"...2..-.AVE YOU| 00001720: 20 4E 4F 54 49 43 45 44 20 54 48 41 54 20 41 4C | NOTICED THAT AL| 00001730: 4C 20 53 54 41 54 45 4D 45 4E 54 53 22 00 6B 1F |L STATEMENTS".k.| 00001740: B8 06 99 22 41 52 45 20 4C 45 46 54 20 4A 55 53 |..."ARE LEFT JUS| 00001750: 54 49 46 49 45 44 20 4F 4E 45 20 53 50 41 43 45 |TIFIED ONE SPACE| 00001760: 20 41 46 54 45 52 20 54 48 45 22 00 9A 1F C2 06 | AFTER THE".....| 00001770: 99 22 4C 49 4E 45 20 4E 55 4D 42 45 52 2E 20 C5 |."LINE NUMBER. .| 00001780: 56 45 52 59 54 48 49 4E 47 20 49 53 20 50 55 53 |VERYTHING IS PUS| 00001790: 48 45 44 20 4F 56 45 52 2E 22 00 C9 1F CC 06 99 |HED OVER."......| 000017A0: 22 D9 4F 55 20 43 41 4E 20 43 48 41 4E 47 45 20 |".OU CAN CHANGE | 000017B0: 54 48 41 54 20 42 59 20 50 55 54 54 49 4E 47 20 |THAT BY PUTTING | 000017C0: 41 20 12 3A 92 20 41 53 22 00 F7 1F D6 06 99 22 |A .:. AS"......"| 000017D0: 54 48 45 20 46 49 52 53 54 20 43 48 41 52 41 43 |THE FIRST CHARAC| 000017E0: 54 45 52 20 4F 4E 20 54 48 45 20 4C 49 4E 45 2E |TER ON THE LINE.| 000017F0: 20 20 D4 48 45 4E 22 00 20 20 E0 06 99 20 22 53 | .HEN". ... "S| 00001800: 4B 49 50 20 41 53 20 4D 41 4E 59 20 53 50 41 43 |KIP AS MANY SPAC| 00001810: 45 53 20 41 53 20 59 4F 55 20 57 41 4E 54 2E 22 |ES AS YOU WANT."| 00001820: 00 3C 20 EA 06 99 20 22 11 34 30 20 3A 20 20 46 |.< ... ".40 : F| 00001830: 4F 52 20 49 3D 31 20 54 4F 20 32 30 00 52 20 F4 |OR I=1 TO 20.R .| 00001840: 06 99 20 22 35 30 20 3A 20 20 20 20 41 3D 49 2A |.. "50 : A=I*| 00001850: 49 22 00 67 20 FE 06 99 20 22 36 30 20 3A 20 20 |I".g ... "60 : | 00001860: 4E 45 58 54 20 49 22 00 7D 20 26 07 8D 20 39 30 |NEXT I".} &.. 90| 00001870: 3A 8B 49 4E 24 B2 22 20 22 A7 31 36 30 00 90 20 |:.IN$." ".160.. | 00001880: 30 07 8B 20 49 4E 24 B2 22 5E 22 A7 31 34 35 30 |0.. IN$."^".1450| 00001890: 00 A6 20 3A 07 99 C7 28 39 29 3A 99 22 93 22 3A |.. :...(9):.".":| 000018A0: 9E 34 39 31 35 32 00 00 00 |.49152... |
........$.... (C) 1985 GOLD DISK INC.*..
...>.(.. TIPS: REMARKS.D.2...V.<.. G(14)
:.G(8).Y.F.D0.13.4096:D4.D0.1024:Q$.G(34
)...P.. 160...Z..IM.1.11:.IN$:.IM...D.D0
.13.4096:D4.D0.1024.V.N.. ".............
............";...X.. ".^. PREV PAGE .SP
ACE. NEXT PAGE ._. GD MENU..".$.... IN$
:.IN$."".130.N.... IN$.."^" . IN$.." " .
IN$.."_" .130.T.....^. .."..".X.... D0.
32,15:. D0.33,15...... "..WHAT TO DO WIT
H YOUR REM: REM TITLE".Y...."..REM.
IS NORMALLY USED TO ADD COMMENTS"...H.."
TO YOUR PROGRAM. THIS IS VERY HELPFUL".
3.R.."WHEN YOU LEAVE A PROGRAM FOR A WHI
LE".A...."AND THEN CAN'T TELL IF IT'S YO
UR SPACE"......"INVADERS OR YOUR MORTGAG
E PROGRAM."...... ".THE PROGRAMMER'S REF
ERENCE GUIDE SAYS"...... "THE .REM. STAT
EMENT MAKES YOUR PROGRAMS"...... "MORE E
ASILY UNDERSTOOD WHEN LIST'D.".F.... ".T
HAT'S FINE AS A START BUT IT SOUNDS A".G
...."LITTLE BORING DOESN'T IT?"..."..".C
AN WE DO ANYTHING ELSE?"...,.."..YOU BET
!"...6..IM.1.11:.IN$:.IM.S.@.. "........
.................";...J.. ".SPACE. NEXT
PAGE ._. GD MENU.."...T..
IN$:.IN$."".340.>.^.. IN$.." " . IN$.."_
" .340.S.H.. IN$."_" . 1850...R.."..:REM
ADDING COLOR "...|.
.".HAVE YOU EVER WANTED TO ADD COLOR TO"
......"YOUR LISTINGS? WELL YOU CAN! I'L
L SHOW"......"YOU HOW."......".10 FOR I=
PEEK(43)+256*PEEK(44) TO".9...." PEEK(
45)+256*PEEK(46)".H...."20 IF PEEK(I)=14
3 AND PEEK(I+1)=34 THEN".~...." POKE I
+1,32"...B.."30 NEXT I".E.L.."40 PRINT "
;G(34);"MULTI";G(34);";:REM";G(34);"....
V.."50 PRINT ";G(34);"COLOR LISTING";G(3
4)......".PRESS A KEY TO LIST IT.".'....
IN$:.IN$."".490.Q....".10 FOR I=PEEK(43)
+256*PEEK(44) TO".Q...." PEEK(45)+256*
PEEK(46)". ...."20 IF PEEK(I)=143 AND PE
EK(I+1)=34 THEN"......" POKE I+1,32".G
...."30 NEXT I"...&.."40 PRINT ";G(34);"
MULTI";G(34);";:REM".".0..".50 PRINT ";G
(34);"COLOR LISTING";G(34).>.:..".":. 90
:. IN$." ".600.Q.D.. IN$."^". 160.\.N..
1850...X.."..:REM ACTIVATING CONTROL CHA
RACTERS "...B..".NOW WHY DID THAT WO
RK?".W.L.."WHEN YOU GO INTO QUOTE MODE Y
OU CAN"...V.."ENTER CONTROL CHARACTERS S
UCH AS COLOR".4...."OR CURSOR MOVEMENTS,
ETC. HOWEVER THESE".A...."SAME QUOTES I
NHIBIT THE CONTROL CHAR-"......"ACTERS F
ROM OPERATING DURING LISTING."......"THE
ANSWER IS TO ENTER THEM WITH QUOTES"...
..."AND THEN DELETE THE QUOTES LATER."..
...."THAT'S WHAT LINES 10-30 DO FOR YOU.
".;....".10 FOR I=PEEK(43)+256*PEEK(44)
TO".[.F.." PEEK(45)+256*PEEK(46)"...P.
."20 IF PEEK(I)=143 AND PEEK(I+1)=34 THE
N". .Z.." POKE I+1,32"......"30 NEXT I
"......".THESE LINES LOOK FOR REM";G(34
);" AND"......"REPLACE THE ";G(34);"
WITH A SPACE.".=...."THE NEXT CHARACTER
IS THE CONTROL CHAR-".I...."ACTER YOU WA
NT TO ACTIVATE. YOU CAN"......"COMBINE
MORE THAN 1 CONTROL CHARACTER."... ..90:
.IN$." ".830...*..IN$."_".1850.G.4..370.
..>.."..:REM WHICH CONTROL CHARACTERS
".'.H..".NOW FOR THE BAD NEWS. N
OT ALL CONTROL".T.R.."CHARACTERS CAN BE
ACTIVATED THIS WAY."...\.."BASIC RESERVE
S UNQUOTED CODES 128-255"...F.."FOR BASI
C KEYWORD TOKENS. THIS MEANS".X.P.."ONL
Y CONTROL CHARACTERS WITH CODES"...Z.."0
-127 (BELOW) ARE POSSIBLE."......"CODE 5
- WHITE .*.".8...." 8 - DISABLE SHI
FT/LOGO".[...." 9 - ENABLE SHIFT/LO
GO".R...." 13 - RETURN"......" 14
- LOWER CASE"......" 17 - CURSOR DOWN
.*.".L...." 18 - REVERSE ON .*."...J
.." 19 - HOME .*."...T.." 20 - DEL
ETE"......" 28 - RED .*.".5...." 2
9 - CURSOR RIGHT .*.".O...." 30 - GRE
EN .*.".H...." 31 - BLUE .*."......"
204 - ERROR OUT (SPECIAL)"......".*.-E
NTRY IS POSSIBLE FROM KEYBOARD.".O....90
:. IN$." ".1080...$..IN$."^".600...... 1
850...8.."..:REM EXAMPLES
".T.B.."..WHITE.,.BLUE.,.GREE
N. AND .RED. WORK THE SAME."...L.."..CUR
SOR DOWN.-MANY CAN BE PUT IN A ROW.". .V
..".40 FOR I=1 TO 20:REM.E.`.."..
REMARK".V.J.."50 NEXT I"..
.T.."..REVERSE ON.-WILL ONLY REVERSE THE
REMARK.".6.~.."40 A=3.14159*R*R:REM .SE
T 'A' TO AREA".^...."..HOME.-I WON'T SHO
W IT HERE BUT"......"LISTINGS REALLY GET
MESSED UP."......"..CURSOR RIGHT.-COSME
TIC EFFECTS ONLY.".W....".40 A=2.54:REM
INCHES TO CM......90:.IN$." ".1230...
...IN$."_".1850...D..830.8.N.."..:REM NO
N-KEYBOARD ENTRY CONTROL CHAR'S".H.X.. "
.HOW DO WE ENTER NON-KEYBOARD CONTROLS."
......".THESE ARE MORE DIFFICULT TO ACTI
VATE.".B...."WE HAVE TO DO A SEARCH FOR
A CERTAIN"......"COMBINATION OF CHARACTE
RS AND THEN"......"REPLACE ONE WITH THE
CODE WE WANT.".B...."THIS IS COMPLICATED
BY THE FACT THAT".P...."BASIC LINE #'S
AND LINE LINKS ARE ALSO"......"IN THE SE
ARCH AREA. CHOOSE SOMETHING".C.(.."LIKE
Z^_ AND YOU SHOULD BE OK."...2.."..DELE
TE.-REPLACE Z^_DD.. WITH 13 DELETES."...
<.."ACTUAL".5.F.."40 GOTO 100:REM";G(34)
;"Z^_DDDDDDDDDDPRINT".Y.P.."50 'PUT A FA
KE PROGRAM HERE'"...Z.."100 'PUT THE REA
L PROGRAM HERE'"...D.. ".LISTING". .N.."
40 PRINT.B.X.."50 'PUT FAKE PROGRAM HERE
'"......"100 'PUT REAL PROGRAM HERE'"...
... 90:. IN$." ".1450......IN$."^".1080.
.. .. 1850.J...."..:REM SPECIAL CONTROL
CODE 204 ".Y....".CODE 204 IS A
NON-KEYBOARD ENTRY CHAR."......"THIS PAR
TICULAR CODE WILL CAUSE THE".O.H.."LISTI
NG TO .ERROR OUT. BUT DOES NOT"...R.."AF
FECT THE ACTUAL RUNNING."......".PLACE
REM";G(34);"Z^_ THROUGHOUT".I...."THE
PROGRAM. THEN DO THE SEARCH AND".W...."
REPLACE WITH CODE 204. THE PROGRAM IS".
....."NOW LIST PROOF!"......".YOU WANT T
O PLACE IT IN MANY PLACES"......"SO THAT
THE USER CANNOT EVEN LOOK AT"......"PAR
T OF THE PROGRAM.".).".."..HERE'S ANOTHE
R SNEAKY TRICK..".X.,..".PUT THE COLOR .
BLUE. AT THE START OF A"...6.."LISTING.
WHEN YOU TURN ON THE COMPUTER"...@.."TH
E BACKGROUND IS BLUE. THIS WILL MAKE"..
.J.."THE LISTING INVISIBLE UNTIL THE BAC
K-"...T.."GROUND IS CHANGED."...^..90:.I
N$." ".1660.%.H..IN$."_".1850./.R..1230.
_.|.."..:REM TWO LAST TIPS
"......".HERE ARE TWO LAST REM TIP
S."......"...1..-.:REM. IS NOT NEEDED AF
TER THE NUMERICS"......"THAT FOLLOW GOTO
, GOSUB OR THEN."......".40 GOTO100 JUM
P TO THE LINE 100".=...."...2..-HAVE YOU
NOTICED THAT ALL STATEMENTS".K...."ARE
LEFT JUSTIFIED ONE SPACE AFTER THE"...B.
."LINE NUMBER. EVERYTHING IS PUSHED OVER
.".I.L.."YOU CAN CHANGE THAT BY PUTTING
A .:. AS"...V.."THE FIRST CHARACTER ON T
HE LINE. THEN". ... "SKIP AS MANY SPAC
ES AS YOU WANT.".< ... ".40 : FOR I=1 T
O 20.R ... "50 : A=I*I".G ... "60 :
NEXT I".} &.. 90:.IN$." ".160.. 0.. IN$.
"^".1450.. :..G(9):.".":.49152...
> CLICK IMAGE PREVIEW FOR FULL MODAL