BASIC 8
FILE INFORMATION
FILENAME(S): BASIC 8
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 21:07:01
APPEARS ON: 1 disk(s)
FILE HASH
bb1dd0c986b156dd448d55d314120d51eb7b51f003034e4b31c96a43e8e31cee
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HBMD OSS 01 | BASIC 8 | PRG | DuncanTwain | 32 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3E 08 32 00 99 22 93 2A 2A 2A 2A 2A 2A 2A |..>.2..".*******| 00000010: 2A 20 42 41 53 49 43 20 43 55 52 53 55 53 20 2A |* BASIC CURSUS *| 00000020: 2A 2A 20 4C 45 53 20 38 20 2A 2A 2A 2A 2A 2A 2A |** LES 8 *******| 00000030: 2A 22 3A 81 49 B2 31 A4 35 30 30 30 3A 82 00 5B |*":.I.1.5000:..[| 00000040: 08 64 00 99 C7 28 31 34 29 3A 97 35 33 32 38 30 |.d...(14):.53280| 00000050: 2C 35 3A 97 35 33 32 38 31 2C 35 00 88 08 6E 00 |,5:.53281,5...n.| 00000060: 99 22 93 1F 20 C2 45 48 41 4C 56 45 20 44 45 20 |.".. .EHALVE DE | 00000070: 42 41 53 49 43 2D 57 4F 4F 52 44 45 4E 20 4B 55 |BASIC-WOORDEN KU| 00000080: 4E 20 4A 45 20 4D 45 54 00 B3 08 78 00 99 22 20 |N JE MET...x.." | 00000090: 4D 49 4A 20 4E 4F 47 20 56 45 45 4C 20 4C 45 55 |MIJ NOG VEEL LEU| 000000A0: 4B 45 20 44 49 4E 47 45 4E 20 55 49 54 48 41 4C |KE DINGEN UITHAL| 000000B0: 45 4E 2E 00 DC 08 82 00 99 22 11 20 C9 4B 20 47 |EN.......". .K G| 000000C0: 45 45 46 20 45 52 20 57 41 54 20 56 4F 4F 52 42 |EEF ER WAT VOORB| 000000D0: 45 45 4C 44 45 4E 20 56 41 4E 20 3A 00 0A 09 8C |EELDEN VAN :....| 000000E0: 00 99 22 11 11 90 20 31 2E 20 C9 4B 20 42 45 4E |.."... 1. .K BEN| 000000F0: 20 45 45 4E 20 4B 4C 45 55 52 45 4E 2D 43 4F 4D | EEN KLEUREN-COM| 00000100: 50 55 54 45 52 2E 20 C4 55 53 00 35 09 96 00 99 |PUTER. .US.5....| 00000110: 22 20 20 20 20 4D 4F 45 54 45 4E 20 4D 49 4A 4E |" MOETEN MIJN| 00000120: 20 4B 4C 45 55 52 45 4E 20 54 45 20 47 45 42 52 | KLEUREN TE GEBR| 00000130: 55 49 4B 45 4E 00 56 09 A0 00 99 22 20 20 20 20 |UIKEN.V...." | 00000140: 5A 49 4A 4E 20 49 4E 20 45 45 4E 20 50 52 4F 47 |ZIJN IN EEN PROG| 00000150: 52 41 4D 4D 41 2E 00 85 09 AA 00 99 22 11 11 9E |RAMMA......."...| 00000160: 20 32 2E 20 C9 4B 20 4B 41 4E 20 4F 4F 4B 20 47 | 2. .K KAN OOK G| 00000170: 45 4C 55 49 44 20 4D 41 4B 45 4E 2E 20 C4 41 54 |ELUID MAKEN. .AT| 00000180: 20 4D 4F 45 54 00 B0 09 B4 00 99 22 20 20 20 20 | MOET......" | 00000190: 44 55 53 20 4F 4F 4B 20 49 4E 20 45 45 4E 20 50 |DUS OOK IN EEN P| 000001A0: 52 4F 47 52 41 4D 4D 41 20 4B 55 4E 4E 45 4E 2E |ROGRAMMA KUNNEN.| 000001B0: 00 02 0A D2 00 99 22 11 11 11 1C 20 D6 41 4E 20 |......".... .AN | 000001C0: 44 45 5A 45 20 54 57 45 45 20 47 45 45 46 20 49 |DEZE TWEE GEEF I| 000001D0: 4B 20 45 45 4E 20 4B 4C 45 49 4E 20 20 20 20 20 |K EEN KLEIN | 000001E0: 20 20 20 20 56 4F 4F 52 42 45 45 4C 44 20 49 4E | VOORBEELD IN| 000001F0: 20 44 45 5A 45 20 4C 41 41 54 53 54 45 20 4C 45 | DEZE LAATSTE LE| 00000200: 53 2E 00 0C 0A DC 00 8D 32 30 30 30 00 54 0A 2C |S.......2000.T.,| 00000210: 01 99 22 93 1F 20 C9 4B 20 4B 41 4E 20 44 45 20 |..".. .K KAN DE | 00000220: 4B 4C 45 55 52 20 56 41 4E 20 48 45 54 20 53 43 |KLEUR VAN HET SC| 00000230: 48 45 52 4D 20 20 20 20 20 20 20 20 20 20 45 45 |HERM EE| 00000240: 4E 56 4F 55 44 49 47 20 56 45 52 41 4E 44 45 52 |NVOUDIG VERANDER| 00000250: 45 4E 20 3A 00 78 0A 36 01 99 22 11 90 20 D0 CF |EN :.x.6..".. ..| 00000260: CB C5 20 35 33 32 38 31 2C D8 20 5A 45 54 20 44 |.. 53281,. ZET D| 00000270: 45 20 4B 4C 45 55 52 2E 00 90 0A 40 01 99 22 1F |E KLEUR....@..".| 00000280: 20 11 11 CB 49 4A 4B 20 4D 41 41 52 20 3A 11 11 | ...IJK MAAR :..| 00000290: 00 9C 0A 4A 01 81 49 B2 30 A4 31 35 00 AE 0A 54 |...J..I.0.15...T| 000002A0: 01 99 22 91 20 D8 20 49 53 20 4E 55 22 49 00 BB |..". . IS NU"I..| 000002B0: 0A 5E 01 97 35 33 32 38 31 2C 49 00 CD 0A 68 01 |.^..53281,I...h.| 000002C0: 81 4A B2 31 A4 31 30 30 30 3A 82 3A 82 00 F9 0A |.J.1.1000:.:....| 000002D0: 72 01 99 22 11 11 11 20 C5 4E 20 4F 4F 4B 20 44 |r.."... .N OOK D| 000002E0: 45 20 52 41 4E 44 20 4D 45 54 20 D0 CF CB C5 20 |E RAND MET .... | 000002F0: 35 33 32 38 30 2C D8 11 11 00 05 0B 7C 01 81 49 |53280,......|..I| 00000300: B2 30 A4 31 35 00 17 0B 86 01 99 22 91 20 D8 20 |.0.15......". . | 00000310: 49 53 20 4E 55 22 49 00 24 0B 90 01 97 35 33 32 |IS NU"I.$....532| 00000320: 38 30 2C 49 00 36 0B 9A 01 81 4A B2 31 A4 31 30 |80,I.6....J.1.10| 00000330: 30 30 3A 82 3A 82 00 40 0B A4 01 8D 32 30 30 30 |00:.:..@....2000| 00000340: 00 56 0B AE 01 97 35 33 32 38 30 2C 36 3A 97 35 |.V....53280,6:.5| 00000350: 33 32 38 31 2C 36 00 76 0B B8 01 99 22 93 9A 20 |3281,6.v....".. | 00000360: C8 49 45 52 42 49 4A 20 47 45 4C 44 54 20 56 4F |.IERBIJ GELDT VO| 00000370: 4F 52 20 D8 20 3A 00 98 0B C2 01 99 22 11 11 9A |OR . :......"...| 00000380: 20 20 30 20 3D 20 12 90 20 20 20 20 20 20 20 20 | 0 = .. | 00000390: 20 20 20 20 20 20 20 92 00 B8 0B CC 01 99 22 9A | .......".| 000003A0: 20 A0 31 20 3D 20 12 05 20 20 20 20 20 20 20 20 | .1 = .. | 000003B0: 20 20 20 20 20 20 20 92 00 D8 0B D6 01 99 22 9A | .......".| 000003C0: 20 20 32 20 3D 20 12 1C 20 20 20 20 20 20 20 20 | 2 = .. | 000003D0: 20 20 20 20 20 20 20 92 00 F8 0B E0 01 99 22 9A | .......".| 000003E0: 20 20 33 20 3D 20 12 9F 20 20 20 20 20 20 20 20 | 3 = .. | 000003F0: 20 20 20 20 20 20 20 92 00 18 0C EA 01 99 22 9A | .......".| 00000400: 20 20 34 20 3D 20 12 9C 20 20 20 20 20 20 20 20 | 4 = .. | 00000410: 20 20 20 20 20 20 20 92 00 38 0C F4 01 99 22 9A | ..8....".| 00000420: 20 20 35 20 3D 20 12 1E 20 20 20 20 20 20 20 20 | 5 = .. | 00000430: 20 20 20 20 20 20 20 92 00 58 0C FE 01 99 22 9A | ..X....".| 00000440: 20 20 36 20 3D 20 12 1F 20 20 20 20 20 20 20 20 | 6 = .. | 00000450: 20 20 20 20 20 20 20 92 00 78 0C 08 02 99 22 9A | ..x....".| 00000460: 20 20 37 20 3D 20 12 9E 20 20 20 20 20 20 20 20 | 7 = .. | 00000470: 20 20 20 20 20 20 20 92 00 98 0C 12 02 99 22 9A | .......".| 00000480: 20 20 38 20 3D 20 12 81 20 20 20 20 20 20 20 20 | 8 = .. | 00000490: 20 20 20 20 20 20 20 92 00 B8 0C 1C 02 99 22 9A | .......".| 000004A0: 20 20 39 20 3D 20 12 95 20 20 20 20 20 20 20 20 | 9 = .. | 000004B0: 20 20 20 20 20 20 20 92 00 D8 0C 26 02 99 22 9A | ....&..".| 000004C0: 20 31 30 20 3D 20 12 96 20 20 20 20 20 20 20 20 | 10 = .. | 000004D0: 20 20 20 20 20 20 20 92 00 F8 0C 30 02 99 22 9A | ....0..".| 000004E0: 20 31 31 20 3D 20 12 97 20 20 20 20 20 20 20 20 | 11 = .. | 000004F0: 20 20 20 20 20 20 20 92 00 18 0D 3A 02 99 22 9A | ....:..".| 00000500: 20 31 32 20 3D 20 12 98 20 20 20 20 20 20 20 20 | 12 = .. | 00000510: 20 20 20 20 20 20 20 92 00 38 0D 44 02 99 22 9A | ..8.D..".| 00000520: 20 31 33 20 3D 20 12 99 20 20 20 20 20 20 20 20 | 13 = .. | 00000530: 20 20 20 20 20 20 20 92 00 58 0D 4E 02 99 22 9A | ..X.N..".| 00000540: 20 31 34 20 3D 20 12 9A 20 20 20 20 20 20 20 20 | 14 = .. | 00000550: 20 20 20 20 20 20 20 92 00 78 0D 58 02 99 22 9A | ..x.X..".| 00000560: 20 31 35 20 3D 20 12 9B 20 20 20 20 20 20 20 20 | 15 = .. | 00000570: 20 20 20 20 20 20 20 92 00 82 0D 62 02 8D 32 30 | ....b..20| 00000580: 30 30 00 B1 0D 6C 02 99 22 93 90 20 CA 45 20 4B |00...l..".. .E K| 00000590: 55 4E 54 20 5A 45 4C 46 20 42 49 4A 20 48 45 54 |UNT ZELF BIJ HET| 000005A0: 20 49 4E 54 49 4B 4B 45 4E 20 56 41 4E 20 45 45 | INTIKKEN VAN EE| 000005B0: 4E 00 DC 0D 76 02 99 22 20 50 52 4F 47 52 41 4D |N...v.." PROGRAM| 000005C0: 4D 41 20 44 49 45 20 4B 4C 45 55 52 45 4E 20 47 |MA DIE KLEUREN G| 000005D0: 45 42 52 55 49 4B 45 4E 2E 20 CA 45 00 07 0E 80 |EBRUIKEN. .E....| 000005E0: 02 99 22 20 4B 52 49 4A 47 54 20 44 45 20 45 45 |.." KRIJGT DE EE| 000005F0: 52 53 54 45 20 38 20 4B 4C 45 55 52 45 4E 20 44 |RSTE 8 KLEUREN D| 00000600: 4F 4F 52 20 48 45 54 00 27 0E 8A 02 99 22 20 54 |OOR HET.'...." T| 00000610: 45 47 45 4C 49 4A 4B 20 49 4E 44 52 55 4B 4B 45 |EGELIJK INDRUKKE| 00000620: 4E 20 56 41 4E 20 3A 00 44 0E 94 02 99 22 11 05 |N VAN :.D...."..| 00000630: 20 C3 D4 D2 CC 20 45 4E 20 45 45 4E 20 43 49 4A | .... EN EEN CIJ| 00000640: 46 45 52 2E 00 6F 0E 9E 02 99 22 90 11 20 C4 45 |FER..o....".. .E| 00000650: 20 54 57 45 45 44 45 20 53 45 52 49 45 20 44 4F | TWEEDE SERIE DO| 00000660: 4F 52 20 48 45 54 20 54 45 47 45 4C 49 4A 4B 00 |OR HET TEGELIJK.| 00000670: 85 0E A3 02 99 22 20 49 4E 44 52 55 4B 4B 45 4E |....." INDRUKKEN| 00000680: 20 56 41 4E 22 00 A7 0E A8 02 99 22 11 05 20 C3 | VAN"......".. .| 00000690: CF CD CD CF C4 CF D2 C5 20 45 4E 20 45 45 4E 20 |........ EN EEN | 000006A0: 43 49 4A 46 45 52 2E 00 B1 0E B2 02 8D 32 30 30 |CIJFER.......200| 000006B0: 30 00 CA 0E BC 02 99 22 93 90 C7 C5 CC D5 C9 C4 |0......"........| 000006C0: 20 21 21 21 21 21 21 21 21 21 00 F2 0E C6 02 99 | !!!!!!!!!......| 000006D0: 22 11 9A 20 C7 45 4C 55 49 44 20 4F 50 20 44 45 |".. .ELUID OP DE| 000006E0: 5A 45 20 43 4F 4D 50 55 54 45 52 20 49 53 20 45 |ZE COMPUTER IS E| 000006F0: 52 47 00 20 0F D0 02 99 22 20 49 4E 47 45 57 49 |RG. ...." INGEWI| 00000700: 4B 4B 45 4C 44 2E 20 D3 4C 41 20 45 52 20 44 45 |KKELD. .LA ER DE| 00000710: 20 52 45 46 45 52 45 4E 43 45 20 47 55 49 44 45 | REFERENCE GUIDE| 00000720: 00 48 0F DA 02 99 22 20 4D 41 41 52 20 4F 50 20 |.H...." MAAR OP | 00000730: 4E 41 2E 20 CE 55 20 53 4C 45 43 48 54 53 20 45 |NA. .U SLECHTS E| 00000740: 45 4E 20 4B 4C 45 49 4E 00 61 0F E4 02 99 22 20 |EN KLEIN.a...." | 00000750: 56 4F 4F 52 42 45 45 4C 44 2E 22 3A 8D 32 30 30 |VOORBEELD.":.200| 00000760: 30 00 A3 0F EE 02 99 22 93 05 31 30 30 20 53 49 |0......"..100 SI| 00000770: 44 20 3D 20 35 34 32 37 32 20 20 20 20 20 20 20 |D = 54272 | 00000780: 20 3A 52 45 4D 20 41 44 52 45 53 20 56 41 4E 20 | :REM ADRES VAN | 00000790: 20 20 20 20 20 20 44 45 20 47 45 4C 55 49 44 43 | DE GELUIDC| 000007A0: 48 49 50 00 CA 0F F8 02 99 22 31 31 30 20 46 4F |HIP......"110 FO| 000007B0: 52 49 3D 30 54 4F 32 38 20 20 20 20 20 20 20 20 |RI=0TO28 | 000007C0: 20 3A 52 45 4D 20 4C 4F 4F 50 00 01 10 02 03 99 | :REM LOOP......| 000007D0: 22 31 32 30 20 50 4F 4B 45 20 53 49 44 2B 49 2C |"120 POKE SID+I,| 000007E0: 30 20 20 20 20 20 20 20 3A 52 45 4D 20 5A 45 54 |0 :REM ZET| 000007F0: 20 44 45 20 43 48 49 50 20 20 20 20 20 4F 50 20 | DE CHIP OP | 00000800: 30 00 2E 10 0C 03 99 22 31 33 30 20 4E 45 58 54 |0......"130 NEXT| 00000810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :| 00000820: 52 45 4D 20 45 49 4E 44 45 20 4C 4F 4F 50 00 5C |REM EINDE LOOP.\| 00000830: 10 16 03 99 22 31 34 30 20 50 4F 4B 45 20 53 49 |...."140 POKE SI| 00000840: 44 2B 32 34 2C 31 35 20 20 20 20 20 3A 52 45 4D |D+24,15 :REM| 00000850: 20 56 4F 4C 55 4D 45 20 48 41 52 44 00 89 10 20 | VOLUME HARD... | 00000860: 03 99 22 31 35 30 20 50 4F 4B 45 20 53 49 44 2B |.."150 POKE SID+| 00000870: 31 2C 58 20 20 20 20 20 20 20 3A 52 45 4D 20 46 |1,X :REM F| 00000880: 52 45 51 55 45 4E 54 49 45 00 B3 10 2A 03 99 22 |REQUENTIE...*.."| 00000890: 31 36 30 20 50 4F 4B 45 20 53 49 44 2B 35 2C 41 |160 POKE SID+5,A| 000008A0: 2A 32 36 2B 42 20 20 3A 52 45 4D 20 41 20 49 53 |*26+B :REM A IS| 000008B0: 20 44 45 00 00 11 34 03 99 22 20 20 20 20 54 49 | DE...4.." TI| 000008C0: 4A 44 20 56 4F 4F 52 44 41 54 20 4D 41 58 49 4D |JD VOORDAT MAXIM| 000008D0: 55 4D 20 56 4F 4C 55 4D 45 20 57 4F 52 44 54 20 |UM VOLUME WORDT | 000008E0: 20 20 20 20 20 20 42 45 52 45 49 4B 54 20 30 3D | BEREIKT 0=| 000008F0: 53 4E 45 4C 20 31 35 3D 4C 41 4E 47 5A 41 41 4D |SNEL 15=LANGZAAM| 00000900: 00 45 11 3E 03 99 22 20 20 20 20 42 20 49 53 20 |.E.>.." B IS | 00000910: 44 45 20 54 49 4A 44 20 56 4F 4F 52 44 41 54 20 |DE TIJD VOORDAT | 00000920: 48 45 54 20 41 41 4E 48 4F 55 44 2D 20 20 20 20 |HET AANHOUD- | 00000930: 20 20 20 56 4F 4C 55 4D 45 20 49 53 20 42 45 52 | VOLUME IS BER| 00000940: 45 49 4B 54 2E 00 70 11 48 03 99 22 31 37 30 20 |EIKT..p.H.."170 | 00000950: 50 4F 4B 45 20 53 49 44 2B 36 2C 43 2A 31 36 2B |POKE SID+6,C*16+| 00000960: 44 20 20 3A 52 45 4D 20 43 20 49 53 20 48 45 54 |D :REM C IS HET| 00000970: 00 97 11 52 03 99 22 20 20 20 20 56 4F 4C 55 4D |...R.." VOLUM| 00000980: 45 20 54 49 4A 44 45 4E 53 20 48 45 54 20 41 41 |E TIJDENS HET AA| 00000990: 4E 48 4F 55 44 45 4E 00 C3 11 5C 03 99 22 20 20 |NHOUDEN...\.." | 000009A0: 20 20 44 20 49 53 20 44 45 20 54 49 4A 44 20 44 | D IS DE TIJD D| 000009B0: 41 54 20 44 45 20 54 4F 4F 4E 20 41 46 53 54 45 |AT DE TOON AFSTE| 000009C0: 52 46 44 00 EE 11 66 03 99 22 31 38 30 20 50 4F |RFD...f.."180 PO| 000009D0: 4B 45 20 53 49 44 2B 34 2C 31 37 20 20 20 20 20 |KE SID+4,17 | 000009E0: 20 3A 52 45 4D 20 54 4F 4F 4E 20 41 41 4E 00 19 | :REM TOON AAN..| 000009F0: 12 67 03 99 22 31 39 30 20 46 4F 52 49 3D 31 54 |.g.."190 FORI=1T| 00000A00: 4F 31 30 30 3A 4E 45 58 54 20 20 20 3A 52 45 4D |O100:NEXT :REM| 00000A10: 20 57 41 43 48 54 4C 55 53 00 44 12 70 03 99 22 | WACHTLUS.D.p.."| 00000A20: 32 30 30 20 50 4F 4B 45 20 53 49 44 2B 34 2C 31 |200 POKE SID+4,1| 00000A30: 36 20 20 20 20 20 20 3A 52 45 4D 20 54 4F 4F 4E |6 :REM TOON| 00000A40: 20 55 49 54 00 60 12 7A 03 99 22 11 11 90 20 C5 | UIT.`.z.."... .| 00000A50: 45 4E 20 44 45 4D 4F 20 2E 2E 2E 2E 2E 2E 2E 2E |EN DEMO ........| 00000A60: 00 6A 12 84 03 8D 32 31 30 30 00 8E 12 8E 03 97 |.j....2100......| 00000A70: 53 49 44 AA 34 2C 31 37 3A 81 49 B2 31 A4 32 35 |SID.4,17:.I.1.25| 00000A80: 30 30 3A 82 3A 97 53 49 44 AA 34 2C 31 36 00 98 |00:.:.SID.4,16..| 00000A90: 12 98 03 8D 32 30 30 30 00 E1 12 A2 03 99 22 13 |....2000......".| 00000AA0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000AB0: 11 11 11 11 90 20 D6 45 52 41 4E 44 45 52 20 31 |..... .ERANDER 1| 00000AC0: 39 30 20 3A 22 3A 99 22 20 20 20 20 20 20 20 20 |90 :":." | 00000AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000AE0: 22 00 08 13 AC 03 99 22 31 39 30 20 46 4F 52 49 |"......"190 FORI| 00000AF0: 3D 30 54 4F 32 35 35 3A 50 4F 4B 45 53 49 44 2B |=0TO255:POKESID+| 00000B00: 31 2C 49 3A 4E 45 58 54 00 1C 13 B6 03 8D 32 30 |1,I:NEXT......20| 00000B10: 30 30 3A 97 53 49 44 AA 34 2C 31 37 00 48 13 C0 |00:.SID.4,17.H..| 00000B20: 03 81 49 B2 30 A4 32 35 35 3A 97 53 49 44 AA 31 |..I.0.255:.SID.1| 00000B30: 2C 49 3A 81 4A B2 31 A4 35 30 3A 82 3A 82 3A 97 |,I:.J.1.50:.:.:.| 00000B40: 53 49 44 AA 34 2C 31 36 00 52 13 CA 03 8D 32 30 |SID.4,16.R....20| 00000B50: 30 30 00 60 13 DE 03 97 53 49 44 AA 34 2C 31 37 |00.`....SID.4,17| 00000B60: 00 93 13 DF 03 99 22 13 11 11 11 11 11 11 11 11 |......".........| 00000B70: 11 11 11 11 11 11 11 11 11 11 11 90 20 D6 45 52 |............ .ER| 00000B80: 41 4E 44 45 52 20 45 4E 20 56 4F 45 47 20 54 4F |ANDER EN VOEG TO| 00000B90: 45 20 3A 00 B1 13 E0 03 99 22 05 31 39 30 20 46 |E :......".190 F| 00000BA0: 4F 52 49 3D 31 30 30 54 4F 32 30 30 53 54 45 50 |ORI=100TO200STEP| 00000BB0: 35 00 C6 13 E1 03 99 22 31 39 31 20 46 4F 52 4A |5......"191 FORJ| 00000BC0: 3D 30 54 4F 33 30 00 F3 13 E2 03 99 22 31 39 32 |=0TO30......"192| 00000BD0: 20 50 4F 4B 45 53 49 44 2B 31 2C 49 2B 4A 20 20 | POKESID+1,I+J | 00000BE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000BF0: 20 20 22 00 09 14 E3 03 99 22 31 39 33 20 4E 45 | "......"193 NE| 00000C00: 58 54 4A 3A 4E 45 58 54 49 00 1A 14 E8 03 81 49 |XTJ:NEXTI......I| 00000C10: B2 31 30 30 A4 32 30 30 A9 35 00 26 14 F2 03 81 |.100.200.5.&....| 00000C20: 4A B2 30 A4 33 30 00 35 14 FC 03 97 53 49 44 AA |J.0.30.5....SID.| 00000C30: 31 2C 49 AA 4A 00 52 14 06 04 82 3A 82 3A 97 53 |1,I.J.R....:.:.S| 00000C40: 49 44 AA 34 2C 31 36 3A 97 53 49 44 AA 31 2C 32 |ID.4,16:.SID.1,2| 00000C50: 35 35 00 66 14 10 04 8D 32 30 30 30 3A 97 53 49 |55.f....2000:.SI| 00000C60: 44 AA 32 34 2C 30 00 70 14 1A 04 89 33 30 30 30 |D.24,0.p....3000| 00000C70: 00 76 14 CF 07 90 00 BF 14 D0 07 99 22 13 11 11 |.v.........."...| 00000C80: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000C90: 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000CA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000CB0: 1D 1D 1D 1D 1D 1D 90 5B 54 4F 45 54 53 5D 13 00 |.......[TOETS]..| 00000CC0: D3 14 DA 07 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 |.....A$:.A$."".2| 00000CD0: 30 31 30 00 D9 14 E4 07 8E 00 13 15 34 08 53 49 |010.........4.SI| 00000CE0: 44 B2 35 34 32 37 32 3A 81 49 B2 30 A4 32 38 3A |D.54272:.I.0.28:| 00000CF0: 97 53 49 44 AA 49 2C 30 3A 82 3A 97 53 49 44 AA |.SID.I,0:.:.SID.| 00000D00: 31 2C 32 30 3A 97 53 49 44 AA 36 2C 31 35 AC 31 |1,20:.SID.6,15.1| 00000D10: 36 AA 33 00 24 15 3E 08 97 53 49 44 AA 32 34 2C |6.3.$.>..SID.24,| 00000D20: 31 35 3A 8E 00 3A 15 B8 0B 97 35 33 32 38 30 2C |15:..:....53280,| 00000D30: 32 3A 97 35 33 32 38 31 2C 32 00 65 15 C2 0B 99 |2:.53281,2.e....| 00000D40: 22 93 05 20 C1 4C 53 20 4C 41 41 54 53 54 45 20 |".. .LS LAATSTE | 00000D50: 50 52 4F 47 52 41 4D 4D 41 20 4B 4F 4D 54 20 4E |PROGRAMMA KOMT N| 00000D60: 55 20 45 45 4E 00 84 15 CC 0B 99 22 20 47 52 41 |U EEN......" GRA| 00000D70: 46 49 53 43 48 20 45 4E 20 47 45 4C 55 49 44 44 |FISCH EN GELUIDD| 00000D80: 45 4D 4F 2E 00 B9 15 D6 0B 99 22 20 CC 41 41 44 |EMO......." .AAD| 00000D90: 20 44 41 41 52 54 4F 45 20 27 42 41 53 49 43 20 | DAARTOE 'BASIC | 00000DA0: 44 45 4D 4F 27 22 3A 81 49 B2 31 A4 37 30 30 30 |DEMO'":.I.1.7000| 00000DB0: 3A 82 3A 99 22 93 22 3A 80 00 00 00 00 |:.:.".":..... |
..>.2..".******** BASIC CURSUS *** LES 8
********":.I.1.5000:..[.D..G(14):.53280
,5:.53281,5...N..".. BEHALVE DE BASIC-WO
ORDEN KUN JE MET...X.." MIJ NOG VEEL LEU
KE DINGEN UITHALEN.......". IK GEEF ER W
AT VOORBEELDEN VAN :......"... 1. IK BEN
EEN KLEUREN-COMPUTER. DUS.5...." MOE
TEN MIJN KLEUREN TE GEBRUIKEN.V. .."
ZIJN IN EEN PROGRAMMA......."... 2. IK K
AN OOK GELUID MAKEN. DAT MOET......"
DUS OOK IN EEN PROGRAMMA KUNNEN....R..".
... VAN DEZE TWEE GEEF IK EEN KLEIN
VOORBEELD IN DEZE LAATSTE LES.......
2000.T.,..".. IK KAN DE KLEUR VAN HET SC
HERM EENVOUDIG VERANDEREN :.X.6
..".. POKE 53281,X ZET DE KLEUR....@..".
..KIJK MAAR :.....J..I.0.15...T..". X I
S NU"I...^..53281,I.M.H..J.1.1000:.:....
R.."... EN OOK DE RAND MET POKE 53280,X.
....|..I.0.15......". X IS NU"I.$....532
80,I.6....J.1.1000:.:..@....2000.V....53
280,6:.53281,6.V....".. HIERBIJ GELDT VO
OR X :...B.."... 0 = .. .
...L..". 1 = .. ..X.V..".
2 = .. .......". 3 = ..
.......". 4 = ..
..8....". 5 = .. .
.X....". 6 = .. ..X....".
7 = .. .......". 8 = ..
.......". 9 = ..
..X.&..". 10 = .. .
...0..". 11 = .. ....:..".
12 = .. ..8.D..". 13 = ..
..X.N..". 14 = ..
..X.X..". 15 = .. .
...B..2000...L..".. JE KUNT ZELF BIJ HET
INTIKKEN VAN EEN...V.." PROGRAMMA DIE K
LEUREN GEBRUIKEN. JE......" KRIJGT DE EE
RSTE 8 KLEUREN DOOR HET.'...." TEGELIJK
INDRUKKEN VAN :.D....".. CTRL EN EEN CIJ
FER..O....".. DE TWEEDE SERIE DOOR HET T
EGELIJK......" INDRUKKEN VAN"......".. C
OMMODORE EN EEN CIJFER.......2000.J...."
..GELUID !!!!!!!!!...F..".. GELUID OP DE
ZE COMPUTER IS ERG. .P.." INGEWIKKELD. S
LA ER DE REFERENCE GUIDE.H.Z.." MAAR OP
NA. NU SLECHTS EEN KLEIN.A...." VOORBEEL
D.":.2000......"..100 SID = 54272
:REM ADRES VAN DE GELUIDCHIP.J...
."110 FORI=0TO28 :REM LOOP......
"120 POKE SID+I,0 :REM ZET DE CHIP
OP 0......"130 NEXT :
REM EINDE LOOP.\...."140 POKE SID+24,15
:REM VOLUME HARD... .."150 POKE SID+
1,X :REM FREQUENTIE...*.."160 POKE
SID+5,A*26+B :REM A IS DE...4.." TI
JD VOORDAT MAXIMUM VOLUME WORDT BE
REIKT 0=SNEL 15=LANGZAAM.E.>.." B IS
DE TIJD VOORDAT HET AANHOUD- VOLUM
E IS BEREIKT..P.H.."170 POKE SID+6,C*16+
D :REM C IS HET...R.." VOLUME TIJDEN
S HET AANHOUDEN.C.\.." D IS DE TIJD D
AT DE TOON AFSTERFD...F.."180 POKE SID+4
,17 :REM TOON AAN...G.."190 FORI=1T
O100:NEXT :REM WACHTLUS.D.P.."200 POKE
SID+4,16 :REM TOON UIT.`.Z.."... E
EN DEMO .........J....2100......SID.4,17
:.I.1.2500:.:.SID.4,16......2000......".
..................... VERANDER 190 :":."
"......"190 FORI
=0TO255:POKESID+1,I:NEXT......2000:.SID.
4,17.H....I.0.255:.SID.1,I:.J.1.50:.:.:.
SID.4,16.R.J..2000.`....SID.4,17......".
.................... VERANDER EN VOEG TO
E :......".190 FORI=100TO200STEP5.F...."
191 FORJ=0TO30......"192 POKESID+1,I+J
"......"193 NEXTJ:NEXT
I......I.100.200.5.&....J.0.30.5....SID.
1,I.J.R....:.:.SID.4,16:.SID.1,255.F....
2000:.SID.24,0.P....3000.V.O.....P.."...
........................................
...............[TOETS]..S.Z..A$:.A$."".2
010.Y.......4.SID.54272:.I.0.28:.SID.I,0
:.:.SID.1,20:.SID.6,15.16.3.$.>..SID.24,
15:..:....53280,2:.53281,2.E.B..".. ALS
LAATSTE PROGRAMMA KOMT NU EEN...L.." GRA
FISCH EN GELUIDDEMO....V.." LAAD DAARTOE
'BASIC DEMO'":.I.1.7000:.:.".":.....
> CLICK IMAGE PREVIEW FOR FULL MODAL