Multiple names: BASIC 2.1, BASIC 8.2
FILE INFORMATION
FILENAME(S):
• BASIC 2.1<br>• BASIC 8.2
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 21:28:26
APPEARS ON: 2 disk(s)
FILE HASH
535a45ec9c8ce3f492efa7f1603e6cca24376c208ee49a1e653dc5c3f2008ea2
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 1541TEST DEMO | BASIC 2.1 | PRG | DuncanTwain | 14 | 0 | DOWNLOAD FILE |
| 1541TEST DEMO | BASIC 8.2 | PRG | DuncanTwain | 26 | 2 | 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 38 2E 32 20 |....... +++ 8.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 39 3A 97 36 34 36 2C 31 30 00 64 08 78 00 51 |,9:.646,10.d.x.Q| 00000040: 24 B2 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |$.". | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 3A | .":| 00000060: 89 31 37 30 00 96 08 82 00 99 22 93 22 3B 3A 81 |.170......".";:.| 00000070: 49 B2 31 A4 33 39 3A 99 43 24 3B 3A 82 3A 81 49 |I.1.39:.C$;:.:.I| 00000080: B2 31 A4 32 32 3A 99 22 9D 11 22 43 24 3B 3A 82 |.1.22:.".."C$;:.| 00000090: 3A 99 22 9D 22 3B 00 B3 08 8C 00 81 49 B2 31 A4 |:.".";......I.1.| 000000A0: 33 38 3A 99 22 9D 22 43 24 22 9D 22 3B 3A 82 3A |38:."."C$".";:.:| 000000B0: 99 43 24 00 CE 08 96 00 81 49 B2 31 A4 32 33 3A |.C$......I.1.23:| 000000C0: 99 22 91 22 43 24 22 9D 22 3B 3A 82 3A 8E 00 E5 |."."C$".";:.:...| 000000D0: 08 A0 00 97 41 2C 30 3A 92 41 2C 32 35 35 3A 97 |....A,0:.A,255:.| 000000E0: 41 2C 30 3A 8E 00 03 09 AA 00 99 22 93 11 22 A3 |A,0:......."..".| 000000F0: 31 30 29 22 47 4F 53 55 42 20 28 56 45 52 56 4F |10)"GOSUB (VERVO| 00000100: 4C 47 29 00 15 09 B4 00 99 22 11 1D 32 20 4C 45 |LG)......"..2 LE| 00000110: 54 20 41 3D 31 00 27 09 BE 00 99 22 1D 34 20 47 |T A=1.'....".4 G| 00000120: 4F 53 55 42 20 31 30 00 38 09 C8 00 99 22 1D 36 |OSUB 10.8....".6| 00000130: 20 50 52 49 4E 54 20 41 00 49 09 D2 00 99 22 1D | PRINT A.I....".| 00000140: 38 20 47 4F 54 4F 20 31 32 00 5E 09 DC 00 99 22 |8 GOTO 12.^...."| 00000150: 1D 31 30 20 4C 45 54 20 41 3D 41 2A 31 30 00 6C |.10 LET A=A*10.l| 00000160: 09 E6 00 99 22 1D 31 32 20 45 4E 44 00 98 09 F0 |....".12 END....| 00000170: 00 99 22 11 57 41 54 20 5A 41 4C 20 45 52 20 41 |..".WAT ZAL ER A| 00000180: 46 47 45 44 52 55 4B 54 20 57 4F 52 44 45 4E 2C |FGEDRUKT WORDEN,| 00000190: 20 41 4C 53 20 44 49 54 00 BA 09 FA 00 99 22 50 | ALS DIT......"P| 000001A0: 52 4F 47 52 41 4D 4D 41 20 55 49 54 47 45 56 4F |ROGRAMMA UITGEVO| 000001B0: 45 52 44 20 57 4F 52 44 54 3A 00 E0 09 04 01 99 |ERD WORDT:......| 000001C0: 22 11 12 31 2E 92 20 31 22 2C 22 12 32 2E 92 20 |"..1.. 1",".2.. | 000001D0: 31 30 22 2C 22 12 33 2E 92 20 4E 49 45 54 53 11 |10",".3.. NIETS.| 000001E0: 00 F5 09 0E 01 99 22 28 31 2C 32 20 4F 46 20 33 |......"(1,2 OF 3| 000001F0: 29 20 22 20 3B 00 1F 0A 18 01 85 41 24 3A 8B 41 |) " ;......A$:.A| 00000200: 24 B3 B1 22 31 22 AF 41 24 B3 B1 22 32 22 AF 41 |$.."1".A$.."2".A| 00000210: 24 B3 B1 22 33 22 A7 99 51 24 3A 89 32 37 30 00 |$.."3"..Q$:.270.| 00000220: 2F 0A 22 01 8B 41 24 B2 22 33 22 89 33 35 30 00 |/."..A$."3".350.| 00000230: 3F 0A 2C 01 8B 41 24 B2 22 32 22 89 33 34 30 00 |?.,..A$."2".340.| 00000240: 6F 0A 36 01 99 22 11 11 4E 45 45 2C 20 55 20 56 |o.6.."..NEE, U V| 00000250: 45 52 47 45 45 54 20 44 41 54 20 44 45 20 47 4F |ERGEET DAT DE GO| 00000260: 53 55 42 20 44 45 20 43 4F 4D 50 55 54 45 52 00 |SUB DE COMPUTER.| 00000270: 92 0A 40 01 99 22 4E 41 41 52 20 52 45 47 45 4C |..@.."NAAR REGEL| 00000280: 20 31 30 20 4C 41 41 54 20 53 50 52 49 4E 47 45 | 10 LAAT SPRINGE| 00000290: 4E 2E 00 BB 0A 4A 01 99 22 11 11 50 52 4F 42 45 |N....J.."..PROBE| 000002A0: 45 52 20 48 45 54 20 4E 4F 47 20 45 45 4E 53 21 |ER HET NOG EENS!| 000002B0: 22 3A 8D 31 36 30 3A 89 31 37 30 00 EC 0A 54 01 |":.160:.170...T.| 000002C0: 99 22 11 11 4E 45 45 2C 20 57 41 41 52 20 49 53 |."..NEE, WAAR IS| 000002D0: 20 44 45 20 52 45 54 55 52 4E 20 49 4E 53 54 52 | DE RETURN INSTR| 000002E0: 55 4B 54 49 45 21 22 3A 89 33 33 30 00 19 0B 5E |UKTIE!":.330...^| 000002F0: 01 99 22 11 11 44 41 54 20 4B 4C 4F 50 54 21 20 |.."..DAT KLOPT! | 00000300: 4E 49 45 54 53 20 57 4F 52 44 54 20 45 52 20 41 |NIETS WORDT ER A| 00000310: 46 47 45 44 52 55 4B 54 2E 00 44 0B 68 01 99 22 |FGEDRUKT..D.h.."| 00000320: 11 41 4C 53 20 57 45 20 12 41 92 20 5A 4F 55 44 |.ALS WE .A. ZOUD| 00000330: 45 4E 20 57 49 4C 4C 45 4E 20 41 46 44 52 55 4B |EN WILLEN AFDRUK| 00000340: 4B 45 4E 2C 00 72 0B 72 01 99 22 4D 4F 45 54 45 |KEN,.r.r.."MOETE| 00000350: 4E 20 57 45 20 12 31 31 20 52 45 54 55 52 4E 92 |N WE .11 RETURN.| 00000360: 20 41 41 4E 20 48 45 54 20 50 52 4F 47 52 41 4D | AAN HET PROGRAM| 00000370: 4D 41 00 89 0B 7C 01 99 22 54 4F 45 56 4F 45 47 |MA...|.."TOEVOEG| 00000380: 45 4E 2E 22 3A 8D 31 36 30 00 9E 0B 86 01 99 22 |EN.":.160......"| 00000390: 93 22 A3 31 33 29 22 4F 4E A4 47 4F 54 4F 00 CD |.".13)"ON.GOTO..| 000003A0: 0B 90 01 99 22 11 48 45 54 20 47 4F 54 4F 20 43 |....".HET GOTO C| 000003B0: 4F 4D 4D 41 4E 44 4F 20 4C 41 41 54 20 44 45 20 |OMMANDO LAAT DE | 000003C0: 43 4F 4D 50 55 54 45 52 20 4E 41 41 52 00 F7 0B |COMPUTER NAAR...| 000003D0: 9A 01 99 22 45 45 4E 20 42 45 50 41 41 4C 44 45 |..."EEN BEPAALDE| 000003E0: 20 52 45 47 45 4C 20 49 4E 20 48 45 54 20 50 52 | REGEL IN HET PR| 000003F0: 4F 47 52 41 4D 4D 41 00 1D 0C A4 01 99 22 53 50 |OGRAMMA......"SP| 00000400: 52 49 4E 47 45 4E 20 54 49 4A 44 45 4E 53 20 44 |RINGEN TIJDENS D| 00000410: 45 20 55 49 54 56 4F 45 52 49 4E 47 2E 00 49 0C |E UITVOERING..I.| 00000420: AE 01 99 22 11 4F 50 20 44 45 5A 45 4C 46 44 45 |...".OP DEZELFDE| 00000430: 20 4D 41 4E 49 45 52 20 4C 41 41 54 20 12 4F 4E | MANIER LAAT .ON| 00000440: A4 47 4F 54 4F 92 20 44 45 00 72 0C B8 01 99 22 |.GOTO. DE.r...."| 00000450: 43 4F 4D 50 55 54 45 52 20 4E 41 41 52 20 45 45 |COMPUTER NAAR EE| 00000460: 4E 20 56 41 4E 20 56 45 52 53 43 48 45 49 44 45 |N VAN VERSCHEIDE| 00000470: 4E 45 00 9F 0C C2 01 99 22 4D 4F 47 45 4C 49 4A |NE......"MOGELIJ| 00000480: 4B 45 20 52 45 47 45 4C 53 20 53 50 52 49 4E 47 |KE REGELS SPRING| 00000490: 45 4E 2C 20 41 46 48 41 4E 4B 45 4C 49 4A 4B 00 |EN, AFHANKELIJK.| 000004A0: C6 0C CC 01 99 22 56 41 4E 20 44 45 20 57 41 41 |....."VAN DE WAA| 000004B0: 52 44 45 20 56 41 4E 20 45 45 4E 20 45 58 50 52 |RDE VAN EEN EXPR| 000004C0: 45 53 53 49 45 2E 00 ED 0C D6 01 99 22 11 45 45 |ESSIE.......".EE| 000004D0: 4E 20 56 4F 4F 52 42 45 45 4C 44 20 56 41 4E 20 |N VOORBEELD VAN | 000004E0: 45 45 4E 20 12 4F 4E A4 47 4F 54 4F 92 00 02 0D |EEN .ON.GOTO....| 000004F0: E0 01 99 22 49 4E 53 54 52 55 4B 54 49 45 20 49 |..."INSTRUKTIE I| 00000500: 53 3A 00 1E 0D EA 01 99 22 11 1D 38 30 20 4F 4E |S:......"..80 ON| 00000510: 20 4A 20 47 4F 54 4F 20 31 30 2C 20 39 30 00 49 | J GOTO 10, 90.I| 00000520: 0D F4 01 99 22 11 41 4C 53 20 4A 20 44 45 20 57 |....".ALS J DE W| 00000530: 41 41 52 44 45 20 31 20 48 45 45 46 54 2C 20 53 |AARDE 1 HEEFT, S| 00000540: 50 52 49 4E 47 54 20 44 45 00 67 0D FE 01 99 22 |PRINGT DE.g...."| 00000550: 43 4F 4D 50 55 54 45 52 20 4E 41 41 52 20 52 45 |COMPUTER NAAR RE| 00000560: 47 45 4C 20 31 30 2E 00 92 0D 08 02 99 22 11 41 |GEL 10.......".A| 00000570: 4C 53 20 4A 20 44 45 20 57 41 41 52 44 45 20 32 |LS J DE WAARDE 2| 00000580: 20 48 45 45 46 54 2C 20 53 50 52 49 4E 47 54 20 | HEEFT, SPRINGT | 00000590: 44 45 00 B0 0D 12 02 99 22 43 4F 4D 50 55 54 45 |DE......"COMPUTE| 000005A0: 52 20 4E 41 41 52 20 52 45 47 45 4C 20 39 30 2E |R NAAR REGEL 90.| 000005B0: 00 DE 0D 1C 02 99 22 11 41 4C 53 20 4A 20 45 45 |......".ALS J EE| 000005C0: 4E 20 41 4E 44 45 52 45 20 57 41 41 52 44 45 20 |N ANDERE WAARDE | 000005D0: 48 45 45 46 54 2C 20 44 41 4E 20 5A 41 4C 00 15 |HEEFT, DAN ZAL..| 000005E0: 0E 26 02 99 22 44 45 20 52 45 47 45 4C 20 56 4F |.&.."DE REGEL VO| 000005F0: 4C 47 45 4E 44 20 4F 50 20 38 30 20 55 49 54 47 |LGEND OP 80 UITG| 00000600: 45 56 4F 45 52 44 20 57 4F 52 44 45 4E 91 91 22 |EVOERD WORDEN.."| 00000610: 3A 8D 31 36 30 00 43 0E 30 02 99 22 93 11 44 45 |:.160.C.0.."..DE| 00000620: 20 56 4F 52 4D 20 56 41 4E 20 44 45 20 4F 4E A4 | VORM VAN DE ON.| 00000630: 47 4F 54 4F 20 49 4E 53 54 52 55 4B 54 49 45 20 |GOTO INSTRUKTIE | 00000640: 49 53 3A 00 74 0E 3A 02 99 22 11 12 52 45 47 45 |IS:.t.:.."..REGE| 00000650: 4C 20 4E 4F 2E 92 20 4F 4E 20 12 58 92 20 47 4F |L NO.. ON .X. GO| 00000660: 54 4F 20 12 4C 49 4A 53 54 20 56 41 4E 20 52 45 |TO .LIJST VAN RE| 00000670: 47 45 4C 53 00 A1 0E 44 02 99 22 11 57 41 41 52 |GELS...D..".WAAR| 00000680: 20 58 20 45 45 4E 20 56 41 52 49 41 42 45 4C 45 | X EEN VARIABELE| 00000690: 20 4F 46 20 45 58 50 52 45 53 53 49 45 20 49 53 | OF EXPRESSIE IS| 000006A0: 2E 00 C9 0E 4E 02 99 22 11 11 48 49 45 52 20 5A |....N.."..HIER Z| 000006B0: 49 4A 4E 20 4E 4F 47 20 54 57 45 45 20 56 4F 4F |IJN NOG TWEE VOO| 000006C0: 52 42 45 45 4C 44 45 4E 3A 00 E6 0E 58 02 99 22 |RBEELDEN:...X.."| 000006D0: 11 11 1D 32 20 4F 4E 20 46 20 47 4F 54 4F 20 35 |...2 ON F GOTO 5| 000006E0: 2C 20 35 2C 20 36 00 0A 0F 62 02 99 22 11 1D 31 |, 5, 6...b.."..1| 000006F0: 34 20 4F 4E 20 56 2B 32 20 47 4F 54 4F 20 33 33 |4 ON V+2 GOTO 33| 00000700: 2C 20 31 30 2C 20 32 2C 20 32 00 13 0F 6C 02 8D |, 10, 2, 2...l..| 00000710: 31 36 30 00 40 0F 76 02 99 22 93 11 57 45 4C 4B |160.@.v.."..WELK| 00000720: 45 20 56 41 4E 20 44 45 20 56 4F 4C 47 45 4E 44 |E VAN DE VOLGEND| 00000730: 45 20 56 4F 4F 52 42 45 45 4C 44 45 4E 20 49 53 |E VOORBEELDEN IS| 00000740: 00 65 0F 80 02 99 22 45 45 4E 20 4A 55 49 53 54 |.e...."EEN JUIST| 00000750: 45 20 4F 4E A4 47 4F 54 4F 20 49 4E 53 54 52 55 |E ON.GOTO INSTRU| 00000760: 4B 54 49 45 3A 00 86 0F 8A 02 99 22 11 1D 32 30 |KTIE:......"..20| 00000770: 20 4F 4E 20 4B 2D 32 20 47 4F 54 4F 20 31 30 2C | ON K-2 GOTO 10,| 00000780: 20 4A 2C 20 33 30 00 AF 0F 94 02 99 22 11 1D 35 | J, 30......"..5| 00000790: 30 20 4F 4E 20 28 55 2D 56 29 2F 4C 20 47 4F 54 |0 ON (U-V)/L GOT| 000007A0: 4F 20 36 38 2C 20 35 35 2C 20 32 2C 20 38 38 00 |O 68, 55, 2, 88.| 000007B0: CE 0F 9E 02 99 22 11 1D 37 30 20 4F 4E 20 58 2C |....."..70 ON X,| 000007C0: 59 20 47 4F 54 4F 20 38 39 2C 20 36 36 11 00 E7 |Y GOTO 89, 66...| 000007D0: 0F A8 02 99 22 12 28 32 30 2C 35 30 20 4F 46 20 |....".(20,50 OF | 000007E0: 37 30 29 92 20 22 3B 00 14 10 B2 02 85 41 24 3A |70). ";......A$:| 000007F0: 8B 41 24 B3 B1 22 32 30 22 AF 41 24 B3 B1 22 35 |.A$.."20".A$.."5| 00000800: 30 22 AF 41 24 B3 B1 22 37 30 22 A7 99 51 24 3A |0".A$.."70"..Q$:| 00000810: 89 36 38 30 00 25 10 BC 02 8B 41 24 B2 22 37 30 |.680.%....A$."70| 00000820: 22 89 37 36 30 00 36 10 C6 02 8B 41 24 B2 22 35 |".760.6....A$."5| 00000830: 30 22 89 37 38 30 00 5F 10 D0 02 99 22 11 11 4E |0".780._...."..N| 00000840: 45 45 2C 20 44 49 54 20 49 53 20 47 45 45 4E 20 |EE, DIT IS GEEN | 00000850: 4A 55 49 53 54 45 20 4F 4E A4 47 4F 54 4F 2C 00 |JUISTE ON.GOTO,.| 00000860: 88 10 DA 02 99 22 4F 4D 44 41 54 20 52 45 47 45 |....."OMDAT REGE| 00000870: 4C 4E 55 4D 4D 45 52 53 20 47 45 45 4E 20 56 41 |LNUMMERS GEEN VA| 00000880: 52 49 41 42 45 4C 45 4E 00 9A 10 E4 02 99 22 4D |RIABELEN......"M| 00000890: 4F 47 45 4E 20 5A 49 4A 4E 2E 00 C3 10 EE 02 99 |OGEN ZIJN.......| 000008A0: 22 11 11 50 52 4F 42 45 45 52 20 48 45 54 20 4E |"..PROBEER HET N| 000008B0: 4F 47 20 45 45 4E 53 21 22 3A 8D 31 36 30 3A 89 |OG EENS!":.160:.| 000008C0: 36 33 30 00 EC 10 F8 02 99 22 11 11 4E 45 45 2C |630......"..NEE,| 000008D0: 20 44 49 54 20 49 53 20 47 45 45 4E 20 4A 55 49 | DIT IS GEEN JUI| 000008E0: 53 54 45 20 4F 4E A4 47 4F 54 4F 2C 00 17 11 02 |STE ON.GOTO,....| 000008F0: 03 99 22 4F 4D 44 41 54 20 12 58 2C 59 92 20 47 |.."OMDAT .X,Y. G| 00000900: 45 45 4E 20 45 58 50 52 45 53 53 49 45 20 49 53 |EEN EXPRESSIE IS| 00000910: 2E 22 3A 89 37 35 30 00 45 11 0C 03 99 22 11 11 |.":.750.E...."..| 00000920: 4B 4C 4F 50 54 21 20 52 45 47 45 4C 20 35 30 20 |KLOPT! REGEL 50 | 00000930: 49 53 20 45 45 4E 20 4A 55 49 53 54 45 20 4F 4E |IS EEN JUISTE ON| 00000940: A4 47 4F 54 4F 00 57 11 16 03 99 22 49 4E 53 54 |.GOTO.W...."INST| 00000950: 52 55 4B 54 49 45 2E 00 83 11 20 03 99 22 11 4D |RUKTIE.... ..".M| 00000960: 45 52 4B 20 4F 50 20 44 41 54 20 52 45 47 45 4C |ERK OP DAT REGEL| 00000970: 20 32 30 20 4F 4E 4A 55 49 53 54 20 49 53 20 44 | 20 ONJUIST IS D| 00000980: 4F 4F 52 00 AF 11 2A 03 99 22 44 45 20 12 4A 92 |OOR...*.."DE .J.| 00000990: 20 45 4E 20 52 45 47 45 4C 20 37 30 20 4F 4F 4B | EN REGEL 70 OOK| 000009A0: 20 4F 4E 4A 55 49 53 54 2C 20 4F 4D 44 41 54 00 | ONJUIST, OMDAT.| 000009B0: D4 11 34 03 99 22 12 58 2C 59 92 20 47 45 45 4E |..4..".X,Y. GEEN| 000009C0: 20 45 58 50 52 45 53 53 49 45 20 49 53 2E 22 3A | EXPRESSIE IS.":| 000009D0: 8D 31 36 30 00 EB 11 3E 03 99 22 93 11 22 A3 31 |.160...>.."..".1| 000009E0: 35 29 22 4F 4E A4 47 4F 53 55 42 00 16 12 48 03 |5)"ON.GOSUB...H.| 000009F0: 99 22 11 45 45 4E 20 49 4E 53 54 52 55 4B 54 49 |.".EEN INSTRUKTI| 00000A00: 45 20 44 49 45 20 4F 50 20 4F 4E A4 47 4F 54 4F |E DIE OP ON.GOTO| 00000A10: 20 4C 49 4A 4B 54 00 29 12 52 03 99 22 49 53 20 | LIJKT.).R.."IS | 00000A20: 4F 4E A4 47 4F 53 55 42 2E 00 56 12 5C 03 99 22 |ON.GOSUB..V.\.."| 00000A30: 11 44 45 20 4F 4E A4 47 4F 53 55 42 20 4C 41 41 |.DE ON.GOSUB LAA| 00000A40: 54 20 44 45 20 43 4F 4D 50 55 54 45 52 20 4E 41 |T DE COMPUTER NA| 00000A50: 41 52 20 45 45 4E 00 83 12 66 03 99 22 56 41 4E |AR EEN...f.."VAN| 00000A60: 20 56 45 52 53 43 48 45 49 44 45 4E 45 20 53 55 | VERSCHEIDENE SU| 00000A70: 42 52 4F 55 54 49 4E 45 53 20 53 50 52 49 4E 47 |BROUTINES SPRING| 00000A80: 45 4E 2C 00 AB 12 70 03 99 22 41 46 48 41 4E 4B |EN,...p.."AFHANK| 00000A90: 45 4C 49 4A 4B 20 56 41 4E 20 44 45 20 57 41 41 |ELIJK VAN DE WAA| 00000AA0: 52 44 45 20 56 41 4E 20 45 45 4E 00 BC 12 7A 03 |RDE VAN EEN...z.| 00000AB0: 99 22 45 58 50 52 45 53 53 49 45 2E 00 EA 12 84 |."EXPRESSIE.....| 00000AC0: 03 99 22 11 41 4C 53 20 45 45 4E 20 52 45 54 55 |..".ALS EEN RETU| 00000AD0: 52 4E 20 49 4E 53 54 52 55 4B 54 49 45 20 54 45 |RN INSTRUKTIE TE| 00000AE0: 47 45 4E 47 45 4B 4F 4D 45 4E 00 16 13 8E 03 99 |GENGEKOMEN......| 00000AF0: 22 57 4F 52 44 54 2C 20 53 50 52 49 4E 47 54 20 |"WORDT, SPRINGT | 00000B00: 44 45 20 43 4F 4D 50 55 54 45 52 20 54 45 52 55 |DE COMPUTER TERU| 00000B10: 47 20 4E 41 41 52 00 40 13 98 03 99 22 44 45 20 |G NAAR.@...."DE | 00000B20: 52 45 47 45 4C 20 4F 4E 4D 49 44 44 45 4C 49 4A |REGEL ONMIDDELIJ| 00000B30: 4B 20 4E 41 20 44 45 20 4F 4E A4 47 4F 53 55 42 |K NA DE ON.GOSUB| 00000B40: 00 52 13 A2 03 99 22 49 4E 53 54 52 55 4B 54 49 |.R...."INSTRUKTI| 00000B50: 45 2E 00 7D 13 AC 03 99 22 11 44 55 53 2C 20 52 |E..}....".DUS, R| 00000B60: 45 54 55 52 4E 20 57 45 52 4B 54 20 48 45 54 5A |ETURN WERKT HETZ| 00000B70: 45 4C 46 44 45 20 41 4C 53 20 42 49 4A 00 99 13 |ELFDE ALS BIJ...| 00000B80: B6 03 99 22 45 45 4E 20 47 4F 53 55 42 20 49 4E |..."EEN GOSUB IN| 00000B90: 53 54 52 55 4B 54 49 45 2E 00 B8 13 C0 03 8D 31 |STRUKTIE.......1| 00000BA0: 36 30 3A 99 22 93 11 45 45 4E 20 56 4F 4F 52 42 |60:."..EEN VOORB| 00000BB0: 45 45 4C 44 20 49 53 3A 00 D7 13 CA 03 99 22 11 |EELD IS:......".| 00000BC0: 1D 37 20 4F 4E 20 45 20 47 4F 53 55 42 20 35 30 |.7 ON E GOSUB 50| 00000BD0: 30 2C 20 31 30 30 30 00 05 14 D4 03 99 22 11 44 |0, 1000......".D| 00000BE0: 45 20 56 4F 52 4D 20 56 41 4E 20 44 45 20 4F 4E |E VORM VAN DE ON| 00000BF0: A4 47 4F 53 55 42 20 49 4E 53 54 52 55 4B 54 49 |.GOSUB INSTRUKTI| 00000C00: 45 20 49 53 3A 00 37 14 DE 03 99 22 11 12 52 45 |E IS:.7...."..RE| 00000C10: 47 45 4C 20 4E 4F 2E 92 20 4F 4E 20 12 58 92 20 |GEL NO.. ON .X. | 00000C20: 47 4F 53 55 42 20 12 4C 49 4A 53 54 20 56 41 4E |GOSUB .LIJST VAN| 00000C30: 20 52 45 47 45 4C 53 00 5C 14 E8 03 99 22 11 57 | REGELS.\....".W| 00000C40: 41 41 52 20 12 58 92 20 45 45 4E 20 56 41 52 49 |AAR .X. EEN VARI| 00000C50: 41 42 45 4C 45 20 4F 46 20 45 45 4E 00 77 14 F2 |ABELE OF EEN.w..| 00000C60: 03 99 22 49 4E 53 54 52 55 4B 54 49 45 20 49 53 |.."INSTRUKTIE IS| 00000C70: 2E 22 3A 8D 31 36 30 00 87 14 FC 03 43 24 B2 22 |.":.160.....C$."| 00000C80: A6 22 3A 8D 31 33 30 00 AC 14 06 04 99 22 13 11 |.":.130......"..| 00000C90: 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 45 49 4E |.............EIN| 00000CA0: 44 45 20 56 41 4E 20 4C 45 53 20 38 00 B2 14 10 |DE VAN LES 8....| 00000CB0: 04 80 00 00 00 49 45 45 |.....IEE |
....... +++ 8.2 +++.%.D.A.198:.G(142).:.
N..53281,9:.646,10.D.X.Q$.".
.":.170......".";:.I.1.39:.
C$;:.:.I.1.22:.".."C$;:.:.".";......I.1.
38:."."C$".";:.:.C$.N....I.1.23:."."C$".
";:.:.... ..A,0:.A,255:.A,0:......."..".
10)"GOSUB (VERVOLG)......"..2 LET A=1.'.
...".4 GOSUB 10.8.H..".6 PRINT A.I.R..".
8 GOTO 12.^....".10 LET A=A*10.L....".12
END......".WAT ZAL ER AFGEDRUKT WORDEN,
ALS DIT......"PROGRAMMA UITGEVOERD WORD
T:......"..1.. 1",".2.. 10",".3.. NIETS.
......"(1,2 OF 3) " ;......A$:.A$.."1".A
$.."2".A$.."3"..Q$:.270./."..A$."3".350.
?.,..A$."2".340.O.6.."..NEE, U VERGEET D
AT DE GOSUB DE COMPUTER...@.."NAAR REGEL
10 LAAT SPRINGEN....J.."..PROBEER HET N
OG EENS!":.160:.170...T.."..NEE, WAAR IS
DE RETURN INSTRUKTIE!":.330...^.."..DAT
KLOPT! NIETS WORDT ER AFGEDRUKT..D.H.."
.ALS WE .A. ZOUDEN WILLEN AFDRUKKEN,.R.R
.."MOETEN WE .11 RETURN. AAN HET PROGRAM
MA...|.."TOEVOEGEN.":.160......".".13)"O
N.GOTO.M....".HET GOTO COMMANDO LAAT DE
COMPUTER NAAR......"EEN BEPAALDE REGEL I
N HET PROGRAMMA......"SPRINGEN TIJDENS D
E UITVOERING..I....".OP DEZELFDE MANIER
LAAT .ON.GOTO. DE.R...."COMPUTER NAAR EE
N VAN VERSCHEIDENE...B.."MOGELIJKE REGEL
S SPRINGEN, AFHANKELIJK.F.L.."VAN DE WAA
RDE VAN EEN EXPRESSIE....V..".EEN VOORBE
ELD VAN EEN .ON.GOTO......."INSTRUKTIE I
S:......"..80 ON J GOTO 10, 90.I....".AL
S J DE WAARDE 1 HEEFT, SPRINGT DE.G...."
COMPUTER NAAR REGEL 10.......".ALS J DE
WAARDE 2 HEEFT, SPRINGT DE......"COMPUTE
R NAAR REGEL 90.......".ALS J EEN ANDERE
WAARDE HEEFT, DAN ZAL...&.."DE REGEL VO
LGEND OP 80 UITGEVOERD WORDEN..":.160.C.
0.."..DE VORM VAN DE ON.GOTO INSTRUKTIE
IS:.T.:.."..REGEL NO.. ON .X. GOTO .LIJS
T VAN REGELS...D..".WAAR X EEN VARIABELE
OF EXPRESSIE IS..I.N.."..HIER ZIJN NOG
TWEE VOORBEELDEN:...X.."...2 ON F GOTO 5
, 5, 6...B.."..14 ON V+2 GOTO 33, 10, 2,
2...L..160.@.V.."..WELKE VAN DE VOLGEND
E VOORBEELDEN IS.E...."EEN JUISTE ON.GOT
O INSTRUKTIE:......"..20 ON K-2 GOTO 10,
J, 30......"..50 ON (U-V)/L GOTO 68, 55
, 2, 88.N...."..70 ON X,Y GOTO 89, 66...
....".(20,50 OF 70). ";......A$:.A$.."20
".A$.."50".A$.."70"..Q$:.680.%....A$."70
".760.6.F..A$."50".780._.P.."..NEE, DIT
IS GEEN JUISTE ON.GOTO,...Z.."OMDAT REGE
LNUMMERS GEEN VARIABELEN......"MOGEN ZIJ
N..C...."..PROBEER HET NOG EENS!":.160:.
630......"..NEE, DIT IS GEEN JUISTE ON.G
OTO,......"OMDAT .X,Y. GEEN EXPRESSIE IS
.":.750.E...."..KLOPT! REGEL 50 IS EEN J
UISTE ON.GOTO.W...."INSTRUKTIE.... ..".M
ERK OP DAT REGEL 20 ONJUIST IS DOOR...*.
."DE .J. EN REGEL 70 OOK ONJUIST, OMDAT.
T.4..".X,Y. GEEN EXPRESSIE IS.":.160...>
.."..".15)"ON.GOSUB...H..".EEN INSTRUKTI
E DIE OP ON.GOTO LIJKT.).R.."IS ON.GOSUB
..V.\..".DE ON.GOSUB LAAT DE COMPUTER NA
AR EEN...F.."VAN VERSCHEIDENE SUBROUTINE
S SPRINGEN,...P.."AFHANKELIJK VAN DE WAA
RDE VAN EEN...Z.."EXPRESSIE.......".ALS
EEN RETURN INSTRUKTIE TEGENGEKOMEN......
"WORDT, SPRINGT DE COMPUTER TERUG NAAR.@
...."DE REGEL ONMIDDELIJK NA DE ON.GOSUB
.R...."INSTRUKTIE..}....".DUS, RETURN WE
RKT HETZELFDE ALS BIJ......"EEN GOSUB IN
STRUKTIE.......160:."..EEN VOORBEELD IS:
.W.J.."..7 ON E GOSUB 500, 1000...T..".D
E VORM VAN DE ON.GOSUB INSTRUKTIE IS:.7.
..."..REGEL NO.. ON .X. GOSUB .LIJST VAN
REGELS.\....".WAAR .X. EEN VARIABELE OF
EEN.W...."INSTRUKTIE IS.":.160.....C$."
.":.130......"...............EINDE VAN L
ES 8.........IEE
> CLICK IMAGE PREVIEW FOR FULL MODAL