BYTES
FILE INFORMATION
FILENAME(S): BYTES
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 18:05:27
APPEARS ON: 1 disk(s)
FILE HASH
f17b16269530707610017c3a5ea370f26197c004c7467789c95ce3ffd7956bed
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 69 S 1 | BYTES | PRG | Xii | 22 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 97 35 33 32 38 31 2C 30 3A 97 |.......53281,0:.| 00000010: 35 33 32 38 30 2C 30 3A 99 22 93 0E 08 22 00 24 |53280,0:."...".$| 00000020: 08 14 00 3A 00 4A 08 1E 00 3A 8F 20 2A 20 44 45 |...:.J...:. * DE| 00000030: 46 41 55 4C 54 20 50 41 52 41 4D 45 54 45 52 53 |FAULT PARAMETERS| 00000040: 2F 56 41 52 49 41 42 4C 45 53 00 50 08 28 00 3A |/VARIABLES.P.(.:| 00000050: 00 63 08 32 00 44 52 B2 38 3A 44 52 24 B2 C4 28 |.c.2.DR.8:DR$..(| 00000060: 44 52 29 00 76 08 3C 00 4F 44 B2 31 3A 4F 44 24 |DR).v.<.OD.1:OD$| 00000070: B2 C4 28 4F 44 29 00 89 08 46 00 49 54 B2 31 3A |..(OD)...F.IT.1:| 00000080: 49 54 24 B2 C4 28 49 54 29 00 9C 08 50 00 45 4E |IT$..(IT)...P.EN| 00000090: B2 35 32 3A 45 4E 24 B2 22 35 32 22 00 AF 08 5A |.52:EN$."52"...Z| 000000A0: 00 4F 46 B2 35 33 3A 4F 46 24 B2 22 35 33 22 00 |.OF.53:OF$."53".| 000000B0: B5 08 64 00 3A 00 D4 08 6E 00 3A 8F 20 20 20 2A |..d.:...n.:. *| 000000C0: 2A 2A 20 20 20 4D 41 49 4E 20 4D 45 4E 55 20 20 |** MAIN MENU | 000000D0: 20 2A 2A 2A 00 DA 08 78 00 3A 00 0E 09 82 00 99 | ***...x.:......| 000000E0: 22 93 11 81 20 20 20 20 D4 48 45 20 96 D1 26 C4 |"... .HE ..&.| 000000F0: 81 20 D7 41 59 20 05 D6 53 81 20 54 48 45 20 96 |. .AY ..S. THE .| 00000100: CC CF C1 C4 D3 D4 C1 D2 81 20 D7 41 59 22 00 3C |......... .AY".<| 00000110: 09 8C 00 99 22 11 9F 20 20 20 20 C2 C1 D3 C9 C3 |....".. .....| 00000120: 20 32 2E 30 20 48 41 53 20 53 4F 4D 45 20 43 4F | 2.0 HAS SOME CO| 00000130: 4D 4D 41 4E 44 53 20 54 48 41 54 22 00 64 09 96 |MMANDS THAT".d..| 00000140: 00 99 22 20 4D 41 4B 45 20 49 54 20 56 45 52 59 |.." MAKE IT VERY| 00000150: 20 45 41 53 59 20 54 4F 20 44 4F 20 43 45 52 54 | EASY TO DO CERT| 00000160: 41 49 4E 22 00 91 09 A0 00 99 22 20 54 48 49 4E |AIN"......" THIN| 00000170: 47 53 20 49 4E 20 41 20 50 52 4F 47 52 41 4D 2C |GS IN A PROGRAM,| 00000180: 20 53 55 43 48 20 41 53 20 41 53 4B 20 46 4F 52 | SUCH AS ASK FOR| 00000190: 22 00 BE 09 AA 00 99 22 20 50 41 52 41 4D 45 54 |"......" PARAMET| 000001A0: 45 52 53 20 41 4E 44 20 44 49 53 50 4C 41 59 20 |ERS AND DISPLAY | 000001B0: 54 48 45 4D 2E 20 20 C9 46 20 59 4F 55 22 00 EA |THEM. .F YOU"..| 000001C0: 09 B4 00 99 22 20 41 52 45 20 57 52 49 54 49 4E |...." ARE WRITIN| 000001D0: 47 20 41 20 50 52 4F 47 52 41 4D 20 54 48 41 54 |G A PROGRAM THAT| 000001E0: 20 4F 4E 4C 59 20 59 4F 55 22 00 16 0A BE 00 99 | ONLY YOU"......| 000001F0: 22 20 57 49 4C 4C 20 42 45 20 55 53 49 4E 47 2C |" WILL BE USING,| 00000200: 20 54 48 45 20 D1 26 C4 20 57 41 59 20 49 53 20 | THE .&. WAY IS | 00000210: 42 45 53 54 2E 22 00 44 0A C8 00 99 22 20 C8 4F |BEST.".D...." .O| 00000220: 57 45 56 45 52 2C 20 49 46 20 59 4F 55 20 41 52 |WEVER, IF YOU AR| 00000230: 45 20 57 52 49 54 49 4E 47 20 46 4F 52 20 4F 54 |E WRITING FOR OT| 00000240: 48 45 52 22 00 71 0A D2 00 99 22 20 55 53 45 52 |HER".q...." USER| 00000250: 53 2C 20 59 4F 55 20 53 48 4F 55 4C 44 20 43 4F |S, YOU SHOULD CO| 00000260: 4E 53 49 44 45 52 20 55 53 49 4E 47 20 54 48 45 |NSIDER USING THE| 00000270: 22 00 93 0A DC 00 99 22 20 46 52 49 45 4E 44 4C |"......" FRIENDL| 00000280: 59 20 CC CF C1 C4 D3 D4 C1 D2 20 4D 45 54 48 4F |Y ........ METHO| 00000290: 44 2E 22 00 C3 0A E6 00 99 22 11 20 20 20 20 D4 |D."......". .| 000002A0: 48 45 53 45 20 54 57 4F 20 45 58 41 4D 50 4C 45 |HESE TWO EXAMPLE| 000002B0: 53 20 53 48 4F 57 20 54 57 4F 20 57 41 59 53 20 |S SHOW TWO WAYS | 000002C0: 4F 46 22 00 ED 0A F0 00 99 22 20 41 53 4B 49 4E |OF"......" ASKIN| 000002D0: 47 20 46 4F 52 20 41 20 44 52 49 56 45 20 4E 55 |G FOR A DRIVE NU| 000002E0: 4D 42 45 52 2C 20 4F 55 54 50 55 54 22 00 1C 0B |MBER, OUTPUT"...| 000002F0: FA 00 99 22 20 44 45 56 49 43 45 2C 20 49 54 41 |..." DEVICE, ITA| 00000300: 4C 49 43 53 20 53 54 41 54 55 53 2C 20 41 4E 44 |LICS STATUS, AND| 00000310: 20 54 48 45 20 45 53 43 41 50 45 22 00 48 0B 04 | THE ESCAPE".H..| 00000320: 01 99 22 20 43 4F 44 45 20 46 4F 52 20 49 54 41 |.." CODE FOR ITA| 00000330: 4C 49 43 53 20 4F 4E 20 41 4E 44 20 4F 46 46 20 |LICS ON AND OFF | 00000340: 4F 4E 20 59 4F 55 52 22 00 58 0B 0E 01 99 22 20 |ON YOUR".X...." | 00000350: 50 52 49 4E 54 45 52 2E 00 82 0B 18 01 99 22 11 |PRINTER.......".| 00000360: 20 20 20 20 20 20 20 20 20 20 9A 28 05 D1 9A 29 | .(...)| 00000370: 55 49 43 4B 20 41 4E 44 20 C4 49 52 54 59 20 57 |UICK AND .IRTY W| 00000380: 41 59 00 A4 0B 22 01 99 22 11 20 20 20 20 20 20 |AY..."..". | 00000390: 20 20 20 20 28 05 CC 9A 29 CF C1 C4 D3 D4 C1 D2 | (...).......| 000003A0: 20 57 41 59 00 CD 0B 2C 01 99 22 11 20 20 20 20 | WAY...,..". | 000003B0: 20 20 20 20 20 20 28 05 D2 9A 29 45 54 55 52 4E | (...)ETURN| 000003C0: 20 54 4F 20 CC CF C1 C4 D3 D4 C1 D2 22 00 F2 0B | TO ........"...| 000003D0: 36 01 A1 41 24 3A 8B 41 24 B3 B1 22 51 22 AF 41 |6..A$:.A$.."Q".A| 000003E0: 24 B3 B1 22 4C 22 AF 41 24 B3 B1 22 52 22 A7 33 |$.."L".A$.."R".3| 000003F0: 31 30 00 03 0C 40 01 8B 41 24 B2 22 52 22 A7 31 |10...@..A$."R".1| 00000400: 32 38 30 00 13 0C 4A 01 8B 41 24 B2 22 51 22 A7 |280...J..A$."Q".| 00000410: 33 39 30 00 1F 0C 54 01 8B 46 4C A7 37 35 30 00 |390...T..FL.750.| 00000420: 2D 0C 5E 01 46 4C B2 31 3A 89 35 37 30 00 33 0C |-.^.FL.1:.570.3.| 00000430: 68 01 3A 00 51 0C 72 01 3A 8F 20 20 20 20 2A 2A |h.:.Q.r.:. **| 00000440: 2A 20 54 48 45 20 51 26 44 20 57 41 59 20 2A 2A |* THE Q&D WAY **| 00000450: 2A 00 57 0C 7C 01 3A 00 85 0C 86 01 99 22 93 11 |*.W.|.:......"..| 00000460: 81 20 20 20 20 20 20 20 20 D4 48 45 20 96 D1 D5 |. .HE ...| 00000470: C9 C3 CB 81 20 41 4E 44 20 96 C4 C9 D2 D4 D9 20 |.... AND ...... | 00000480: 81 D7 41 59 22 00 C1 0C 90 01 97 32 31 34 2C 32 |..AY"......214,2| 00000490: 32 3A 99 3A 99 22 20 20 9F D0 52 45 53 53 20 05 |2:.:." ..RESS .| 000004A0: CF CE CC D9 9F 20 4C 45 47 41 4C 20 41 4E 44 20 |..... LEGAL AND | 000004B0: 52 45 41 53 4F 4E 41 42 4C 45 20 4B 45 59 53 13 |REASONABLE KEYS.| 000004C0: 22 00 F1 0C 9A 01 99 22 11 11 11 9F C4 52 49 56 |"......".....RIV| 000004D0: 45 20 4E 55 4D 42 45 52 20 28 38 20 2D 20 31 31 |E NUMBER (8 - 11| 000004E0: 29 20 05 22 44 52 22 9D 9D 9D 9D 22 3B 3A 85 44 |) ."DR"....";:.D| 000004F0: 52 00 2A 0D A4 01 99 22 11 9F CF 55 54 50 55 54 |R.*...."...UTPUT| 00000500: 20 54 4F 20 28 31 29 20 D3 43 52 45 45 4E 20 28 | TO (1) .CREEN (| 00000510: 32 29 20 D0 52 49 4E 54 45 52 20 05 22 4F 44 22 |2) .RINTER ."OD"| 00000520: 9D 9D 9D 9D 22 3B 3A 85 4F 44 00 63 0D AE 01 99 |....";:.OD.c....| 00000530: 22 11 9F C9 54 41 4C 49 43 53 20 28 31 29 20 C5 |"...TALICS (1) .| 00000540: 4E 41 42 4C 45 44 20 28 32 29 20 C4 49 53 41 42 |NABLED (2) .ISAB| 00000550: 4C 45 44 20 05 22 49 54 22 9D 9D 9D 9D 22 3B 3A |LED ."IT"....";:| 00000560: 85 49 54 00 93 0D B8 01 99 22 11 9F C9 54 41 4C |.IT......"...TAL| 00000570: 49 43 53 20 C5 53 43 41 50 45 20 43 4F 44 45 20 |ICS .SCAPE CODE | 00000580: CF CE 20 05 22 45 4E 22 9D 9D 9D 9D 9D 22 3B 3A |.. ."EN".....";:| 00000590: 85 45 4E 00 C4 0D C2 01 99 22 9F 11 C9 54 41 4C |.EN......"...TAL| 000005A0: 49 43 53 20 C5 53 43 41 50 45 20 43 4F 44 45 20 |ICS .SCAPE CODE | 000005B0: CF C6 C6 20 05 22 4F 46 22 9D 9D 9D 9D 9D 22 3B |... ."OF".....";| 000005C0: 3A 85 4F 46 00 F0 0D CC 01 99 22 11 20 20 20 20 |:.OF......". | 000005D0: 9F D0 52 45 53 53 20 05 D3 D0 C1 C3 C5 9F 20 54 |..RESS ....... T| 000005E0: 4F 20 53 45 45 20 54 48 45 20 43 4F 44 45 2E 22 |O SEE THE CODE."| 000005F0: 00 21 0E D6 01 99 22 11 20 20 20 20 D0 52 45 53 |.!....". .RES| 00000600: 53 20 05 D2 C5 D4 D5 D2 CE 9F 20 54 4F 20 52 45 |S ........ TO RE| 00000610: 54 55 52 4E 20 54 4F 20 54 48 45 20 4D 45 4E 55 |TURN TO THE MENU| 00000620: 22 00 40 0E E0 01 A1 41 24 3A 8B 41 24 B3 B1 22 |".@....A$:.A$.."| 00000630: 20 22 AF 41 24 B3 B1 C7 28 31 33 29 A7 34 38 30 | ".A$...(13).480| 00000640: 00 52 0E EA 01 8B 41 24 B2 C7 28 31 33 29 A7 31 |.R....A$..(13).1| 00000650: 33 30 00 5B 0E F4 01 99 22 93 22 00 7A 0E FE 01 |30.[....".".z...| 00000660: 97 32 31 34 2C 31 36 3A 99 3A 99 22 90 47 4F 54 |.214,16:.:.".GOT| 00000670: 4F 34 37 30 9F 13 11 11 11 22 00 8D 0E 08 02 97 |O470....."......| 00000680: 36 33 31 2C 31 33 3A 97 31 39 38 2C 31 00 9A 0E |631,13:.198,1...| 00000690: 12 02 9B 34 31 30 AB 34 35 30 00 A0 0E 1C 02 3A |...410.450.....:| 000006A0: 00 C2 0E 26 02 3A 8F 20 20 20 2A 2A 2A 20 54 48 |...&.:. *** TH| 000006B0: 45 20 4C 4F 41 44 53 54 41 52 20 57 41 59 20 2A |E LOADSTAR WAY *| 000006C0: 2A 2A 00 C8 0E 30 02 3A 00 D1 0E 3A 02 99 22 93 |**...0.:...:..".| 000006D0: 22 00 F7 0E 44 02 42 24 28 30 29 B2 22 B0 C0 C0 |"...D.B$(0)."...| 000006E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000006F0: C0 C0 C0 C0 C0 AE 22 00 1D 0F 4E 02 42 24 28 31 |......"...N.B$(1| 00000700: 29 B2 22 DD 20 20 20 20 20 20 20 20 20 20 20 20 |).". | 00000710: 20 20 20 20 20 20 20 20 20 20 20 DD 22 00 43 0F | .".C.| 00000720: 58 02 42 24 28 32 29 B2 22 AB C0 C0 C0 C0 C0 C0 |X.B$(2).".......| 00000730: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000740: C0 B3 22 00 69 0F 62 02 42 24 28 33 29 B2 22 AD |..".i.b.B$(3).".| 00000750: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000760: C0 C0 C0 C0 C0 C0 C0 BD 22 00 8D 0F 6C 02 44 24 |........"...l.D$| 00000770: 28 30 29 B2 22 20 20 20 20 20 C4 52 49 56 45 20 |(0)." .RIVE | 00000780: 4E 55 4D 42 45 52 20 20 20 20 20 20 22 00 B1 0F |NUMBER "...| 00000790: 76 02 44 24 28 31 29 B2 22 20 20 20 CF 55 54 50 |v.D$(1)." .UTP| 000007A0: 55 54 20 54 4F 20 20 20 20 20 20 20 20 20 20 20 |UT TO | 000007B0: 22 00 D5 0F 80 02 44 24 28 32 29 B2 22 20 20 20 |".....D$(2)." | 000007C0: C9 54 41 4C 49 43 53 20 20 20 20 20 20 20 20 20 |.TALICS | 000007D0: 20 20 20 20 22 00 F9 0F 8A 02 44 24 28 33 29 B2 | ".....D$(3).| 000007E0: 22 20 D0 52 49 4E 54 45 52 20 C3 4F 44 45 20 CF |" .RINTER .ODE .| 000007F0: CE 20 3D 20 20 20 20 20 22 00 1D 10 94 02 44 24 |. = ".....D$| 00000800: 28 34 29 B2 22 D0 52 49 4E 54 45 52 20 C3 4F 44 |(4).".RINTER .OD| 00000810: 45 20 CF C6 C6 20 3D 20 20 20 20 20 22 00 41 10 |E ... = ".A.| 00000820: 9E 02 44 24 28 35 29 B2 22 20 20 20 20 D2 45 54 |..D$(5)." .ET| 00000830: 55 52 4E 20 54 4F 20 CD 45 4E 55 20 20 20 20 20 |URN TO .ENU | 00000840: 22 00 57 10 A8 02 45 28 30 29 B2 32 37 3A 45 24 |".W...E(0).27:E$| 00000850: 28 30 29 B2 22 38 22 00 72 10 B2 02 45 28 31 29 |(0)."8".r...E(1)| 00000860: B2 32 32 3A 45 24 28 31 29 B2 22 D3 43 52 45 45 |.22:E$(1).".CREE| 00000870: 4E 22 00 8E 10 BC 02 45 28 32 29 B2 32 30 3A 45 |N".....E(2).20:E| 00000880: 24 28 32 29 B2 22 C5 4E 41 42 4C 45 44 22 00 A4 |$(2).".NABLED"..| 00000890: 10 C6 02 45 28 33 29 B2 32 38 3A 45 24 28 33 29 |...E(3).28:E$(3)| 000008A0: B2 45 4E 24 00 BA 10 D0 02 45 28 34 29 B2 32 38 |.EN$.....E(4).28| 000008B0: 3A 45 24 28 34 29 B2 4F 46 24 00 D5 10 DA 02 45 |:E$(4).OF$.....E| 000008C0: 28 35 29 B2 39 3A 45 24 28 35 29 B2 22 9E 22 AA |(5).9:E$(5).".".| 000008D0: 44 24 28 35 29 00 DD 10 E4 02 4E B2 38 00 06 11 |D$(5).....N.8...| 000008E0: EE 02 99 22 93 81 11 20 20 20 20 20 20 20 20 20 |..."... | 000008F0: 20 20 20 D4 48 45 20 96 CC CF C1 C4 D3 D4 C1 D2 | .HE .........| 00000900: 81 20 D7 41 59 22 00 1D 11 F8 02 99 22 13 11 11 |. .AY"......"...| 00000910: 11 9C 22 3A 99 A3 4E 29 42 24 28 30 29 00 28 11 |..":..N)B$(0).(.| 00000920: 02 03 81 49 B2 30 A4 34 00 36 11 0C 03 99 A3 4E |...I.0.4.6.....N| 00000930: 29 42 24 28 31 29 00 44 11 16 03 99 A3 4E 29 42 |)B$(1).D.....N)B| 00000940: 24 28 32 29 00 4A 11 20 03 82 00 58 11 2A 03 99 |$(2).J. ...X.*..| 00000950: A3 4E 29 42 24 28 31 29 00 66 11 34 03 99 A3 4E |.N)B$(1).f.4...N| 00000960: 29 42 24 28 33 29 00 73 11 3E 03 97 32 31 34 2C |)B$(3).s.>..214,| 00000970: 33 3A 99 00 7E 11 48 03 81 49 B2 30 A4 35 00 93 |3:..~.H..I.0.5..| 00000980: 11 52 03 99 22 9F 22 3A 99 A3 4E AA 31 29 44 24 |.R..".":..N.1)D$| 00000990: 28 49 29 00 A8 11 5C 03 99 22 91 05 22 A3 45 28 |(I)...\.."..".E(| 000009A0: 49 29 29 45 24 28 49 29 00 AE 11 66 03 82 00 E6 |I))E$(I)...f....| 000009B0: 11 70 03 97 32 31 34 2C 32 30 3A 99 3A 99 22 9F |.p..214,20:.:.".| 000009C0: 20 20 20 20 20 20 20 D5 53 45 20 05 C3 D2 D3 D2 | .SE .....| 000009D0: 20 D5 D0 2F C4 CF D7 CE 20 9F 41 4E 44 20 05 D2 | ../.... .AND ..| 000009E0: C5 D4 D5 D2 CE 22 00 EE 11 7A 03 59 B2 30 00 01 |....."...z.Y.0..| 000009F0: 12 84 03 97 32 31 34 2C 28 32 AC 59 29 AA 34 3A |....214,(2.Y).4:| 00000A00: 99 00 19 12 8E 03 99 A3 45 28 59 29 29 22 12 9E |........E(Y))"..| 00000A10: 22 45 24 28 59 29 22 91 22 00 40 12 98 03 A1 41 |"E$(Y)".".@....A| 00000A20: 24 3A 8B 41 24 B3 B1 22 91 22 AF 41 24 B3 B1 22 |$:.A$..".".A$.."| 00000A30: 11 22 AF 41 24 B3 B1 C7 28 31 33 29 A7 39 32 30 |.".A$...(13).920| 00000A40: 00 52 12 A2 03 8B 41 24 B2 C7 28 31 33 29 A7 39 |.R....A$..(13).9| 00000A50: 37 30 00 7D 12 AC 03 8B 41 24 B2 22 91 22 A7 99 |70.}....A$."."..| 00000A60: 22 05 22 A3 45 28 59 29 29 45 24 28 59 29 3A 59 |".".E(Y))E$(Y):Y| 00000A70: B2 59 AB 31 3A 8B 59 B3 30 A7 59 B2 35 00 A8 12 |.Y.1:.Y.0.Y.5...| 00000A80: B6 03 8B 41 24 B2 22 11 22 A7 99 22 05 22 A3 45 |...A$."."..".".E| 00000A90: 28 59 29 29 45 24 28 59 29 3A 59 B2 59 AA 31 3A |(Y))E$(Y):Y.Y.1:| 00000AA0: 8B 59 B1 35 A7 59 B2 30 00 B1 12 C0 03 89 39 30 |.Y.5.Y.0......90| 00000AB0: 30 00 E0 12 CA 03 99 A3 45 28 59 29 29 3B 3A 91 |0.......E(Y));:.| 00000AC0: 59 AA 31 89 39 38 30 2C 31 30 30 30 2C 31 30 34 |Y.1.980,1000,104| 00000AD0: 30 2C 31 30 38 30 2C 31 31 30 30 2C 31 31 32 30 |0,1080,1100,1120| 00000AE0: 00 09 13 D4 03 4C 39 25 B2 32 3A 99 22 20 20 9D |.....L9%.2:." .| 00000AF0: 9D 22 3B 3A 8D 31 31 36 30 3A 8B 51 39 B3 38 B0 |.";:.1160:.Q9.8.| 00000B00: 51 39 B1 31 31 A7 38 33 30 00 24 13 DE 03 44 52 |Q9.11.830.$...DR| 00000B10: 24 B2 51 39 24 3A 45 24 28 30 29 B2 44 52 24 3A |$.Q9$:E$(0).DR$:| 00000B20: 89 38 33 30 00 30 13 E8 03 4F 44 B2 33 AB 4F 44 |.830.0...OD.3.OD| 00000B30: 00 4A 13 F2 03 8B 4F 44 B2 31 A7 45 24 28 31 29 |.J....OD.1.E$(1)| 00000B40: B2 22 D3 43 52 45 45 4E 20 22 00 64 13 FC 03 8B |.".CREEN ".d....| 00000B50: 4F 44 B2 32 A7 45 24 28 31 29 B2 22 D0 52 49 4E |OD.2.E$(1).".RIN| 00000B60: 54 45 52 22 00 6D 13 06 04 89 39 30 30 00 79 13 |TER".m....900.y.| 00000B70: 10 04 49 54 B2 33 AB 49 54 00 94 13 1A 04 8B 49 |..IT.3.IT......I| 00000B80: 54 B2 31 A7 45 24 28 32 29 B2 22 C5 4E 41 42 4C |T.1.E$(2).".NABL| 00000B90: 45 44 20 22 00 AF 13 24 04 8B 49 54 B2 32 A7 45 |ED "...$..IT.2.E| 00000BA0: 24 28 32 29 B2 22 C4 49 53 41 42 4C 45 44 22 00 |$(2).".ISABLED".| 00000BB0: B8 13 2E 04 89 39 30 30 00 D3 13 38 04 4C 39 25 |.....900...8.L9%| 00000BC0: B2 33 3A 99 22 20 20 20 9D 9D 9D 22 3B 3A 8D 31 |.3:." ...";:.1| 00000BD0: 31 36 30 00 FD 13 3D 04 8B 51 39 B3 31 B0 51 39 |160...=..Q9.1.Q9| 00000BE0: B1 32 35 35 A7 99 A3 45 28 59 29 29 22 91 20 20 |.255...E(Y))". | 00000BF0: 20 20 9D 9D 9D 9D 22 3B 3A 89 39 30 30 00 18 14 | ....";:.900...| 00000C00: 42 04 45 4E 24 B2 51 39 24 3A 45 24 28 33 29 B2 |B.EN$.Q9$:E$(3).| 00000C10: 45 4E 24 3A 89 39 30 30 00 33 14 4C 04 4C 39 25 |EN$:.900.3.L.L9%| 00000C20: B2 33 3A 99 22 20 20 20 9D 9D 9D 22 3B 3A 8D 31 |.3:." ...";:.1| 00000C30: 31 36 30 00 5D 14 51 04 8B 51 39 B3 31 B0 51 39 |160.].Q..Q9.1.Q9| 00000C40: B1 32 35 35 A7 99 A3 45 28 59 29 29 22 91 20 20 |.255...E(Y))". | 00000C50: 20 20 9D 9D 9D 9D 22 3B 3A 89 39 30 30 00 78 14 | ....";:.900.x.| 00000C60: 56 04 4F 46 24 B2 51 39 24 3A 45 24 28 34 29 B2 |V.OF$.Q9$:E$(4).| 00000C70: 4F 46 24 3A 89 39 30 30 00 81 14 60 04 89 31 33 |OF$:.900...`..13| 00000C80: 30 00 87 14 6A 04 3A 00 A8 14 74 04 3A 8F 20 20 |0...j.:...t.:. | 00000C90: 20 2A 2A 2A 20 4F 55 52 20 47 45 54 20 52 4F 55 | *** OUR GET ROU| 00000CA0: 54 49 4E 45 20 2A 2A 2A 00 AE 14 7E 04 3A 00 C9 |TINE ***...~.:..| 00000CB0: 14 88 04 51 39 24 B2 22 22 3A 55 39 B2 35 33 32 |...Q9$."":U9.532| 00000CC0: 38 30 3A 97 31 39 38 2C 30 00 D1 14 92 04 A1 41 |80:.198,0......A| 00000CD0: 24 00 F7 14 9C 04 97 36 34 36 2C BB 28 31 29 AC |$......646,.(1).| 00000CE0: 31 35 AA 31 3A 99 22 A4 9D 22 3B 3A 8B 41 24 B2 |15.1:."..";:.A$.| 00000CF0: 22 22 A7 31 31 37 30 00 16 15 A6 04 8B 41 24 B2 |"".1170......A$.| 00000D00: C7 28 31 33 29 A7 99 22 20 22 3A 51 39 B2 C5 28 |.(13).." ":Q9..(| 00000D10: 51 39 24 29 3A 8E 00 47 15 B0 04 8B 28 41 24 B2 |Q9$):..G....(A$.| 00000D20: C7 28 32 30 29 AF C3 28 51 39 24 29 29 A7 51 39 |.(20)..(Q9$)).Q9| 00000D30: 24 B2 C8 28 51 39 24 2C C3 28 51 39 24 29 AB 31 |$..(Q9$,.(Q9$).1| 00000D40: 29 3A 89 31 32 34 30 00 76 15 BA 04 8B C3 28 51 |):.1240.v.....(Q| 00000D50: 39 24 29 B1 B2 4C 39 25 A7 54 39 25 B2 C2 28 55 |9$)..L9%.T9%..(U| 00000D60: 39 29 3A 97 55 39 2C 31 3A 97 55 39 2C 54 39 25 |9):.U9,1:.U9,T9%| 00000D70: 3A 89 31 31 37 30 00 A6 15 C4 04 8B 41 24 B3 22 |:.1170......A$."| 00000D80: 20 22 B0 28 41 24 B1 C7 28 31 32 37 29 AF 41 24 | ".(A$..(127).A$| 00000D90: B3 C7 28 31 36 30 29 29 B0 41 24 B2 C7 28 33 34 |..(160)).A$..(34| 00000DA0: 29 A7 31 31 37 30 00 B5 15 CE 04 51 39 24 B2 51 |).1170.....Q9$.Q| 00000DB0: 39 24 AA 41 24 00 C7 15 D8 04 99 22 05 22 41 24 |9$.A$......"."A$| 00000DC0: 3B 3A 89 31 31 37 30 00 CD 15 E2 04 3A 00 EF 15 |;:.1170.....:...| 00000DD0: EC 04 3A 8F 20 20 20 2A 2A 2A 20 51 55 49 54 20 |..:. *** QUIT | 00000DE0: 54 4F 20 4C 4F 41 44 53 54 41 52 20 2A 2A 2A 00 |TO LOADSTAR ***.| 00000DF0: F5 15 F6 04 3A 00 2E 16 00 05 9F 31 35 2C 38 2C |....:......15,8,| 00000E00: 31 35 2C 22 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E |15,"R0:HELLO CON| 00000E10: 4E 45 43 54 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 |NECT=HELLO CONNE| 00000E20: 43 54 22 3A 84 31 35 2C 45 52 3A A0 31 35 00 41 |CT":.15,ER:.15.A| 00000E30: 16 0A 05 8B 45 52 B3 B1 36 33 A7 99 22 93 22 3A |....ER..63..".":| 00000E40: 80 00 6F 16 14 05 99 22 93 90 11 11 11 4C 4F 41 |..o....".....LOA| 00000E50: 44 22 C7 28 33 34 29 22 48 45 4C 4C 4F 20 43 4F |D".(34)"HELLO CO| 00000E60: 4E 4E 45 43 54 22 C7 28 33 34 29 22 2C 38 22 00 |NNECT".(34)",8".| 00000E70: 7F 16 1E 05 99 22 11 11 11 11 52 55 4E 13 22 00 |....."....RUN.".| 00000E80: 9C 16 28 05 97 36 33 31 2C 31 33 3A 97 36 33 32 |..(..631,13:.632| 00000E90: 2C 31 33 3A 97 31 39 38 2C 32 3A 80 00 C7 16 10 |,13:.198,2:.....| 00000EA0: 27 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A 42 59 |'.15,8,15,"S0:BY| 00000EB0: 54 45 53 22 3A A0 31 35 3A 94 22 30 3A 42 59 54 |TES":.15:."0:BYT| 00000EC0: 45 53 22 2C 38 3A 80 00 00 00 |ES",8:.... |
.......53281,0:.53280,0:."...".$...:.J..
.:. * DEFAULT PARAMETERS/VARIABLES.P.(.:
.C.2.DR.8:DR$.D(DR).V.<.OD.1:OD$.D(OD)..
.F.IT.1:IT$.D(IT)...P.EN.52:EN$."52"...Z
.OF.53:OF$."53"...D.:.T.N.:. *** MAI
N MENU ***.Z.X.:......"... THE .Q&D
. WAY .VS. THE .LOADSTAR. WAY".<...."..
BASIC 2.0 HAS SOME COMMANDS THAT".D..
.." MAKE IT VERY EASY TO DO CERTAIN"...
.." THINGS IN A PROGRAM, SUCH AS ASK FOR
"......" PARAMETERS AND DISPLAY THEM. I
F YOU"......" ARE WRITING A PROGRAM THAT
ONLY YOU"......" WILL BE USING, THE Q&D
WAY IS BEST.".D.H.." HOWEVER, IF YOU AR
E WRITING FOR OTHER".Q.R.." USERS, YOU S
HOULD CONSIDER USING THE"......" FRIENDL
Y LOADSTAR METHOD.".C....". THESE TWO
EXAMPLES SHOW TWO WAYS OF"......" ASKIN
G FOR A DRIVE NUMBER, OUTPUT"......" DEV
ICE, ITALICS STATUS, AND THE ESCAPE".H..
.." CODE FOR ITALICS ON AND OFF ON YOUR"
.X...." PRINTER.......". .(.Q.)
UICK AND DIRTY WAY..."..". (.L.
)OADSTAR WAY.M.,..". (.R.)ETURN
TO LOADSTAR"...6..A$:.A$.."Q".A$.."L".A
$.."R".310...@..A$."R".1280...J..A$."Q".
390...T..FL.750.-.^.FL.1:.570.3.H.:.Q.R.
:. *** THE Q&D WAY ***.W.|.:......"..
. THE .QUICK. AND .DIRTY .WAY".A.
...214,22:.:." .PRESS .ONLY. LEGAL AND
REASONABLE KEYS."......"....DRIVE NUMBER
(8 - 11) ."DR"....";:.DR.*...."..OUTPUT
TO (1) SCREEN (2) PRINTER ."OD"....";:.
OD.C...."..ITALICS (1) ENABLED (2) DISAB
LED ."IT"....";:.IT......"..ITALICS ESCA
PE CODE ON ."EN".....";:.EN.D.B.."..ITAL
ICS ESCAPE CODE OFF ."OF".....";:.OF...L
..". .PRESS .SPACE. TO SEE THE CODE."
.!.V..". PRESS .RETURN. TO RETURN TO
THE MENU".@....A$:.A$.." ".A$..G(13).480
.R....A$.G(13).130.[....".".Z....214,16:
.:.".GOTO470....."......631,13:.198,1...
...410.450. ...:.B.&.:. *** THE LOADST
AR WAY ***.H.0.:.Q.:.."."...D.B$(0)."...
......................"...N.B$(1).".
.".C.X.B$(2).".......
..................".I.B.B$(3).".........
................"...L.D$(0)." DRIVE
NUMBER "...V.D$(1)." OUTPUT TO
".U...D$(2)." ITALICS
".....D$(3)." PRINTER CODE ON =
".....D$(4)."PRINTER CODE OFF = ".A.
..D$(5)." RETURN TO MENU ".W...E(
0).27:E$(0)."8".R...E(1).22:E$(1)."SCREE
N".....E(2).20:E$(2)."ENABLED"...F.E(3).
28:E$(3).EN$...P.E(4).28:E$(4).OF$.U.Z.E
(5).9:E$(5).".".D$(5).....N.8......"...
THE .LOADSTAR. WAY"......"...
..":..N)B$(0).(....I.0.4.6.....N)B$(1).D
.....N)B$(2).J. ...X.*...N)B$(1).F.4...N
)B$(3).S.>..214,3:..~.H..I.0.5...R..".":
..N.1)D$(I)...\.."..".E(I))E$(I)...F....
.P..214,20:.:.". USE .CRSR UP/DOWN
.AND .RETURN"...Z.Y.0......214,(2.Y).4:
........E(Y))".."E$(Y)".".@....A$:.A$.."
.".A$..".".A$..G(13).920.R....A$.G(13).9
70.}....A$."."..".".E(Y))E$(Y):Y.Y.1:.Y.
0.Y.5......A$."."..".".E(Y))E$(Y):Y.Y.1:
.Y.5.Y.0......900...J...E(Y));:.Y.1.980,
1000,1040,1080,1100,1120...T.L9%.2:." .
.";:.1160:.Q9.8.Q9.11.830.$...DR$.Q9$:E$
(0).DR$:.830.0...OD.3.OD.J....OD.1.E$(1)
."SCREEN ".D....OD.2.E$(1)."PRINTER".M..
..900.Y...IT.3.IT......IT.1.E$(2)."ENABL
ED "...$..IT.2.E$(2)."DISABLED"......900
.S.8.L9%.3:." ...";:.1160...=..Q9.1.Q9
.255...E(Y))". ....";:.900...B.EN$.Q9
$:E$(3).EN$:.900.3.L.L9%.3:." ...";:.1
160.].Q..Q9.1.Q9.255...E(Y))". ....";
:.900.X.V.OF$.Q9$:E$(4).OF$:.900...`..13
0...J.:...T.:. *** OUR GET ROUTINE ***
...~.:.I...Q9$."":U9.53280:.198,0.Q....A
$......646,.(1).15.1:."..";:.A$."".1170.
.....A$.G(13).." ":Q9.E(Q9$):..G....(A$.
G(20).C(Q9$)).Q9$.H(Q9$,C(Q9$).1):.1240.
V....C(Q9$)..L9%.T9%.B(U9):.U9,1:.U9,T9%
:.1170...D..A$." ".(A$.G(127).A$.G(160))
.A$.G(34).1170...N.Q9$.Q9$.A$.G.X.."."A$
;:.1170.M...:.....:. *** QUIT TO LOADS
TAR ***.....:......15,8,15,"R0:HELLO CON
NECT=HELLO CONNECT":.15,ER: 15.A....ER..
63..".":..O....".....LOAD"G(34)"HELLO CO
NNECT"G(34)",8"....."....RUN."...(..631
,13:.632,13:.198,2:..G..'.15,8,15,"S0:BY
TES": 15:."0:BYTES",8:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL