> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3D 08 64 00 8F 20 49 4E 54 45 52 41 43 54 |..=.d.. INTERACT|
00000010: 49 56 45 20 47 52 4F 57 54 48 20 50 41 54 54 45 |IVE GROWTH PATTE|
00000020: 52 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |RN |
00000030: 53 4F 46 54 57 41 52 45 20 32 30 30 31 00 78 08 |SOFTWARE 2001.x.|
00000040: 6E 00 99 22 93 11 11 54 48 49 53 20 50 52 4F 47 |n.."...THIS PROG|
00000050: 52 41 4D 20 43 4F 4D 50 55 54 45 53 22 3A 99 22 |RAM COMPUTES":."|
00000060: 54 48 45 20 47 52 4F 57 54 48 20 50 41 54 54 45 |THE GROWTH PATTE|
00000070: 52 4E 20 42 45 2D 22 3B 00 AA 08 78 00 99 22 54 |RN BE-";...x.."T|
00000080: 57 45 45 4E 20 41 20 51 55 41 4E 54 49 54 59 20 |WEEN A QUANTITY |
00000090: 59 22 3A 99 22 28 54 48 45 20 44 45 53 54 52 4F |Y":."(THE DESTRO|
000000A0: 59 45 52 29 20 41 4E 44 20 41 00 CC 08 82 00 99 |YER) AND A......|
000000B0: 22 51 55 41 4E 54 49 54 59 20 58 20 28 54 48 45 |"QUANTITY X (THE|
000000C0: 20 43 52 45 41 2D 20 54 4F 52 29 2E 00 FE 08 8C | CREA- TOR).....|
000000D0: 00 99 22 58 20 43 41 4E 20 50 52 4F 50 41 47 41 |.."X CAN PROPAGA|
000000E0: 54 45 2C 20 41 4E 44 22 3A 99 22 4F 4E 20 41 20 |TE, AND":."ON A |
000000F0: 43 48 41 4E 43 45 20 4D 45 54 54 49 4E 47 00 31 |CHANCE METTING.1|
00000100: 09 96 00 99 22 42 45 54 57 45 45 4E 20 58 20 41 |...."BETWEEN X A|
00000110: 4E 44 20 59 2C 20 58 20 49 53 22 3A 99 22 44 45 |ND Y, X IS":."DE|
00000120: 53 54 52 4F 59 45 44 2C 20 54 48 55 53 20 49 4E |STROYED, THUS IN|
00000130: 2D 00 52 09 A0 00 99 22 43 52 45 41 53 49 4E 47 |-.R...."CREASING|
00000140: 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 59 27 | THE NUMBER OFY'|
00000150: 53 2E 00 6B 09 AA 00 99 22 11 20 20 20 50 52 45 |S..k....". PRE|
00000160: 53 53 20 12 52 45 54 55 52 4E 92 00 82 09 B4 00 |SS .RETURN......|
00000170: A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 31 |.A$:.A$...(13).1|
00000180: 38 30 00 A6 09 BE 00 99 22 93 11 11 11 11 4E 55 |80......".....NU|
00000190: 4D 42 45 52 20 4F 46 20 44 45 53 54 52 4F 59 45 |MBER OF DESTROYE|
000001A0: 52 53 22 3A 85 59 00 C7 09 C8 00 99 22 11 4E 55 |RS":.Y......".NU|
000001B0: 4D 42 45 52 20 4F 46 20 43 52 45 41 54 4F 52 53 |MBER OF CREATORS|
000001C0: 28 58 29 22 3A 85 58 00 E8 09 D2 00 99 22 11 50 |(X)":.X......".P|
000001D0: 52 4F 50 41 47 41 54 49 4F 4E 20 52 41 54 45 20 |ROPAGATION RATE |
000001E0: 4F 46 20 58 22 3A 85 5A 00 1C 0A DC 00 99 22 11 |OF X":.Z......".|
000001F0: 43 48 41 4E 43 45 20 4F 46 20 4D 45 45 54 49 4E |CHANCE OF MEETIN|
00000200: 47 20 42 45 2D 22 3A 99 22 54 57 45 45 4E 20 58 |G BE-":."TWEEN X|
00000210: 20 41 4E 44 20 59 20 3D 22 3A 85 41 00 3C 0A E6 | AND Y =":.A.<..|
00000220: 00 99 22 11 54 49 4D 45 20 42 45 54 57 45 45 4E |..".TIME BETWEEN|
00000230: 20 53 41 4D 50 4C 45 53 22 3A 85 48 00 5B 0A F0 | SAMPLES":.H.[..|
00000240: 00 99 22 11 4D 41 58 49 4D 55 4D 20 47 45 4E 45 |..".MAXIMUM GENE|
00000250: 52 41 54 49 4F 4E 53 22 3A 85 4B 00 63 0A FA 00 |RATIONS":.K.c...|
00000260: 4A B2 30 00 8D 0A 04 01 99 22 93 49 4E 54 45 52 |J.0......".INTER|
00000270: 41 43 54 49 56 45 20 47 52 4F 57 54 48 22 3A 99 |ACTIVE GROWTH":.|
00000280: 22 20 20 20 20 50 41 54 54 45 52 4E 11 00 AB 0A |" PATTERN....|
00000290: 0E 01 99 22 43 52 45 41 54 4F 52 22 A3 31 32 29 |..."CREATOR".12)|
000002A0: 22 44 45 53 54 52 4F 59 45 52 11 00 B8 0A 18 01 |"DESTROYER......|
000002B0: 8B 4A B2 4B A7 34 38 30 00 E1 0A 22 01 4A B2 4A |.J.K.480...".J.J|
000002C0: AA 31 3A 42 B2 41 AC 58 AC 59 3A 43 B2 28 28 59 |.1:B.A.X.Y:C.((Y|
000002D0: AB 42 29 AC 48 29 AA 59 3A 8B 43 B3 30 A7 34 30 |.B).H).Y:.C.0.40|
000002E0: 30 00 E9 0A 2C 01 59 B2 43 00 FF 0A 36 01 44 B2 |0...,.Y.C...6.D.|
000002F0: 28 28 28 58 AC 5A 29 AB 42 29 AC 48 29 AA 58 00 |(((X.Z).B).H).X.|
00000300: 0C 0B 40 01 8B 44 B3 30 A7 32 33 30 00 14 0B 4A |..@..D.0.230...J|
00000310: 01 58 B2 44 00 26 0B 54 01 4D B2 B5 28 58 29 3A |.X.D.&.T.M..(X):|
00000320: 4E B2 B5 28 59 29 00 32 0B 5E 01 99 4D A3 31 32 |N..(Y).2.^..M.12|
00000330: 29 4E 00 3F 0B 68 01 8B 4D B2 30 A7 33 38 30 00 |)N.?.h..M.0.380.|
00000340: 48 0B 72 01 89 32 38 30 00 55 0B 7C 01 8B 4E B2 |H.r..280.U.|..N.|
00000350: 30 A7 34 34 30 00 5E 0B 86 01 89 32 38 30 00 66 |0.440.^....280.f|
00000360: 0B 90 01 59 B2 30 00 6F 0B 9A 01 89 33 31 30 00 |...Y.0.o....310.|
00000370: 77 0B A4 01 58 B2 30 00 80 0B AE 01 89 33 34 30 |w...X.0......340|
00000380: 00 98 0B B8 01 99 22 41 4C 4C 20 47 52 4F 57 54 |......"ALL GROWT|
00000390: 48 20 45 4E 44 45 44 11 00 BD 0B C2 01 99 22 4E |H ENDED......."N|
000003A0: 55 4D 42 45 52 20 4F 46 20 47 45 4E 45 52 41 54 |UMBER OF GENERAT|
000003B0: 49 4F 4E 53 22 3A 99 22 3D 20 22 3B 4A 00 C3 0B |IONS":."= ";J...|
000003C0: CC 01 99 00 CC 0B D6 01 89 35 35 30 00 FA 0B E0 |.........550....|
000003D0: 01 99 22 4D 41 58 49 4D 55 4D 20 4E 55 4D 42 45 |.."MAXIMUM NUMBE|
000003E0: 52 20 4F 46 20 47 45 2D 20 4E 45 52 41 54 49 4F |R OF GE- NERATIO|
000003F0: 4E 53 20 52 45 41 43 48 45 44 00 2D 0C EA 01 99 |NS REACHED.-....|
00000400: 22 46 4F 52 20 46 55 52 54 48 45 52 20 47 45 4E |"FOR FURTHER GEN|
00000410: 45 52 41 2D 22 3A 99 22 54 49 4F 4E 53 20 54 59 |ERA-":."TIONS TY|
00000420: 50 45 20 31 2C 49 46 20 4E 4F 54 20 30 00 34 0C |PE 1,IF NOT 0.4.|
00000430: F4 01 85 57 00 41 0C FE 01 8B 57 B2 31 A7 35 33 |...W.A....W.1.53|
00000440: 30 00 4A 0C 08 02 89 35 35 30 00 6A 0C 12 02 99 |0.J....550.j....|
00000450: 22 4D 41 58 49 4D 55 4D 20 47 45 4E 45 52 41 54 |"MAXIMUM GENERAT|
00000460: 49 4F 4E 53 20 3D 22 3A 85 4B 00 73 0C 1C 02 89 |IONS =":.K.s....|
00000470: 32 38 30 00 9D 0C 26 02 99 22 11 46 4F 52 20 4E |280...&..".FOR N|
00000480: 45 58 54 20 50 41 54 54 45 52 4E 20 54 59 50 45 |EXT PATTERN TYPE|
00000490: 20 31 2C 20 30 20 54 4F 20 53 54 4F 50 00 A4 0C | 1, 0 TO STOP...|
000004A0: 30 02 85 57 00 B1 0C 3A 02 8B 57 B2 31 A7 35 39 |0..W...:..W.1.59|
000004B0: 30 00 BC 0C 44 02 99 22 93 22 3A 90 00 C2 0C 4E |0...D..".":....N|
000004C0: 02 99 00 CB 0C 58 02 89 31 39 30 00 D1 0C 62 02 |.....X..190...b.|
000004D0: 80 00 00 00 |.... |
..=.D.. INTERACTIVE GROWTH PATTERN
SOFTWARE 2001.X.N.."...THIS PROG
RAM COMPUTES":."THE GROWTH PATTERN BE-";
...X.."TWEEN A QUANTITY Y":."(THE DESTRO
YER) AND A.L...."QUANTITY X (THE CREA- T
OR)......."X CAN PROPAGATE, AND":."ON A
CHANCE METTING.1...."BETWEEN X AND Y, X
IS":."DESTROYED, THUS IN-.R. .."CREASING
THE NUMBER OFY'S..K....". PRESS .RETU
RN.......A$:.A$..G(13).180......".....NU
MBER OF DESTROYERS":.Y.G.H..".NUMBER OF
CREATORS(X)":.X...R..".PROPAGATION RATE
OF X":.Z......".CHANCE OF MEETING BE-":.
"TWEEN X AND Y =":.A.<....".TIME BETWEEN
SAMPLES":.H.[....".MAXIMUM GENERATIONS"
:.K.C...J.0......".INTERACTIVE GROWTH":.
" PATTERN......."CREATOR".12)"DESTROY
ER.......J.K.480...".J.J.1:B.A.X.Y:C.((Y
.B).H).Y:.C.0.400...,.Y.C...6.D.(((X.Z).
B).H).X...@..D.0.230...J.X.D.&.T.M..(X):
N..(Y).2.^..M.12)N.?.H..M.0.380.H.R..280
.U.|..N.0.440.^....280.F...Y.0.O....310.
W...X.0......340......"ALL GROWTH ENDED.
...B.."NUMBER OF GENERATIONS":."= ";J.C.
L...L.V..550......"MAXIMUM NUMBER OF GE-
NERATIONS REACHED.-...."FOR FURTHER GEN
ERA-":."TIONS TYPE 1,IF NOT 0.4....W.A..
..W.1.530.J....550.J...."MAXIMUM GENERAT
IONS =":.K.S....280...&..".FOR NEXT PATT
ERN TYPE 1, 0 TO STOP...0..W...:..W.1.59
0...D..".":..B.N...K.X..190.Q.B.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL