BASIC 3.2

FILE INFORMATION

FILENAME(S): BASIC 3.2

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-11-30 21:28:26

APPEARS ON: 1 disk(s)

FILE HASH

9dedb3ececd8b21bd27bb7e731ca5ed5afa941efa2ca90b9960c31fd37876327

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
1541TEST DEMO	BASIC 3.2	PRG	DuncanTwain	13	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 13 08 01 00 8F 20  2B 2B 2B 20 33 2E 32 20  |....... +++ 3.2 |
00000010: 2B 2B 2B 00 25 08 64 00  41 B2 31 39 38 3A 99 C7  |+++.%.d.A.198:..|
00000020: 28 31 34 32 29 00 3A 08  6E 00 97 35 33 32 38 31  |(142).:.n..53281|
00000030: 2C 31 30 3A 97 36 34 36  2C 32 00 7B 08 78 00 5A  |,10:.646,2.{.x.Z|
00000040: 24 B2 C7 28 33 34 29 3A  51 24 B2 22 91 20 20 20  |$..(34):Q$.".   |
00000050: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000070: 20 20 20 91 91 22 3A 89  31 37 30 00 AC 08 82 00  |   ..":.170.....|
00000080: 99 22 93 22 3A 81 49 B2  31 A4 33 39 3A 99 43 24  |.".":.I.1.39:.C$|
00000090: 3B 3A 82 3A 81 49 B2 31  A4 32 32 3A 99 22 9D 11  |;:.:.I.1.22:."..|
000000A0: 22 43 24 3B 3A 82 3A 99  22 9D 22 3B 00 C9 08 8C  |"C$;:.:.".";....|
000000B0: 00 81 49 B2 31 A4 33 38  3A 99 22 9D 22 43 24 22  |..I.1.38:."."C$"|
000000C0: 9D 22 3B 3A 82 3A 99 43  24 00 E4 08 96 00 81 49  |.";:.:.C$......I|
000000D0: B2 31 A4 32 33 3A 99 22  91 22 43 24 22 9D 22 3B  |.1.23:."."C$".";|
000000E0: 3A 82 3A 8E 00 FB 08 A0  00 97 41 2C 30 3A 92 41  |:.:.......A,0:.A|
000000F0: 2C 32 35 35 3A 97 41 2C  30 3A 8E 00 12 09 20 3D  |,255:.A,0:.... =|
00000100: 20 31 20 54 4F 20 4E 53  00 1E 0E E0 01 99 22 35  | 1 TO NS......"5|
00000110: 30 20 52 45 41 44 20 53  24 28 4B 29 22 3A 99 22  |0 READ S$(K)":."|
00000120: 36 30 20 4E 45 58 54 22  00 4E 0E EA 01 99 22 37  |60 NEXT".N...."7|
00000130: 30 20 50 52 49 4E 54 22  5A 24 22 47 45 45 46 20  |0 PRINT"Z$"GEEF |
00000140: 45 45 4E 20 53 59 4E 4F  4E 49 45 4D 20 56 4F 4F  |EEN SYNONIEM VOO|
00000150: 52 20 22 5A 24 22 57 24  00 9F 0E F4 01 99 22 38  |R "Z$"W$......"8|
00000160: 30 20 49 4E 50 55 54 20  52 24 22 3A 99 22 39 30  |0 INPUT R$":."90|
00000170: 20 49 46 20 52 24 20 3D  20 22 3B 5A 24 3B 22 48  | IF R$ = ";Z$;"H|
00000180: 45 4C 50 22 3B 5A 24 3B  22 20 54 48 45 4E 20 31  |ELP";Z$;" THEN 1|
00000190: 37 30 22 3A 99 22 31 30  30 20 46 4F 52 20 4B 20  |70":."100 FOR K |
000001A0: 3D 20 31 20 54 4F 20 4E  53 00 E2 0E FE 01 99 22  |= 1 TO NS......"|
000001B0: 31 31 30 20 49 46 20 52  24 20 3D 20 53 24 28 4B  |110 IF R$ = S$(K|
000001C0: 29 20 54 48 45 4E 20 31  35 30 22 3A 99 22 31 32  |) THEN 150":."12|
000001D0: 30 20 4E 45 58 54 22 3A  99 22 31 33 30 20 50 52  |0 NEXT":."130 PR|
000001E0: 49 4E 54 22 5A 24 22 4E  45 45 22 3B 00 1D 0F 08  |INT"Z$"NEE";....|
000001F0: 02 99 22 2C 20 50 52 4F  42 45 45 52 20 48 45 54  |..", PROBEER HET|
00000200: 20 4E 4F 47 20 45 45 4E  53 20 4F 46 20 54 59 50  | NOG EENS OF TYP|
00000210: 20 48 45 4C 50 22 5A 24  3A 99 22 31 34 30 20 47  | HELP"Z$:."140 G|
00000220: 4F 20 54 4F 20 38 30 00  3D 0F 12 02 99 22 31 35  |O TO 80.=...."15|
00000230: 30 20 50 52 49 4E 54 20  22 5A 24 22 43 4F 52 52  |0 PRINT "Z$"CORR|
00000240: 45 43 54 21 22 5A 24 00  7C 0F 1C 02 99 22 31 36  |ECT!"Z$.|...."16|
00000250: 30 20 47 4F 54 4F 20 32  31 30 22 3A 99 22 31 37  |0 GOTO 210":."17|
00000260: 30 20 50 52 49 4E 54 20  57 24 22 5A 24 22 20 48  |0 PRINT W$"Z$" H|
00000270: 45 45 46 54 20 44 45 20  53 59 4E 4F 4E 49 45 4D  |EEFT DE SYNONIEM|
00000280: 45 4E 3A 22 5A 24 00 CD  0F 26 02 99 22 31 38 30  |EN:"Z$...&.."180|
00000290: 20 46 4F 52 20 4B 3D 31  20 54 4F 20 4E 53 22 3A  | FOR K=1 TO NS":|
000002A0: 99 22 31 39 30 20 50 52  49 4E 54 20 53 24 28 4B  |."190 PRINT S$(K|
000002B0: 29 22 3A 99 22 32 30 30  20 4E 45 58 54 22 3A 99  |)":."200 NEXT":.|
000002C0: 22 32 31 30 20 4E 45 58  54 22 3A 99 22 32 32 30  |"210 NEXT":."220|
000002D0: 20 44 41 54 41 20 32 00  F5 0F 30 02 99 22 32 33  | DATA 2...0.."23|
000002E0: 30 20 44 41 54 41 20 47  45 56 41 4E 47 45 4E 49  |0 DATA GEVANGENI|
000002F0: 53 2C 33 2C 43 45 4C 2C  42 41 4B 2C 4B 4F 54 00  |S,3,CEL,BAK,KOT.|
00000300: 18 10 3A 02 99 22 32 34  30 20 44 41 54 41 20 48  |..:.."240 DATA H|
00000310: 55 49 53 2C 32 2C 57 4F  4E 49 4E 47 2C 46 4C 41  |UIS,2,WONING,FLA|
00000320: 54 91 00 21 10 44 02 8D  31 36 30 00 4C 10 4E 02  |T..!.D..160.L.N.|
00000330: 99 22 93 11 4F 4F 4B 20  44 49 54 20 4C 41 41 54  |."..OOK DIT LAAT|
00000340: 53 54 45 20 50 52 4F 47  52 41 4D 4D 41 20 53 54  |STE PROGRAMMA ST|
00000350: 41 41 54 20 4F 50 00 74  10 58 02 99 22 44 45 20  |AAT OP.t.X.."DE |
00000360: 41 4E 44 45 52 45 20 4B  41 4E 54 20 56 41 4E 20  |ANDERE KANT VAN |
00000370: 44 45 5A 45 20 43 41 53  53 45 54 54 45 2E 00 87  |DEZE CASSETTE...|
00000380: 10 62 02 A1 41 24 3A 8B  41 24 B2 22 22 A7 36 31  |.b..A$:.A$."".61|
00000390: 30 00 B9 10 6C 02 99 22  93 11 11 11 1D 1D 5A 4F  |0...l.."......ZO|
000003A0: 41 4C 53 20 55 20 42 45  47 52 45 50 45 4E 20 5A  |ALS U BEGREPEN Z|
000003B0: 55 4C 54 20 48 45 42 42  45 4E 20 49 53 20 48 49  |ULT HEBBEN IS HI|
000003C0: 45 52 22 00 E0 10 76 02  99 22 1D 1D 41 4C 4C 45  |ER"...v.."..ALLE|
000003D0: 45 4E 20 44 45 20 52 45  43 4F 52 44 45 52 20 42  |EN DE RECORDER B|
000003E0: 45 48 41 4E 44 45 4C 54  2E 22 00 0A 11 80 02 99  |EHANDELT."......|
000003F0: 22 1D 1D 44 45 20 42 45  48 41 4E 44 45 4C 49 4E  |"..DE BEHANDELIN|
00000400: 47 20 56 4F 4F 52 20 55  57 20 44 49 53 4B 44 52  |G VOOR UW DISKDR|
00000410: 49 56 45 22 00 35 11 8A  02 99 22 1D 1D 53 54 41  |IVE".5...."..STA|
00000420: 41 54 20 49 4E 20 44 45  20 44 49 53 4B 44 52 49  |AT IN DE DISKDRI|
00000430: 56 45 20 48 41 4E 44 4C  45 49 44 49 4E 47 22 00  |VE HANDLEIDING".|
00000440: 75 11 94 02 99 3A 99 22  1D 1D 44 45 20 50 52 4F  |u....:."..DE PRO|
00000450: 47 52 41 4D 4D 41 27 53  20 28 41 41 4E 20 44 45  |GRAMMA'S (AAN DE|
00000460: 20 41 4E 44 45 52 45 20  4B 41 4E 54 20 56 41 4E  | ANDERE KANT VAN|
00000470: 20 20 44 45 20 43 41 53  53 45 54 54 45 29 22 00  |  DE CASSETTE)".|
00000480: A5 11 9E 02 99 22 1D 1D  53 54 41 41 4E 20 4F 50  |....."..STAAN OP|
00000490: 20 44 45 20 44 49 53 4B  45 54 54 45 20 4F 4E 44  | DE DISKETTE OND|
000004A0: 45 52 20 56 4F 4F 52 42  45 45 4C 44 45 4E 22 00  |ER VOORBEELDEN".|
000004B0: B8 11 A8 02 A1 41 24 3A  8B 41 24 B2 22 22 A7 36  |.....A$:.A$."".6|
000004C0: 38 30 00 C1 11 B2 02 8D  31 36 30 00 F6 11 BC 02  |80......160.....|
000004D0: 43 24 B2 22 A6 22 3A 8D  31 33 30 3A 99 22 11 11  |C$.".":.130:."..|
000004E0: 11 1D 1D 1D 1D 1D 1D 44  49 54 20 42 45 53 4C 55  |.......DIT BESLU|
000004F0: 49 54 20 44 45 20 43 55  52 53 55 53 20 56 41 4E  |IT DE CURSUS VAN|
00000500: 00 22 12 C6 02 99 22 1D  1D 1D 1D 1D 1D 11 12 42  |."...."........B|
00000510: 45 47 49 4E 4E 45 4E 44  20 42 41 53 49 43 20 56  |EGINNEND BASIC V|
00000520: 4F 4F 52 20 44 45 20 36  34 92 11 11 00 53 12 C7  |OOR DE 64....S..|
00000530: 02 99 22 1D 1D 1D 1D 1D  1D 11 4C 41 54 45 52 20  |..".......LATER |
00000540: 56 4F 4C 47 54 20 45 52  20 4E 4F 47 20 45 45 4E  |VOLGT ER NOG EEN|
00000550: 20 54 57 45 45 44 45 20  44 45 45 4C 2C 00 7B 12  | TWEEDE DEEL,.{.|
00000560: C8 02 99 22 1D 1D 1D 1D  1D 1D 4F 4F 4B 20 56 45  |..."......OOK VE|
00000570: 52 4B 52 49 4A 47 42 41  41 52 20 42 49 4A 20 44  |RKRIJGBAAR BIJ D|
00000580: 45 20 50 42 45 00 A2 12  D0 02 99 22 1D 1D 1D 55  |E PBE......"...U|
00000590: 20 5A 4F 55 20 4E 55 20  55 57 20 45 49 47 45 4E  | ZOU NU UW EIGEN|
000005A0: 20 50 52 4F 47 52 41 4D  4D 41 27 53 00 E5 12 DA  | PROGRAMMA'S....|
000005B0: 02 99 22 1D 1D 1D 4D 4F  45 54 45 4E 20 4B 55 4E  |.."...MOETEN KUN|
000005C0: 4E 45 4E 20 53 43 48 52  49 4A 56 45 4E 20 56 4F  |NEN SCHRIJVEN VO|
000005D0: 4F 52 22 3A 99 22 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |OR":."..........|
000005E0: 41 4C 4C 45 52 4C 45 49  20 54 41 4B 45 4E 2E 00  |ALLERLEI TAKEN..|
000005F0: FC 12 E4 02 99 22 11 11  11 1D 1D 1D 1D 1D 53 55  |....."........SU|
00000600: 43 43 45 53 21 22 00 02  13 EE 02 80 00 00 00 35  |CCES!".........5|
00000610: 45 22                                             |E"              |

....... +++ 3.2 +++.%.D.A.198:.G(142).:.
N..53281,10:.646,2.{.X.Z$.G(34):Q$.".   
                                   ..":.
170......".":.I.1.39:.C$;:.:.I.1.22:."..
"C$;:.:.".";.I....I.1.38:."."C$".";:.:.C
$......I.1.23:."."C$".";:.:.... ..A,0:.A
,255:.A,0:.... = 1 TO NS......"50 READ S
$(K)":."60 NEXT".N...."70 PRINT"Z$"GEEF 
EEN SYNONIEM VOOR "Z$"W$......"80 INPUT 
R$":."90 IF R$ = ";Z$;"HELP";Z$;" THEN 1
70":."100 FOR K = 1 TO NS......"110 IF R
$ = S$(K) THEN 150":."120 NEXT":."130 PR
INT"Z$"NEE";......", PROBEER HET NOG EEN
S OF TYP HELP"Z$:."140 GO TO 80.=...."15
0 PRINT "Z$"CORRECT!"Z$.|...."160 GOTO 2
10":."170 PRINT W$"Z$" HEEFT DE SYNONIEM
EN:"Z$.M.&.."180 FOR K=1 TO NS":."190 PR
INT S$(K)":."200 NEXT":."210 NEXT":."220
 DATA 2...0.."230 DATA GEVANGENIS,3,CEL,
BAK,KOT...:.."240 DATA HUIS,2,WONING,FLA
T..!.D..160.L.N.."..OOK DIT LAATSTE PROG
RAMMA STAAT OP.T.X.."DE ANDERE KANT VAN 
DEZE CASSETTE....B..A$:.A$."".610...L.."
......ZOALS U BEGREPEN ZULT HEBBEN IS HI
ER"...V.."..ALLEEN DE RECORDER BEHANDELT
."......"..DE BEHANDELING VOOR UW DISKDR
IVE".5...."..STAAT IN DE DISKDRIVE HANDL
EIDING".U....:."..DE PROGRAMMA'S (AAN DE
 ANDERE KANT VAN  DE CASSETTE)"......"..
STAAN OP DE DISKETTE ONDER VOORBEELDEN".
.....A$:.A$."".680.A....160.....C$.".":.
130:.".........DIT BESLUIT DE CURSUS VAN
.".F.."........BEGINNEND BASIC VOOR DE 6
4....S.G..".......LATER VOLGT ER NOG EEN
 TWEEDE DEEL,.{.H.."......OOK VERKRIJGBA
AR BIJ DE PBE...P.."...U ZOU NU UW EIGEN
 PROGRAMMA'S...Z.."...MOETEN KUNNEN SCHR
IJVEN VOOR":."..........ALLERLEI TAKEN..
....."........SUCCES!".........5E"

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL