BASIC LES 8
FILE INFORMATION
FILENAME(S): BASIC LES 8
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-12-01 20:43:42
APPEARS ON: 1 disk(s)
FILE HASH
dad54ad4c969f0d481651f9e7c5a3d66ec764c8fd8e8dea89559c1dc1171fe68
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC | BASIC LES 8 | PRG | mace | 22 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 01 00 8F 20 42 41 53 49 43 20 4C 45 |....... BASIC LE| 00000010: 53 20 38 00 23 08 02 00 48 B2 C2 28 31 38 36 29 |S 8.#...H..(186)| 00000020: 3A 89 36 00 73 08 03 00 97 31 39 38 2C 30 3A 99 |:.6.s....198,0:.| 00000030: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 00000040: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................| 00000050: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000060: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 90 5B 54 4F 45 54 |...........[TOET| 00000070: 53 5D 13 00 84 08 04 00 A1 41 24 3A 8B 41 24 B2 |S].......A$:.A$.| 00000080: 22 22 A7 34 00 8A 08 05 00 8E 00 A7 08 06 00 99 |"".4............| 00000090: C7 28 31 34 29 3A 97 35 33 32 38 30 2C 35 3A 97 |.(14):.53280,5:.| 000000A0: 35 33 32 38 31 2C 35 00 D4 08 07 00 99 22 93 1F |53281,5......"..| 000000B0: 20 C2 45 48 41 4C 56 45 20 44 45 20 42 41 53 49 | .EHALVE DE BASI| 000000C0: 43 2D 57 4F 4F 52 44 45 4E 20 4B 55 4E 20 4A 45 |C-WOORDEN KUN JE| 000000D0: 20 4D 45 54 00 FF 08 08 00 99 22 20 4D 49 4A 20 | MET......" MIJ | 000000E0: 4E 4F 47 20 56 45 45 4C 20 4C 45 55 4B 45 20 44 |NOG VEEL LEUKE D| 000000F0: 49 4E 47 45 4E 20 55 49 54 48 41 4C 45 4E 2E 00 |INGEN UITHALEN..| 00000100: 28 09 09 00 99 22 11 20 C9 4B 20 47 45 45 46 20 |(....". .K GEEF | 00000110: 45 52 20 57 41 54 20 56 4F 4F 52 42 45 45 4C 44 |ER WAT VOORBEELD| 00000120: 45 4E 20 56 41 4E 20 3A 00 56 09 0A 00 99 22 11 |EN VAN :.V....".| 00000130: 11 90 20 31 2E 20 C9 4B 20 42 45 4E 20 45 45 4E |.. 1. .K BEN EEN| 00000140: 20 4B 4C 45 55 52 45 4E 2D 43 4F 4D 50 55 54 45 | KLEUREN-COMPUTE| 00000150: 52 2E 20 C4 55 53 00 81 09 0B 00 99 22 20 20 20 |R. .US......" | 00000160: 20 4D 4F 45 54 45 4E 20 4D 49 4A 4E 20 4B 4C 45 | MOETEN MIJN KLE| 00000170: 55 52 45 4E 20 54 45 20 47 45 42 52 55 49 4B 45 |UREN TE GEBRUIKE| 00000180: 4E 00 A2 09 0C 00 99 22 20 20 20 20 5A 49 4A 4E |N......" ZIJN| 00000190: 20 49 4E 20 45 45 4E 20 50 52 4F 47 52 41 4D 4D | IN EEN PROGRAMM| 000001A0: 41 2E 00 D1 09 0D 00 99 22 11 11 9E 20 32 2E 20 |A......."... 2. | 000001B0: C9 4B 20 4B 41 4E 20 4F 4F 4B 20 47 45 4C 55 49 |.K KAN OOK GELUI| 000001C0: 44 20 4D 41 4B 45 4E 2E 20 C4 41 54 20 4D 4F 45 |D MAKEN. .AT MOE| 000001D0: 54 00 FC 09 0E 00 99 22 20 20 20 20 44 55 53 20 |T......" DUS | 000001E0: 4F 4F 4B 20 49 4E 20 45 45 4E 20 50 52 4F 47 52 |OOK IN EEN PROGR| 000001F0: 41 4D 4D 41 20 4B 55 4E 4E 45 4E 2E 00 4E 0A 0F |AMMA KUNNEN..N..| 00000200: 00 99 22 11 11 11 1C 20 D6 41 4E 20 44 45 5A 45 |..".... .AN DEZE| 00000210: 20 54 57 45 45 20 47 45 45 46 20 49 4B 20 45 45 | TWEE GEEF IK EE| 00000220: 4E 20 4B 4C 45 49 4E 20 20 20 20 20 20 20 20 20 |N KLEIN | 00000230: 56 4F 4F 52 42 45 45 4C 44 20 49 4E 20 44 45 5A |VOORBEELD IN DEZ| 00000240: 45 20 4C 41 41 54 53 54 45 20 4C 45 53 2E 00 55 |E LAATSTE LES..U| 00000250: 0A 10 00 8D 33 00 9D 0A 11 00 99 22 93 1F 20 C9 |....3......".. .| 00000260: 4B 20 4B 41 4E 20 44 45 20 4B 4C 45 55 52 20 56 |K KAN DE KLEUR V| 00000270: 41 4E 20 48 45 54 20 53 43 48 45 52 4D 20 20 20 |AN HET SCHERM | 00000280: 20 20 20 20 20 20 20 45 45 4E 56 4F 55 44 49 47 | EENVOUDIG| 00000290: 20 56 45 52 41 4E 44 45 52 45 4E 20 3A 00 C1 0A | VERANDEREN :...| 000002A0: 12 00 99 22 11 90 20 D0 CF CB C5 20 35 33 32 38 |...".. .... 5328| 000002B0: 31 2C D8 20 5A 45 54 20 44 45 20 4B 4C 45 55 52 |1,. ZET DE KLEUR| 000002C0: 2E 00 D9 0A 13 00 99 22 1F 20 11 11 CB 49 4A 4B |.......". ...IJK| 000002D0: 20 4D 41 41 52 20 3A 11 11 00 E5 0A 14 00 81 49 | MAAR :........I| 000002E0: B2 30 A4 31 35 00 F7 0A 15 00 99 22 91 20 D8 20 |.0.15......". . | 000002F0: 49 53 20 4E 55 22 49 00 04 0B 16 00 97 35 33 32 |IS NU"I......532| 00000300: 38 31 2C 49 00 16 0B 17 00 81 4A B2 31 A4 31 30 |81,I......J.1.10| 00000310: 30 30 3A 82 3A 82 00 42 0B 18 00 99 22 11 11 11 |00:.:..B...."...| 00000320: 20 C5 4E 20 4F 4F 4B 20 44 45 20 52 41 4E 44 20 | .N OOK DE RAND | 00000330: 4D 45 54 20 D0 CF CB C5 20 35 33 32 38 30 2C D8 |MET .... 53280,.| 00000340: 11 11 00 4E 0B 19 00 81 49 B2 30 A4 31 35 00 60 |...N....I.0.15.`| 00000350: 0B 1A 00 99 22 91 20 D8 20 49 53 20 4E 55 22 49 |....". . IS NU"I| 00000360: 00 6D 0B 1B 00 97 35 33 32 38 30 2C 49 00 7F 0B |.m....53280,I...| 00000370: 1C 00 81 4A B2 31 A4 31 30 30 30 3A 82 3A 82 00 |...J.1.1000:.:..| 00000380: 86 0B 1D 00 8D 33 00 9C 0B 1E 00 97 35 33 32 38 |.....3......5328| 00000390: 30 2C 36 3A 97 35 33 32 38 31 2C 36 00 BC 0B 1F |0,6:.53281,6....| 000003A0: 00 99 22 93 9A 20 C8 49 45 52 42 49 4A 20 47 45 |..".. .IERBIJ GE| 000003B0: 4C 44 54 20 56 4F 4F 52 20 D8 20 3A 00 DE 0B 20 |LDT VOOR . :... | 000003C0: 00 99 22 11 11 9A 20 20 30 20 3D 20 12 90 20 20 |.."... 0 = .. | 000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 FE | ...| 000003E0: 0B 21 00 99 22 9A 20 A0 31 20 3D 20 12 05 20 20 |.!..". .1 = .. | 000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 1E | ...| 00000400: 0C 22 00 99 22 9A 20 20 32 20 3D 20 12 1C 20 20 |."..". 2 = .. | 00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 3E | ..>| 00000420: 0C 23 00 99 22 9A 20 20 33 20 3D 20 12 9F 20 20 |.#..". 3 = .. | 00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 5E | ..^| 00000440: 0C 24 00 99 22 9A 20 20 34 20 3D 20 12 9C 20 20 |.$..". 4 = .. | 00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 7E | ..~| 00000460: 0C 25 00 99 22 9A 20 20 35 20 3D 20 12 1E 20 20 |.%..". 5 = .. | 00000470: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 9E | ...| 00000480: 0C 26 00 99 22 9A 20 20 36 20 3D 20 12 1F 20 20 |.&..". 6 = .. | 00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 BE | ...| 000004A0: 0C 27 00 99 22 9A 20 20 37 20 3D 20 12 9E 20 20 |.'..". 7 = .. | 000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 DE | ...| 000004C0: 0C 28 00 99 22 9A 20 20 38 20 3D 20 12 81 20 20 |.(..". 8 = .. | 000004D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 FE | ...| 000004E0: 0C 29 00 99 22 9A 20 20 39 20 3D 20 12 95 20 20 |.)..". 9 = .. | 000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 1E | ...| 00000500: 0D 2A 00 99 22 9A 20 31 30 20 3D 20 12 96 20 20 |.*..". 10 = .. | 00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 3E | ..>| 00000520: 0D 2B 00 99 22 9A 20 31 31 20 3D 20 12 97 20 20 |.+..". 11 = .. | 00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 5E | ..^| 00000540: 0D 2C 00 99 22 9A 20 31 32 20 3D 20 12 98 20 20 |.,..". 12 = .. | 00000550: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 7E | ..~| 00000560: 0D 2D 00 99 22 9A 20 31 33 20 3D 20 12 99 20 20 |.-..". 13 = .. | 00000570: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 9E | ...| 00000580: 0D 2E 00 99 22 9A 20 31 34 20 3D 20 12 9A 20 20 |....". 14 = .. | 00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 BE | ...| 000005A0: 0D 2F 00 99 22 9A 20 31 35 20 3D 20 12 9B 20 20 |./..". 15 = .. | 000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 00 C5 | ...| 000005C0: 0D 30 00 8D 33 00 F4 0D 31 00 99 22 93 90 20 CA |.0..3...1..".. .| 000005D0: 45 20 4B 55 4E 54 20 5A 45 4C 46 20 42 49 4A 20 |E KUNT ZELF BIJ | 000005E0: 48 45 54 20 49 4E 54 49 4B 4B 45 4E 20 56 41 4E |HET INTIKKEN VAN| 000005F0: 20 45 45 4E 00 1F 0E 32 00 99 22 20 50 52 4F 47 | EEN...2.." PROG| 00000600: 52 41 4D 4D 41 20 44 49 45 20 4B 4C 45 55 52 45 |RAMMA DIE KLEURE| 00000610: 4E 20 47 45 42 52 55 49 4B 45 4E 2E 20 CA 45 00 |N GEBRUIKEN. .E.| 00000620: 4A 0E 33 00 99 22 20 4B 52 49 4A 47 54 20 44 45 |J.3.." KRIJGT DE| 00000630: 20 45 45 52 53 54 45 20 38 20 4B 4C 45 55 52 45 | EERSTE 8 KLEURE| 00000640: 4E 20 44 4F 4F 52 20 48 45 54 00 6A 0E 34 00 99 |N DOOR HET.j.4..| 00000650: 22 20 54 45 47 45 4C 49 4A 4B 20 49 4E 44 52 55 |" TEGELIJK INDRU| 00000660: 4B 4B 45 4E 20 56 41 4E 20 3A 00 87 0E 35 00 99 |KKEN VAN :...5..| 00000670: 22 11 05 20 C3 D4 D2 CC 20 45 4E 20 45 45 4E 20 |".. .... EN EEN | 00000680: 43 49 4A 46 45 52 2E 00 C8 0E 36 00 99 22 90 11 |CIJFER....6.."..| 00000690: 20 C4 45 20 54 57 45 45 44 45 20 53 45 52 49 45 | .E TWEEDE SERIE| 000006A0: 20 44 4F 4F 52 20 48 45 54 20 54 45 47 45 4C 49 | DOOR HET TEGELI| 000006B0: 4A 4B 20 20 20 20 20 20 20 49 4E 44 52 55 4B 4B |JK INDRUKK| 000006C0: 45 4E 20 56 41 4E 20 3A 00 EA 0E 37 00 99 22 11 |EN VAN :...7..".| 000006D0: 05 20 C3 CF CD CD CF C4 CF D2 C5 20 45 4E 20 45 |. ......... EN E| 000006E0: 45 4E 20 43 49 4A 46 45 52 2E 00 F1 0E 38 00 8D |EN CIJFER....8..| 000006F0: 33 00 0A 0F 39 00 99 22 93 90 C7 C5 CC D5 C9 C4 |3...9.."........| 00000700: 20 21 21 21 21 21 21 21 21 21 00 32 0F 3A 00 99 | !!!!!!!!!.2.:..| 00000710: 22 11 9A 20 C7 45 4C 55 49 44 20 4F 50 20 44 45 |".. .ELUID OP DE| 00000720: 5A 45 20 43 4F 4D 50 55 54 45 52 20 49 53 20 45 |ZE COMPUTER IS E| 00000730: 52 47 00 60 0F 3B 00 99 22 20 49 4E 47 45 57 49 |RG.`.;.." INGEWI| 00000740: 4B 4B 45 4C 44 2E 20 D3 4C 41 20 44 41 41 52 56 |KKELD. .LA DAARV| 00000750: 4F 4F 52 20 44 45 20 52 45 46 45 52 45 4E 43 45 |OOR DE REFERENCE| 00000760: 00 89 0F 3C 00 99 22 20 47 55 49 44 45 20 4F 50 |...<.." GUIDE OP| 00000770: 20 4E 41 2E 20 CE 55 20 53 4C 45 43 48 54 53 20 | NA. .U SLECHTS | 00000780: 45 45 4E 20 4B 4C 45 49 4E 00 9F 0F 3D 00 99 22 |EEN KLEIN...=.."| 00000790: 20 56 4F 4F 52 42 45 45 4C 44 2E 22 3A 8D 33 00 | VOORBEELD.":.3.| 000007A0: E2 0F 3E 00 99 22 93 31 30 30 20 53 49 44 3D 35 |..>..".100 SID=5| 000007B0: 34 32 37 32 20 20 20 20 20 20 20 20 20 20 3A 52 |4272 :R| 000007C0: 45 4D 20 41 44 52 45 53 20 56 41 4E 20 20 20 20 |EM ADRES VAN | 000007D0: 20 20 20 44 45 20 47 45 4C 55 49 44 53 2D 43 48 | DE GELUIDS-CH| 000007E0: 49 50 00 0D 10 3F 00 99 22 31 31 30 20 46 4F 52 |IP...?.."110 FOR| 000007F0: 20 49 3D 30 54 4F 32 38 20 20 20 20 20 20 20 20 | I=0TO28 | 00000800: 3A 52 45 4D 20 5A 45 54 20 41 4C 4C 45 00 38 10 |:REM ZET ALLE.8.| 00000810: 40 00 99 22 31 32 30 20 50 4F 4B 45 20 53 49 44 |@.."120 POKE SID| 00000820: 2B 49 2C 30 20 20 20 20 20 20 20 3A 52 45 4D 20 |+I,0 :REM | 00000830: 41 44 52 45 53 53 45 4E 00 65 10 41 00 99 22 31 |ADRESSEN.e.A.."1| 00000840: 33 30 20 4E 45 58 54 20 20 20 20 20 20 20 20 20 |30 NEXT | 00000850: 20 20 20 20 20 20 3A 52 45 4D 20 4F 50 20 30 20 | :REM OP 0 | 00000860: 28 55 49 54 29 00 A6 10 42 00 99 22 31 34 30 20 |(UIT)...B.."140 | 00000870: 50 4F 4B 45 20 53 49 44 2B 32 34 2C 56 20 20 20 |POKE SID+24,V | 00000880: 20 20 20 3A 52 45 4D 20 56 3D 56 4F 4C 55 4D 45 | :REM V=VOLUME| 00000890: 20 20 20 20 20 20 20 20 54 55 53 53 45 4E 20 30 | TUSSEN 0| 000008A0: 20 45 4E 20 31 35 00 D3 10 43 00 99 22 31 35 30 | EN 15...C.."150| 000008B0: 20 50 4F 4B 45 20 53 49 44 2B 31 2C 58 20 20 20 | POKE SID+1,X | 000008C0: 20 20 20 20 3A 52 45 4D 20 46 52 45 51 55 45 4E | :REM FREQUEN| 000008D0: 54 49 45 00 FD 10 44 00 99 22 31 36 30 20 50 4F |TIE...D.."160 PO| 000008E0: 4B 45 20 53 49 44 2B 35 2C 41 2A 32 36 2B 42 20 |KE SID+5,A*26+B | 000008F0: 20 3A 52 45 4D 20 41 20 49 53 20 44 45 00 4A 11 | :REM A IS DE.J.| 00000900: 45 00 99 22 20 20 20 20 54 49 4A 44 20 56 4F 4F |E.." TIJD VOO| 00000910: 52 44 41 54 20 4D 41 58 49 4D 55 4D 20 56 4F 4C |RDAT MAXIMUM VOL| 00000920: 55 4D 45 20 57 4F 52 44 54 20 20 20 20 20 20 20 |UME WORDT | 00000930: 42 45 52 45 49 4B 54 20 30 3D 53 4E 45 4C 20 31 |BEREIKT 0=SNEL 1| 00000940: 35 3D 4C 41 4E 47 5A 41 41 4D 00 8F 11 46 00 99 |5=LANGZAAM...F..| 00000950: 22 20 20 20 20 42 20 49 53 20 44 45 20 54 49 4A |" B IS DE TIJ| 00000960: 44 20 56 4F 4F 52 44 41 54 20 48 45 54 20 41 41 |D VOORDAT HET AA| 00000970: 4E 48 4F 55 44 2D 20 20 20 20 20 20 20 56 4F 4C |NHOUD- VOL| 00000980: 55 4D 45 20 49 53 20 42 45 52 45 49 4B 54 2E 00 |UME IS BEREIKT..| 00000990: BA 11 47 00 99 22 31 37 30 20 50 4F 4B 45 20 53 |..G.."170 POKE S| 000009A0: 49 44 2B 36 2C 43 2A 31 36 2B 44 20 20 3A 52 45 |ID+6,C*16+D :RE| 000009B0: 4D 20 43 20 49 53 20 48 45 54 00 E1 11 48 00 99 |M C IS HET...H..| 000009C0: 22 20 20 20 20 56 4F 4C 55 4D 45 20 54 49 4A 44 |" VOLUME TIJD| 000009D0: 45 4E 53 20 48 45 54 20 41 41 4E 48 4F 55 44 45 |ENS HET AANHOUDE| 000009E0: 4E 00 0D 12 49 00 99 22 20 20 20 20 44 20 49 53 |N...I.." D IS| 000009F0: 20 44 45 20 54 49 4A 44 20 44 41 54 20 44 45 20 | DE TIJD DAT DE | 00000A00: 54 4F 4F 4E 20 41 46 53 54 45 52 46 54 00 38 12 |TOON AFSTERFT.8.| 00000A10: 4A 00 99 22 31 38 30 20 50 4F 4B 45 20 53 49 44 |J.."180 POKE SID| 00000A20: 2B 34 2C 31 37 20 20 20 20 20 20 3A 52 45 4D 20 |+4,17 :REM | 00000A30: 54 4F 4F 4E 20 41 41 4E 00 63 12 4B 00 99 22 31 |TOON AAN.c.K.."1| 00000A40: 39 30 20 46 4F 52 49 3D 31 54 4F 31 30 30 3A 4E |90 FORI=1TO100:N| 00000A50: 45 58 54 20 20 20 3A 52 45 4D 20 57 41 43 48 54 |EXT :REM WACHT| 00000A60: 4C 55 53 00 8E 12 4C 00 99 22 32 30 30 20 50 4F |LUS...L.."200 PO| 00000A70: 4B 45 20 53 49 44 2B 34 2C 31 36 20 20 20 20 20 |KE SID+4,16 | 00000A80: 20 3A 52 45 4D 20 54 4F 4F 4E 20 55 49 54 00 AA | :REM TOON UIT..| 00000A90: 12 4D 00 99 22 11 11 90 20 C5 45 4E 20 44 45 4D |.M.."... .EN DEM| 00000AA0: 4F 20 2E 2E 2E 2E 2E 2E 2E 2E 00 E4 12 4E 00 53 |O ...........N.S| 00000AB0: 49 44 B2 35 34 32 37 32 3A 81 49 B2 30 A4 32 38 |ID.54272:.I.0.28| 00000AC0: 3A 97 53 49 44 AA 49 2C 30 3A 82 3A 97 53 49 44 |:.SID.I,0:.:.SID| 00000AD0: AA 31 2C 32 30 3A 97 53 49 44 AA 36 2C 31 35 AC |.1,20:.SID.6,15.| 00000AE0: 31 36 AA 33 00 F3 12 4F 00 97 53 49 44 AA 32 34 |16.3...O..SID.24| 00000AF0: 2C 31 35 00 17 13 50 00 97 53 49 44 AA 34 2C 31 |,15...P..SID.4,1| 00000B00: 37 3A 81 49 B2 31 A4 32 35 30 30 3A 82 3A 97 53 |7:.I.1.2500:.:.S| 00000B10: 49 44 AA 34 2C 31 36 00 1E 13 51 00 8D 33 00 67 |ID.4,16...Q..3.g| 00000B20: 13 52 00 99 22 13 11 11 11 11 11 11 11 11 11 11 |.R.."...........| 00000B30: 11 11 11 11 11 11 11 11 11 11 90 20 D6 45 52 41 |........... .ERA| 00000B40: 4E 44 45 52 20 31 39 30 20 3A 22 3A 99 22 20 20 |NDER 190 :":." | 00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B60: 20 20 20 20 20 20 22 00 A0 13 53 00 99 22 11 31 | "...S..".1| 00000B70: 39 30 20 46 4F 52 49 3D 30 54 4F 32 35 35 3A 50 |90 FORI=0TO255:P| 00000B80: 4F 4B 45 53 49 44 2B 31 2C 49 3A 4E 45 58 54 22 |OKESID+1,I:NEXT"| 00000B90: 3A 99 2C 2C 2C 22 20 20 20 20 20 20 20 20 20 13 |:.,,," .| 00000BA0: 00 AE 13 54 00 97 53 49 44 AA 34 2C 31 37 00 DA |...T..SID.4,17..| 00000BB0: 13 55 00 81 49 B2 30 A4 32 35 35 3A 97 53 49 44 |.U..I.0.255:.SID| 00000BC0: AA 31 2C 49 3A 81 4A B2 31 A4 35 30 3A 82 3A 82 |.1,I:.J.1.50:.:.| 00000BD0: 3A 97 53 49 44 AA 34 2C 31 36 00 E1 13 56 00 8D |:.SID.4,16...V..| 00000BE0: 33 00 EF 13 57 00 97 53 49 44 AA 34 2C 31 37 00 |3...W..SID.4,17.| 00000BF0: 23 14 58 00 99 22 13 11 11 11 11 11 11 11 11 11 |#.X.."..........| 00000C00: 11 11 11 11 11 11 11 11 11 11 11 90 20 D6 45 52 |............ .ER| 00000C10: 41 4E 44 45 52 20 45 4E 20 56 4F 45 47 20 54 4F |ANDER EN VOEG TO| 00000C20: 45 20 3A 00 41 14 59 00 99 22 05 31 39 30 20 46 |E :.A.Y..".190 F| 00000C30: 4F 52 49 3D 31 30 30 54 4F 32 30 30 53 54 45 50 |ORI=100TO200STEP| 00000C40: 35 00 56 14 5A 00 99 22 31 39 31 20 46 4F 52 4A |5.V.Z.."191 FORJ| 00000C50: 3D 30 54 4F 33 30 00 83 14 5B 00 99 22 31 39 32 |=0TO30...[.."192| 00000C60: 20 50 4F 4B 45 53 49 44 2B 31 2C 49 2B 4A 20 20 | POKESID+1,I+J | 00000C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000C80: 20 20 22 00 B2 14 5C 00 99 22 31 39 33 20 4E 45 | "...\.."193 NE| 00000C90: 58 54 4A 3A 4E 45 58 54 49 20 20 20 20 20 20 20 |XTJ:NEXTI | 00000CA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000CB0: 20 13 00 C3 14 5D 00 81 49 B2 31 30 30 A4 32 30 | ....]..I.100.20| 00000CC0: 30 A9 35 00 CF 14 5E 00 81 4A B2 30 A4 33 30 00 |0.5...^..J.0.30.| 00000CD0: DE 14 5F 00 97 53 49 44 AA 31 2C 49 AA 4A 00 FB |.._..SID.1,I.J..| 00000CE0: 14 60 00 82 3A 82 3A 97 53 49 44 AA 34 2C 31 36 |.`..:.:.SID.4,16| 00000CF0: 3A 97 53 49 44 AA 31 2C 32 35 35 00 0C 15 61 00 |:.SID.1,255...a.| 00000D00: 8D 33 3A 97 53 49 44 AA 32 34 2C 30 00 22 15 62 |.3:.SID.24,0.".b| 00000D10: 00 97 35 33 32 38 30 2C 32 3A 97 35 33 32 38 31 |..53280,2:.53281| 00000D20: 2C 32 00 4D 15 63 00 99 22 93 05 20 C1 4C 53 20 |,2.M.c..".. .LS | 00000D30: 4C 41 41 54 53 54 45 20 50 52 4F 47 52 41 4D 4D |LAATSTE PROGRAMM| 00000D40: 41 20 4B 4F 4D 54 20 4E 55 20 45 45 4E 00 6C 15 |A KOMT NU EEN.l.| 00000D50: 64 00 99 22 20 47 52 41 46 49 53 43 48 20 45 4E |d.." GRAFISCH EN| 00000D60: 20 47 45 4C 55 49 44 44 45 4D 4F 2E 00 84 15 65 | GELUIDDEMO....e| 00000D70: 00 93 22 42 41 53 49 43 20 4C 45 53 20 44 45 4D |.."BASIC LES DEM| 00000D80: 4F 22 2C 48 00 00 00 |O",H... |
....... BASIC LES 8.#...H.B(186):.6.S...
.198,0:."...............................
...........................[TOETS]......
.A$:.A$."".4............G(14):.53280,5:.
53281,5.T....".. BEHALVE DE BASIC-WOORDE
N KUN JE MET......" MIJ NOG VEEL LEUKE D
INGEN UITHALEN..(....". IK GEEF ER WAT V
OORBEELDEN VAN :.V...."... 1. IK BEN EEN
KLEUREN-COMPUTER. DUS......" MOETEN
MIJN KLEUREN TE GEBRUIKEN......" ZIJN
IN EEN PROGRAMMA..Q...."... 2. IK KAN O
OK GELUID MAKEN. DAT MOET......" DUS
OOK IN EEN PROGRAMMA KUNNEN..N...."....
VAN DEZE TWEE GEEF IK EEN KLEIN
VOORBEELD IN DEZE LAATSTE LES..U....3...
...".. IK KAN DE KLEUR VAN HET SCHERM
EENVOUDIG VERANDEREN :.A....".. P
OKE 53281,X ZET DE KLEUR..Y....". ..KIJK
MAAR :........I.0.15......". X IS NU"I.
.....53281,I......J.1.1000:.:..B...."...
EN OOK DE RAND MET POKE 53280,X...N....
I.0.15.`....". X IS NU"I.M....53280,I..
...J.1.1000:.:.......3......53280,6:.532
81,6......".. HIERBIJ GELDT VOOR X :...
.."... 0 = .. ....!..".
1 = .. ...."..". 2 = ..
..>.#..". 3 = ..
..^.$..". 4 = .. ..~
.%..". 5 = .. ....&..".
6 = .. ....'..". 7 = ..
....(..". 8 = ..
....)..". 9 = .. ...
.*..". 10 = .. ..>.+..". 1
1 = .. ..^.,..". 12 = ..
..~.-..". 13 = ..
.......". 14 = .. ...
./..". 15 = .. ..E.0..3...
1..".. JE KUNT ZELF BIJ HET INTIKKEN VAN
EEN...2.." PROGRAMMA DIE KLEUREN GEBRUI
KEN. JE.J.3.." KRIJGT DE EERSTE 8 KLEURE
N DOOR HET.J.4.." TEGELIJK INDRUKKEN VAN
:...5..".. CTRL EN EEN CIJFER..H.6.."..
DE TWEEDE SERIE DOOR HET TEGELIJK
INDRUKKEN VAN :...7..".. COMMODORE EN E
EN CIJFER....8..3...9.."..GELUID !!!!!!!
!!.2.:..".. GELUID OP DEZE COMPUTER IS E
RG.`.;.." INGEWIKKELD. SLA DAARVOOR DE R
EFERENCE...<.." GUIDE OP NA. NU SLECHTS
EEN KLEIN...=.." VOORBEELD.":.3...>..".1
00 SID=54272 :REM ADRES VAN
DE GELUIDS-CHIP...?.."110 FOR I=0TO28
:REM ZET ALLE.8.@.."120 POKE SID
+I,0 :REM ADRESSEN.E.A.."130 NEXT
:REM OP 0 (UIT)...B.."140
POKE SID+24,V :REM V=VOLUME
TUSSEN 0 EN 15.S.C.."150 POKE SID+1,X
:REM FREQUENTIE...D.."160 POKE SID+5
,A*26+B :REM A IS DE.J.E.." TIJD VOO
RDAT MAXIMUM VOLUME WORDT BEREIKT
0=SNEL 15=LANGZAAM...F.." B IS DE TIJ
D VOORDAT HET AANHOUD- VOLUME IS B
EREIKT....G.."170 POKE SID+6,C*16+D :RE
M C IS HET...H.." VOLUME TIJDENS HET
AANHOUDEN...I.." D IS DE TIJD DAT DE
TOON AFSTERFT.8.J.."180 POKE SID+4,17
:REM TOON AAN.C.K.."190 FORI=1TO100:N
EXT :REM WACHTLUS...L.."200 POKE SID+4
,16 :REM TOON UIT...M.."... EEN DEM
O ...........N.SID.54272:.I.0.28:.SID.I,
0:.:.SID.1,20:.SID.6,15.16.3...O..SID.24
,15...P..SID.4,17:.I.1.2500:.:.SID.4,16.
..Q..3.G.R.."...................... VERA
NDER 190 :":." ".
.S..".190 FORI=0TO255:POKESID+1,I:NEXT"
:.,,," ....T..SID.4,17.Z.U..I.0.
255:.SID.1,I:.J.1.50:.:.:.SID.4,16...V..
3...W..SID.4,17.#.X.."..................
.... VERANDER EN VOEG TOE :.A.Y..".190 F
ORI=100TO200STEP5.V.Z.."191 FORJ=0TO30..
.[.."192 POKESID+1,I+J
"...\.."193 NEXTJ:NEXTI
..C.]..I.100.200.5.O.^..J.0.30.
.._..SID.1,I.J...`..:.:.SID.4,16:.SID.1,
255...A..3:.SID.24,0.".B..53280,2:.53281
,2.M.C..".. ALS LAATSTE PROGRAMMA KOMT N
U EEN.L.D.." GRAFISCH EN GELUIDDEMO....E
.."BASIC LES DEMO",H...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL