> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 E8 03 87 20 53 43 48 45 52 4D 52 45 |....... SCHERMRE|
00000010: 47 45 4C 00 27 08 ED 03 88 20 53 50 41 54 49 45 |GEL.'.... SPATIE|
00000020: 24 B2 C7 28 33 32 29 00 30 08 F2 03 87 20 41 24 |$..(32).0.... A$|
00000030: 00 3C 08 F7 03 8D 20 31 31 30 30 30 00 4D 08 FC |.<.... 11000.M..|
00000040: 03 88 20 C3 47 54 45 B2 C3 28 41 24 29 00 59 08 |.. .GTE..(A$).Y.|
00000050: 10 04 8D 20 31 30 30 30 30 00 68 08 1A 04 99 20 |... 10000.h.... |
00000060: 22 4B 4C 41 41 52 2E 22 00 6E 08 0F 27 80 00 81 |"KLAAR.".n..'...|
00000070: 08 10 27 8F 20 5A 49 4E 20 41 46 42 52 45 4B 45 |..'. ZIN AFBREKE|
00000080: 4E 00 87 08 1A 27 3A 00 A3 08 24 27 57 48 49 4C |N....':...$'WHIL|
00000090: 45 20 C3 47 54 45 B1 B2 53 43 48 45 52 4D 52 45 |E .GTE..SCHERMRE|
000000A0: 47 45 4C 00 BC 08 38 27 3A 20 20 88 20 4B B2 53 |GEL...8': . K.S|
000000B0: 43 48 45 52 4D 52 45 47 45 4C AA 31 00 E2 08 42 |CHERMREGEL.1...B|
000000C0: 27 3A 20 20 57 48 49 4C 45 20 CA 28 41 24 2C 4B |': WHILE .(A$,K|
000000D0: 2C 31 29 B3 B1 53 50 41 54 49 45 24 20 AF 20 4B |,1)..SPATIE$ . K|
000000E0: B1 31 00 F3 08 4C 27 3A 20 20 20 20 88 20 4B B2 |.1...L': . K.|
000000F0: 4B AB 31 00 FD 08 51 27 3A 20 20 57 80 00 2F 09 |K.1...Q': W../.|
00000100: 52 27 3A 20 20 8B 20 CA 28 41 24 2C 4B 2C 31 29 |R': . .(A$,K,1)|
00000110: B2 53 50 41 54 49 45 24 20 A7 20 8D 20 31 30 33 |.SPATIE$ . . 103|
00000120: 30 30 20 45 4C 53 45 20 8D 20 31 30 32 30 30 00 |00 ELSE . 10200.|
00000130: 50 09 56 27 3A 20 20 99 20 4C 24 3B A3 53 43 48 |P.V': . L$;.SCH|
00000140: 45 52 4D 52 45 47 45 4C AA 31 29 3B 22 3C 3C 22 |ERMREGEL.1);"<<"|
00000150: 00 5F 09 60 27 3A 20 20 88 20 41 24 B2 52 24 00 |._.`': . A$.R$.|
00000160: 73 09 7E 27 3A 20 20 88 20 C3 47 54 45 B2 C3 28 |s.~': . .GTE..(|
00000170: 41 24 29 00 7A 09 88 27 57 80 00 80 09 92 27 3A |A$).z..'W.....':|
00000180: 00 9E 09 9C 27 99 20 41 24 3B A3 53 43 48 45 52 |....'. A$;.SCHER|
00000190: 4D 52 45 47 45 4C AA 31 29 3B 22 3C 3C 22 00 A4 |MREGEL.1);"<<"..|
000001A0: 09 D7 27 8E 00 CB 09 D8 27 8F 20 2A 2A 20 57 4F |..'.....'. ** WO|
000001B0: 4F 52 44 20 4C 41 4E 47 45 52 20 44 41 4E 20 45 |ORD LANGER DAN E|
000001C0: 45 4E 20 52 45 47 45 4C 20 2A 2A 00 E6 09 E2 27 |EN REGEL **....'|
000001D0: 88 20 4C 24 B2 C8 28 41 24 2C 53 43 48 45 52 4D |. L$..(A$,SCHERM|
000001E0: 52 45 47 45 4C 29 00 06 0A EC 27 88 20 52 24 B2 |REGEL)....'. R$.|
000001F0: C9 28 41 24 2C C3 47 54 45 AB 53 43 48 45 52 4D |.(A$,.GTE.SCHERM|
00000200: 52 45 47 45 4C 29 00 0C 0A F6 27 8E 00 3B 0A 3C |REGEL)....'..;.<|
00000210: 28 8F 20 2A 2A 20 53 50 41 54 49 45 28 53 29 20 |(. ** SPATIE(S) |
00000220: 54 55 53 53 45 4E 20 57 4F 4F 52 44 45 4E 20 57 |TUSSEN WOORDEN W|
00000230: 45 47 47 4F 4F 49 45 4E 20 2A 2A 00 4E 0A 46 28 |EGGOOIEN **.N.F(|
00000240: 88 20 4C 24 B2 C8 28 41 24 2C 4B AB 31 29 00 73 |. L$..(A$,K.1).s|
00000250: 0A 50 28 57 48 49 4C 45 20 CA 28 41 24 2C 4B 2C |.P(WHILE .(A$,K,|
00000260: 31 29 B2 53 50 41 54 49 45 24 20 AF 20 4B B3 C3 |1).SPATIE$ . K..|
00000270: 47 54 45 00 82 0A 5A 28 3A 20 20 88 20 4B B2 4B |GTE...Z(: . K.K|
00000280: AA 31 00 89 0A 64 28 57 80 00 BD 0A 6E 28 8B 20 |.1...d(W....n(. |
00000290: CA 28 41 24 2C 4B 2C 31 29 B2 53 50 41 54 49 45 |.(A$,K,1).SPATIE|
000002A0: 24 20 A7 20 88 20 52 24 B2 22 22 20 45 4C 53 45 |$ . . R$."" ELSE|
000002B0: 20 88 20 52 24 B2 CA 28 41 24 2C 4B 29 00 C3 0A | . R$..(A$,K)...|
000002C0: 78 28 8E 00 D1 0A F8 2A 8F 20 4C 41 59 2D 4F 55 |x(.....*. LAY-OU|
000002D0: 54 00 D9 0A 02 2B 43 4C 53 00 1A 0B 0C 2B 99 20 |T....+CLS....+. |
000002E0: 22 44 45 20 56 4F 4C 47 45 4E 44 45 20 5A 49 4E |"DE VOLGENDE ZIN|
000002F0: 20 57 4F 52 44 54 20 4E 45 54 4A 45 53 20 4F 50 | WORDT NETJES OP|
00000300: 20 48 45 4C 45 20 57 4F 4F 52 44 45 4E 20 41 46 | HELE WOORDEN AF|
00000310: 47 45 42 52 4F 4B 45 4E 3A 22 00 20 0B 16 2B 99 |GEBROKEN:". ..+.|
00000320: 00 29 0B 20 2B 99 20 41 24 00 2F 0B 2A 2B 99 00 |.). +. A$./.*+..|
00000330: 56 0B 34 2B 99 22 44 45 20 52 45 43 48 54 45 52 |V.4+."DE RECHTER|
00000340: 4B 41 4E 54 4C 49 4A 4E 20 4C 4F 4F 50 54 20 54 |KANTLIJN LOOPT T|
00000350: 4F 54 20 3C 3C 22 00 5C 0B 3E 2B 99 00 62 0B 52 |OT <<".\.>+..b.R|
00000360: 2B 8E 00 92 0B A8 61 8F 20 47 45 47 45 56 45 4E |+.....a. GEGEVEN|
00000370: 53 20 53 43 48 45 52 4D 4C 45 4E 47 54 45 20 45 |S SCHERMLENGTE E|
00000380: 4E 20 41 46 20 54 45 20 42 52 45 4B 45 4E 20 5A |N AF TE BREKEN Z|
00000390: 49 4E 00 9B 0B B2 61 83 20 34 30 00 E2 0B BC 61 |IN....a. 40....a|
000003A0: 83 20 22 44 49 54 20 49 53 20 45 45 4E 20 5A 49 |. "DIT IS EEN ZI|
000003B0: 4E 20 44 49 45 20 4E 45 54 4A 45 53 20 4F 50 20 |N DIE NETJES OP |
000003C0: 48 45 54 20 53 43 48 45 52 4D 20 41 46 47 45 42 |HET SCHERM AFGEB|
000003D0: 52 4F 4B 45 4E 20 4D 4F 45 54 20 57 4F 52 44 45 |ROKEN MOET WORDE|
000003E0: 4E 22 00 24 0C C6 61 83 20 22 41 46 47 45 44 52 |N".$..a. "AFGEDR|
000003F0: 55 4B 54 2C 20 45 4E 20 57 41 41 52 4D 45 45 20 |UKT, EN WAARMEE |
00000400: 48 45 54 20 54 45 20 4F 4E 54 57 45 52 50 45 4E |HET TE ONTWERPEN|
00000410: 20 50 52 4F 47 52 41 4D 4D 41 20 47 4F 45 44 20 | PROGRAMMA GOED |
00000420: 4D 45 45 22 00 40 0C D0 61 83 20 22 4F 4D 20 4D |MEE".@..a. "OM M|
00000430: 4F 45 54 20 4B 55 4E 4E 45 4E 20 47 41 41 4E 22 |OET KUNNEN GAAN"|
00000440: 00 00 00 |... |
....... SCHERMREGEL.'.... SPATIE$.G(32).
0.... A$.<.... 11000.M.... CGTE.C(A$).Y.
... 10000.H.... "KLAAR.".N..'.....'. ZIN
AFBREKEN....':...$'WHILE CGTE..SCHERMRE
GEL...8': . K.SCHERMREGEL.1...B': WHIL
E J(A$,K,1)..SPATIE$ . K.1...L': . K.
K.1...Q': W../.R': . J(A$,K,1).SPATIE$
. . 10300 ELSE . 10200.P.V': . L$;.SCH
ERMREGEL.1);"<<"._.`': . A$.R$.S.~': .
CGTE.C(A$).Z..'W.....':....'. A$;.SCHER
MREGEL.1);"<<"...W'..K.X'. ** WOORD LANG
ER DAN EEN REGEL **....'. L$.H(A$,SCHERM
REGEL)....'. R$.I(A$,CGTE.SCHERMREGEL)..
..'..;.<(. ** SPATIE(S) TUSSEN WOORDEN W
EGGOOIEN **.N.F(. L$.H(A$,K.1).S.P(WHILE
J(A$,K,1).SPATIE$ . K.CGTE...Z(: . K.K
.1...D(W....N(. J(A$,K,1).SPATIE$ . . R$
."" ELSE . R$.J(A$,K).C.X(..Q..*. LAY-OU
T.Y..+CLS....+. "DE VOLGENDE ZIN WORDT N
ETJES OP HELE WOORDEN AFGEBROKEN:". ..+.
.). +. A$./.*+..V.4+."DE RECHTERKANTLIJN
LOOPT TOT <<".\.>+..B.R+.....A. GEGEVEN
S SCHERMLENGTE EN AF TE BREKEN ZIN....A.
40....A. "DIT IS EEN ZIN DIE NETJES OP
HET SCHERM AFGEBROKEN MOET WORDEN".$.FA.
"AFGEDRUKT, EN WAARMEE HET TE ONTWERPEN
PROGRAMMA GOED MEE".@.PA. "OM MOET KUNN
EN GAAN"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL