LEMON
FILE INFORMATION
FILENAME(S): LEMON
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-11-30 21:07:05
APPEARS ON: 1 disk(s)
FILE HASH
54b930a1ce3910989cb07debd269726224608d0c1197399258ec2b9f286f7545
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PET GAMES 01 | LEMON | PRG | DuncanTwain | 8 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0A 04 01 00 89 31 30 30 00 14 04 02 00 89 |.......100......|
00000010: 37 35 30 30 00 1E 04 03 00 89 34 33 30 30 00 28 |7500......4300.(|
00000020: 04 04 00 89 34 34 30 30 00 2E 04 05 00 8E 00 47 |....4400.......G|
00000030: 04 64 00 8F 20 52 55 4E 20 4C 45 4D 4F 4E 41 44 |.d.. RUN LEMONAD|
00000040: 45 20 53 54 41 4E 44 00 56 04 82 00 4D 44 B2 33 |E STAND.V...MD.3|
00000050: 3A 8D 39 39 30 30 00 61 04 8C 00 8F 20 49 4E 49 |:.9900.a.... INI|
00000060: 54 00 97 04 96 00 86 20 4C 28 4D 44 29 2C 53 28 |T...... L(MD),S(|
00000070: 4D 44 29 2C 50 28 4D 44 29 2C 4E 28 4D 44 29 2C |MD),P(MD),N(MD),|
00000080: 4D 28 4D 44 29 2C 45 28 4D 44 29 2C 52 28 4D 44 |M(MD),E(MD),R(MD|
00000090: 29 2C 41 28 4D 44 29 00 AC 04 90 01 53 32 B2 33 |),A(MD).....S2.3|
000000A0: 30 3A 43 32 B2 31 3A 43 39 B2 2E 35 00 C1 04 9A |0:C2.1:C9..5....|
000000B0: 01 53 32 B2 33 30 3A 43 32 B2 31 3A 43 39 B2 2E |.S2.30:C2.1:C9..|
000000C0: 35 00 DD 04 AE 01 41 32 B2 32 3A 53 33 B2 2E 31 |5.....A2.2:S3..1|
000000D0: 35 3A 48 B2 31 30 30 3A 48 46 B2 2E 35 00 F7 04 |5:H.100:HF..5...|
000000E0: B8 01 99 22 93 22 3A 44 B2 30 3A 44 44 B2 30 3A |...".":D.0:DD.0:|
000000F0: 41 28 30 29 B2 41 32 00 0C 05 E0 01 96 A5 43 28 |A(0).A2.......C(|
00000100: 44 29 B2 B5 28 48 AC 44 AA 48 46 29 00 2A 05 F4 |D)..(H.D.HF).*..|
00000110: 01 99 A3 31 30 29 22 54 48 45 20 4C 45 4D 4F 4E |...10)"THE LEMON|
00000120: 41 44 45 20 53 54 41 4E 44 11 00 51 05 F9 01 99 |ADE STAND..Q....|
00000130: 22 49 CE A0 D4 C8 C9 D3 A0 C7 C1 CD C5 2C 20 D9 |"I..........., .|
00000140: CF D5 20 C3 C1 CE A0 C1 CE D3 D7 C5 D2 20 59 45 |.. .......... YE|
00000150: 53 00 7A 05 FB 01 99 22 D4 CF A0 C1 A0 D1 D5 C5 |S.z...."........|
00000160: D3 D4 C9 CF CE A0 C2 D9 A0 D0 D2 C5 D3 D3 C9 CE |................|
00000170: C7 A0 52 45 54 55 52 4E 2E 11 00 A5 05 FE 01 99 |..RETURN........|
00000180: 20 22 44 CF A0 D9 CF D5 A0 D7 C1 CE D4 A0 C9 CE | "D.............|
00000190: D3 D4 D2 D5 C3 D4 C9 CF CE D3 20 3F 20 22 3B 3A |.......... ? ";:|
000001A0: 8D 39 35 30 30 00 B2 05 08 02 8B A8 59 4E 89 37 |.9500.......YN.7|
000001B0: 30 30 00 EA 05 1C 02 99 3A 4F 55 24 B2 22 93 59 |00......:OU$.".Y|
000001C0: CF D5 A0 C1 D2 C5 A0 C9 CE A0 C3 C8 C1 D2 C7 C5 |................|
000001D0: A0 CF C6 A0 C1 A0 CC C5 CD CF CE C1 C4 C5 20 D3 |.............. .|
000001E0: D4 C1 CE C4 2E 20 22 3A 8D 32 00 1C 06 26 02 4F |..... ":.2...&.O|
000001F0: 55 24 B2 22 49 D4 20 C3 CF D3 D4 D3 A0 D9 CF D5 |U$."I. .........|
00000200: A0 CD CF CE C5 D9 A0 D4 CF A0 CD C1 CB C5 A0 CC |................|
00000210: C5 CD CF CE C1 C4 C5 20 22 3A 8D 32 00 52 06 30 |....... ":.2.R.0|
00000220: 02 4F 55 24 B2 22 C1 CE C4 A0 D4 CF A0 C1 C4 D6 |.OU$."..........|
00000230: C5 D2 D4 C9 D3 C5 A0 D9 CF D5 D2 A0 D3 D4 C1 CE |................|
00000240: C4 2E 20 54 C8 C5 20 CF C2 CA C5 C3 D4 20 22 3A |.. T.. ...... ":|
00000250: 8D 32 00 86 06 3A 02 4F 55 24 B2 22 C9 D3 A0 D4 |.2...:.OU$."....|
00000260: CF A0 CD C1 CB C5 A0 C4 C5 C3 C9 D3 C9 CF CE D3 |................|
00000270: A0 D3 CF A0 C1 D3 A0 D4 CF A0 C5 C1 D2 CE 20 C1 |.............. .|
00000280: D3 20 22 3A 8D 32 00 AB 06 44 02 4F 55 24 B2 22 |. ":.2...D.OU$."|
00000290: CD D5 C3 C8 A0 CD CF CE C5 D9 A0 C1 D3 A0 D0 CF |................|
000002A0: D3 D3 C9 C2 CC C5 2E 22 3A 8D 32 00 E1 06 58 02 |.......":.2...X.|
000002B0: 99 3A 99 3A 4F 55 24 B2 22 27 41 D3 D3 C5 D4 D3 |.:.:OU$."'A.....|
000002C0: 27 20 C1 D2 C5 A0 C8 CF D7 A0 CD D5 C3 C8 A0 D9 |' ..............|
000002D0: CF D5 D2 A0 CC C5 CD CF CE C1 C4 C5 20 22 3A 8D |............ ":.|
000002E0: 32 00 15 07 62 02 4F 55 24 B2 22 C2 D5 D3 C9 CE |2...b.OU$.".....|
000002F0: C5 D3 D3 A0 C9 D3 A0 D7 CF D2 D4 C8 2E 20 59 CF |............. Y.|
00000300: D5 A0 C3 C1 CE A0 D3 D0 C5 CE C4 A0 D9 CF D5 D2 |................|
00000310: 20 22 3A 8D 32 00 46 07 6C 02 4F 55 24 B2 22 C1 | ":.2.F.l.OU$.".|
00000320: D3 D3 C5 D4 D3 A0 D4 CF A0 C2 D5 D9 A0 CC C5 CD |................|
00000330: CF CE C1 C4 C5 A0 C9 CE C7 D2 C5 C4 C9 C5 CE D4 |................|
00000340: D3 20 22 3A 8D 32 00 76 07 76 02 4F 55 24 B2 22 |. ":.2.v.v.OU$."|
00000350: C1 CE C4 A0 D3 C9 C7 CE D3 2E 20 49 C6 A0 D9 CF |.......... I....|
00000360: D5 A0 CD C1 CB C5 A0 CD CF CE C5 D9 A0 D9 CF D5 |................|
00000370: D2 20 22 3A 8D 32 00 A6 07 80 02 4F 55 24 B2 22 |. ":.2.....OU$."|
00000380: C1 D3 D3 C5 D4 D3 A0 C7 D2 CF D7 2E 20 49 C6 20 |............ I. |
00000390: D9 CF D5 A0 CC CF D3 C5 A0 C1 CC CC A0 D9 CF D5 |................|
000003A0: D2 20 22 3A 8D 32 00 CB 07 8A 02 4F 55 24 B2 22 |. ":.2.....OU$."|
000003B0: CD CF CE C5 D9 A0 D9 CF D5 A0 C1 D2 C5 A0 C2 C1 |................|
000003C0: CE CB D2 D5 D0 D4 2E 22 3A 8D 32 00 D3 07 8C 02 |.......":.2.....|
000003D0: 99 3A 99 00 00 08 8D 02 4F 55 24 B2 22 49 C6 A0 |.:......OU$."I..|
000003E0: D9 CF D5 A0 C8 C1 D6 C5 A0 C5 CE CF D5 C7 C8 A0 |................|
000003F0: C1 D3 D3 C5 D4 D3 2C A0 D9 CF D5 A0 22 3A 8D 32 |......,.....":.2|
00000400: 00 3F 08 8E 02 4F 55 24 B2 22 C3 C1 CE A0 CD C1 |.?...OU$."......|
00000410: CB C5 A0 D5 D0 A0 D4 CF A0 39 39 20 C7 CC C1 D3 |.........99 ....|
00000420: D3 C5 D3 20 C1 CE C4 A0 C2 D5 D9 A0 D5 D0 A0 D4 |... ............|
00000430: CF A0 39 20 D3 C9 C7 CE D3 2E 20 22 3A 8D 32 00 |..9 ...... ":.2.|
00000440: 84 08 90 02 4F 55 24 B2 22 59 CF D5 A0 C3 C1 CE |....OU$."Y......|
00000450: A0 C3 C8 C1 D2 C7 C5 A0 D5 D0 A0 D4 CF A0 39 39 |..............99|
00000460: 20 C3 C5 CE D4 D3 20 C6 CF D2 A0 C1 A0 C7 CC C1 | ..... .........|
00000470: D3 D3 A0 CF C6 A0 CC C5 CD CF CE C1 C4 C5 2E 20 |............... |
00000480: 22 3A 8D 32 00 A0 08 94 02 99 3A 99 22 11 11 C3 |":.2......:."...|
00000490: CF CE D4 C9 CE D5 C5 20 3F 22 3A 8D 39 35 30 30 |....... ?":.9500|
000004A0: 00 AE 08 BC 02 8F 20 4E 45 57 20 44 41 59 00 C8 |...... NEW DAY..|
000004B0: 08 C6 02 41 53 B2 41 28 44 29 3A 44 44 B2 44 44 |...AS.A(D):DD.DD|
000004C0: AA 31 3A 44 B2 44 AA 31 00 D6 08 C8 02 8B 44 B1 |.1:D.D.1......D.|
000004D0: 4D 44 A7 44 B2 30 00 05 09 CB 02 4E 28 44 29 B2 |MD.D.0.....N(D).|
000004E0: 30 3A 99 3A 4F 55 24 B2 22 93 54 CF C4 C1 D9 A0 |0:.:OU$.".T.....|
000004F0: C9 D3 A0 C4 C1 D9 22 AA C4 28 44 44 29 AA 22 2E |......"..(DD).".|
00000500: 20 22 3A 8D 32 00 23 09 D0 02 8F 20 43 4F 53 54 | ":.2.#.... COST|
00000510: 3A 43 3D 43 45 4E 54 53 2C 43 31 3D 44 4F 4C 4C |:C=CENTS,C1=DOLL|
00000520: 41 52 53 00 41 09 DA 02 50 39 B2 31 32 3A 43 B2 |ARS.A...P9.12:C.|
00000530: 35 3A 8B 44 44 B3 37 A7 43 B2 34 3A 50 39 B2 31 |5:.DD.7.C.4:P9.1|
00000540: 30 00 4F 09 E4 02 8B 44 44 B3 33 A7 43 B2 32 00 |0.O....DD.3.C.2.|
00000550: 5C 09 EE 02 43 31 B2 43 AC 2E 30 31 00 7C 09 F8 |\...C1.C..01.|..|
00000560: 02 41 28 44 29 B2 41 53 3A 4F 55 24 B2 22 59 CF |.A(D).AS:OU$."Y.|
00000570: D5 A0 C8 C1 D6 C5 A0 24 22 3A 8D 32 00 91 09 02 |.......$":.2....|
00000580: 03 4F 55 B2 41 28 44 29 3A 8D 38 35 30 30 3A 8D |.OU.A(D):.8500:.|
00000590: 32 00 B0 09 07 03 99 22 20 22 3B 3A 4F 55 24 B2 |2......" ";:OU$.|
000005A0: 22 C9 CE A0 C1 D3 D3 C5 D4 D3 2E 20 22 3A 8D 32 |".......... ":.2|
000005B0: 00 F1 09 0C 03 8B 44 44 B2 33 A7 4F 55 24 B2 22 |......DD.3.OU$."|
000005C0: 59 CF D5 D2 A0 CD CF D4 C8 C5 D2 A0 D1 D5 C9 D4 |Y...............|
000005D0: A0 C7 C9 D6 C9 CE C7 A0 D9 CF D5 A0 C6 D2 C5 C5 |................|
000005E0: A0 D0 C1 D0 C5 D2 20 C3 D5 D0 D3 2E 20 22 3A 8D |...... ..... ":.|
000005F0: 32 00 2C 0A 0E 03 8B 44 44 B2 37 A7 4F 55 24 B2 |2.,....DD.7.OU$.|
00000600: 22 49 CE C6 CC C1 D4 C9 CF CE A0 D3 C5 CE D4 A0 |"I..............|
00000610: D4 C8 C5 A0 D0 D2 C9 C3 C5 A0 CF C6 A0 CC C5 CD |................|
00000620: CF CE D3 A0 D5 D0 2E 20 22 3A 8D 32 00 4B 0A 16 |....... ":.2.K..|
00000630: 03 4F 55 24 B2 22 49 D4 A0 CE CF D7 A0 C3 CF D3 |.OU$."I.........|
00000640: D4 D3 A0 D9 CF D5 20 22 3A 8D 32 00 85 0A 1B 03 |...... ":.2.....|
00000650: 4F 55 24 B2 C4 28 43 29 AA 22 20 C3 C5 CE D4 D3 |OU$..(C)." .....|
00000660: A0 D4 CF A0 CD C1 CB C5 20 C5 C1 C3 C8 A0 C7 CC |........ .......|
00000670: C1 D3 D3 A0 CF C6 A0 CC C5 CD CF CE C1 C4 C5 2E |................|
00000680: 20 22 3A 8D 32 00 99 0A 20 03 8F 20 52 41 4E 44 | ":.2... .. RAND|
00000690: 4F 4D 20 45 56 45 4E 54 53 00 A1 0A 25 03 52 B2 |OM EVENTS...%.R.|
000006A0: 31 00 BA 0A 2A 03 8B 44 44 B1 32 A7 52 58 B2 B5 |1...*..DD.2.RX..|
000006B0: 28 39 AC BB 28 31 29 29 AA 31 00 DD 0A 34 03 91 |(9..(1)).1...4..|
000006C0: 52 58 8D 33 31 30 30 2C 33 32 30 30 2C 35 2C 33 |RX.3100,3200,5,3|
000006D0: 33 30 30 2C 35 2C 35 2C 35 2C 35 2C 35 00 F0 0A |300,5,5,5,5,5...|
000006E0: 52 03 8F 20 55 53 45 52 20 43 48 4F 49 43 45 53 |R.. USER CHOICES|
000006F0: 00 25 0B 5C 03 4F 55 24 B2 22 48 CF D7 A0 CD C1 |.%.\.OU$."H.....|
00000700: CE D9 A0 C7 CC C1 D3 D3 C5 D3 A0 C4 CF A0 D9 CF |................|
00000710: D5 A0 D7 C1 CE D4 20 D4 CF A0 CD C1 CB C5 20 3F |...... ....... ?|
00000720: 20 22 3A 8D 32 00 3A 0B 66 03 4C 4F B2 30 3A 48 | ":.2.:.f.LO.0:H|
00000730: 49 B2 39 39 3A 8D 38 30 30 30 00 5F 0B 84 03 8B |I.99:.8000._....|
00000740: 49 4E B2 30 A7 4C 28 44 29 B2 30 3A 53 28 44 29 |IN.0.L(D).0:S(D)|
00000750: B2 30 3A 50 28 44 29 B2 30 3A 89 31 31 36 35 00 |.0:P(D).0:.1165.|
00000760: 7C 0B 8E 03 8B A5 43 28 49 4E AC 43 31 29 B3 B2 ||.....C(IN.C1)..|
00000770: A5 43 28 41 28 44 29 29 A7 39 37 30 00 8E 0B 98 |.C(A(D)).970....|
00000780: 03 4F 55 B2 41 28 44 29 3A 8D 37 32 30 30 00 BC |.OU.A(D):.7200..|
00000790: 0B A2 03 4F 55 24 B2 22 C1 CE C4 A0 D4 CF A0 CD |...OU$."........|
000007A0: C1 CB C5 22 AA C4 28 49 4E 29 AA 22 20 C7 CC C1 |..."..(IN)." ...|
000007B0: D3 D3 C5 D3 A0 CF C6 20 22 3A 8D 32 00 DC 0B AC |....... ":.2....|
000007C0: 03 4F 55 24 B2 22 CC C5 CD CF CE C1 C4 C5 A0 D9 |.OU$."..........|
000007D0: CF D5 A0 CE C5 C5 C4 20 22 3A 8D 32 00 FB 0B B6 |....... ":.2....|
000007E0: 03 4F 55 B2 49 4E AC 43 31 3A 8D 38 35 30 30 3A |.OU.IN.C1:.8500:|
000007F0: 4F 55 24 B2 4F 55 24 AA 22 20 22 00 1A 0C C0 03 |OU$.OU$." ".....|
00000800: 8D 32 3A 4F 55 24 B2 22 C9 CE A0 C3 C1 D3 C8 2E |.2:OU$."........|
00000810: 20 22 3A 8D 32 3A 89 38 36 30 00 26 0C CA 03 4C | ":.2:.860.&...L|
00000820: 28 44 29 B2 49 4E 00 64 0C E8 03 99 3A 4F 55 24 |(D).IN.d....:OU$|
00000830: B2 22 41 C4 D6 C5 D2 D4 C9 D3 C9 CE C7 A0 D3 C9 |."A.............|
00000840: C7 CE D3 A0 C3 CF D3 D4 22 AA C4 28 53 33 AC 48 |........"..(S3.H|
00000850: 29 AA 22 20 C3 C5 CE D4 D3 A0 C5 C1 C3 C8 2E 20 |)." ........... |
00000860: 22 3A 8D 32 00 96 0C F2 03 4F 55 24 B2 22 48 CF |":.2.....OU$."H.|
00000870: D7 A0 CD C1 CE D9 A0 D3 C9 C7 CE D3 A0 C4 CF A0 |................|
00000880: D9 CF D5 A0 D7 C1 CE D4 A0 D4 CF A0 C2 D5 D9 20 |............... |
00000890: 3F 20 22 3A 8D 32 00 AA 0C FC 03 4C 4F B2 30 3A |? ":.2.....LO.0:|
000008A0: 48 49 B2 39 3A 8D 38 30 30 30 00 D6 0C 24 04 4F |HI.9:.8000...$.O|
000008B0: 55 B2 41 28 44 29 AB 4C 28 44 29 AC 43 31 3A 8B |U.A(D).L(D).C1:.|
000008C0: A5 43 28 49 4E AC 53 33 29 B3 B2 A5 43 28 4F 55 |.C(IN.S3)...C(OU|
000008D0: 29 A7 31 30 39 30 00 E0 0C 2E 04 8D 37 32 30 30 |).1090......7200|
000008E0: 00 10 0D 38 04 4F 55 24 B2 22 C1 C6 D4 C5 D2 A0 |...8.OU$."......|
000008F0: CD C1 CB C9 CE C7 A0 D9 CF D5 D2 A0 CC C5 CD CF |................|
00000900: CE C1 C4 C5 2E 22 3A 8D 32 3A 89 20 31 30 30 30 |.....":.2:. 1000|
00000910: 00 1C 0D 42 04 53 28 44 29 B2 49 4E 00 51 0D 4C |...B.S(D).IN.Q.L|
00000920: 04 99 3A 4F 55 24 B2 22 57 C8 C1 D4 A0 D0 D2 C9 |..:OU$."W.......|
00000930: C3 C5 A0 28 C9 CE A0 C3 C5 CE D4 D3 29 20 C4 CF |...(........) ..|
00000940: A0 D9 CF D5 A0 D7 C9 D3 C8 20 D4 CF 20 22 3A 8D |......... .. ":.|
00000950: 32 00 80 0D 56 04 4F 55 24 B2 22 C3 C8 C1 D2 C7 |2...V.OU$.".....|
00000960: C5 A0 C6 CF D2 A0 C1 A0 C7 CC C1 D3 D3 A0 CF C6 |................|
00000970: A0 CC C5 CD CF CE C1 C4 C5 20 3F 20 22 3A 8D 32 |......... ? ":.2|
00000980: 00 95 0D 60 04 4C 4F B2 30 3A 48 49 B2 39 39 3A |...`.LO.0:HI.99:|
00000990: 8D 38 30 30 30 00 A1 0D 88 04 50 28 44 29 B2 49 |.8000.....P(D).I|
000009A0: 4E 00 A7 0D 8D 04 99 00 E5 0D 92 04 4F 55 24 B2 |N...........OU$.|
000009B0: C4 28 4C 28 44 29 29 AA C8 28 22 20 C7 CC C1 D3 |.(L(D))..(" ....|
000009C0: D3 C5 D3 22 2C 38 AA 32 AC 28 4C 28 44 29 B2 31 |...",8.2.(L(D).1|
000009D0: 29 29 AA 22 2C 22 AA C4 28 53 28 44 29 29 AA 22 |)).","..(S(D))."|
000009E0: 20 22 3A 8D 32 00 07 0E 93 04 4F 55 24 B2 C8 28 | ":.2.....OU$..(|
000009F0: 22 20 D3 C9 C7 CE D3 22 2C 36 AA 28 53 28 44 29 |" .....",6.(S(D)|
00000A00: B2 31 29 29 3A 8D 32 00 4B 0E 94 04 4F 55 24 B2 |.1)):.2.K...OU$.|
00000A10: 22 2C 20 D0 D2 C9 C3 C5 A0 CF C6 22 AA C4 28 50 |", ........"..(P|
00000A20: 28 44 29 29 AA C8 28 22 20 C3 C5 CE D4 D3 22 2C |(D))..(" .....",|
00000A30: 36 AA 28 50 28 44 29 B2 31 29 29 AA 22 2C 20 D2 |6.(P(D).1)).", .|
00000A40: C9 C7 C8 D4 20 3F 20 22 3A 8D 32 00 55 0E 9C 04 |.... ? ":.2.U...|
00000A50: 8D 39 35 30 30 00 63 0E A6 04 8B 59 4E B2 30 A7 |.9500.c....YN.0.|
00000A60: 38 35 30 00 74 0E B0 04 8F 20 53 49 4D 55 4C 41 |850.t.... SIMULA|
00000A70: 54 49 4F 4E 00 99 0E BA 04 99 22 93 22 3A 91 52 |TION......".":.R|
00000A80: 58 8D 35 2C 33 32 35 30 2C 33 34 30 30 2C 35 2C |X.5,3250,3400,5,|
00000A90: 35 2C 35 2C 35 2C 35 2C 35 00 AD 0E C4 04 8B 4E |5,5,5,5,5......N|
00000AA0: 28 44 29 B2 4C 28 44 29 A7 31 33 31 30 00 BF 0E |(D).L(D).1310...|
00000AB0: CE 04 8B 50 28 44 29 B1 50 39 A7 31 32 36 30 00 |...P(D).P9.1260.|
00000AC0: E2 0E D8 04 4E 31 B2 28 50 39 AB 50 28 44 29 29 |....N1.(P9.P(D))|
00000AD0: AD 50 39 AC 2E 38 AC 53 32 AA 53 32 3A 89 31 32 |.P9..8.S2.S2:.12|
00000AE0: 37 30 00 FA 0E EC 04 4E 31 B2 28 50 39 AE 32 AC |70.....N1.(P9.2.|
00000AF0: 53 32 AD 50 28 44 29 AE 32 29 00 1E 0F F6 04 4E |S2.P(D).2).....N|
00000B00: 32 B2 52 AC 28 4E 31 AA 4E 31 AC 28 31 AB BD 28 |2.R.(N1.N1.(1..(|
00000B10: AB 53 28 44 29 AC 43 39 29 AC 43 32 29 29 00 3B |.S(D).C9).C2)).;|
00000B20: 0F 00 05 4E 28 44 29 B2 B5 28 4E 32 AC 28 2E 39 |...N(D)..(N2.(.9|
00000B30: 35 AA BB 28 31 29 AC 2E 31 29 29 00 58 0F 0A 05 |5..(1)..1)).X...|
00000B40: 8B A5 43 28 4E 28 44 29 29 B3 B2 A5 43 28 4C 28 |..C(N(D))...C(L(|
00000B50: 44 29 29 A7 31 33 31 30 00 66 0F 14 05 4E 28 44 |D)).1310.f...N(D|
00000B60: 29 B2 4C 28 44 29 00 92 0F 1E 05 4D 28 44 29 B2 |).L(D).....M(D).|
00000B70: 4E 28 44 29 AC 50 28 44 29 AC 2E 30 31 3A 45 28 |N(D).P(D)..01:E(|
00000B80: 44 29 B2 53 28 44 29 AC 53 33 AA 4C 28 44 29 AC |D).S(D).S3.L(D).|
00000B90: 43 31 00 B4 0F 32 05 52 28 44 29 B2 4D 28 44 29 |C1...2.R(D).M(D)|
00000BA0: AB 45 28 44 29 3A 41 28 44 29 B2 41 28 44 29 AA |.E(D):A(D).A(D).|
00000BB0: 52 28 44 29 00 CC 0F DC 05 8F 20 52 45 53 55 4C |R(D)...... RESUL|
00000BC0: 54 53 20 26 20 52 45 53 54 41 52 54 00 DF 0F 40 |TS & RESTART...@|
00000BD0: 06 59 B2 38 3A 8B 52 58 B2 32 A7 59 B2 31 31 00 |.Y.8:.RX.2.Y.11.|
00000BE0: EE 0F 4A 06 8B 52 58 B2 33 A7 59 B2 31 31 00 F4 |..J..RX.3.Y.11..|
00000BF0: 0F 5E 06 8C 00 0F 10 68 06 81 49 B2 31 A4 31 30 |.^.....h..I.1.10|
00000C00: 3A 87 58 28 49 29 2C 54 24 28 49 29 3A 82 49 00 |:.X(I),T$(I):.I.|
00000C10: 46 10 72 06 83 32 2C 44 41 59 2C 34 2C 53 49 47 |F.r..2,DAY,4,SIG|
00000C20: 4E 53 2C 37 2C 4D 41 44 45 2C 31 30 2C 53 4F 4C |NS,7,MADE,10,SOL|
00000C30: 44 2C 31 33 2C 50 52 49 43 45 24 2C 31 38 2C 49 |D,13,PRICE$,18,I|
00000C40: 4E 43 4F 4D 45 24 00 7A 10 7C 06 83 32 33 2C 45 |NCOME$.z.|..23,E|
00000C50: 58 50 45 4E 53 45 24 2C 32 38 2C 50 52 4F 46 49 |XPENSE$,28,PROFI|
00000C60: 54 28 2C 33 30 2C 4F 52 20 4C 4F 53 53 20 29 2C |T(,30,OR LOSS ),|
00000C70: 33 37 2C 41 53 53 45 54 53 24 00 86 10 86 06 81 |37,ASSETS$......|
00000C80: 49 B2 31 A4 31 30 00 A1 10 90 06 58 B2 58 28 49 |I.1.10.....X.X(I|
00000C90: 29 3A 4F 55 24 B2 54 24 28 49 29 3A 8D 38 33 30 |):OU$.T$(I):.830|
00000CA0: 30 00 A8 10 AE 06 82 49 00 B7 10 B8 06 58 B2 31 |0......I.....X.1|
00000CB0: 32 3A 8D 38 32 30 30 00 DB 10 C2 06 99 20 22 28 |2:.8200...... "(|
00000CC0: 24 29 20 20 28 24 29 20 20 28 24 29 20 20 20 28 |$) ($) ($) (|
00000CD0: 24 29 20 20 20 20 20 28 24 29 22 00 EF 10 08 07 |$) ($)".....|
00000CE0: 58 B2 30 3A 59 B2 59 AA 32 3A 8D 38 32 30 30 00 |X.0:Y.Y.2:.8200.|
00000CF0: 06 11 12 07 44 51 B2 44 44 AB 33 3A 8B 44 51 B3 |....DQ.DD.3:.DQ.|
00000D00: 31 A7 44 51 B2 31 00 14 11 17 07 81 49 49 B2 44 |1.DQ.1......II.D|
00000D10: 51 A4 44 44 00 1D 11 19 07 49 B2 49 49 00 38 11 |Q.DD.....I.II.8.|
00000D20: 1A 07 8B 49 B1 4D 44 A7 49 B2 49 AB 28 4D 44 AA |...I.MD.I.I.(MD.|
00000D30: 31 29 3A 89 31 38 31 38 00 6F 11 1C 07 57 B2 33 |1):.1818.o...W.3|
00000D40: 3A 4B B2 49 49 3A 8D 33 3A 57 B2 32 3A 4B B2 53 |:K.II:.3:W.2:K.S|
00000D50: 28 49 29 3A 8D 33 3A 20 57 B2 33 3A 4B B2 4C 28 |(I):.3: W.3:K.L(|
00000D60: 49 29 3A 8D 33 3A 4B B2 4E 28 49 29 3A 8D 33 00 |I):.3:K.N(I):.3.|
00000D70: A4 11 21 07 57 B2 34 3A 4F 55 B2 50 28 49 29 AC |..!.W.4:OU.P(I).|
00000D80: 2E 30 31 3A 8D 34 3A 57 B2 36 3A 4F 55 B2 4D 28 |.01:.4:W.6:OU.M(|
00000D90: 49 29 3A 8D 34 3A 57 B2 35 3A 4F 55 B2 45 28 49 |I):.4:W.5:OU.E(I|
00000DA0: 29 3A 8D 34 00 C8 11 26 07 57 B2 36 3A 4F 55 B2 |):.4...&.W.6:OU.|
00000DB0: 52 28 49 29 3A 8D 34 3A 57 B2 38 3A 4F 55 B2 41 |R(I):.4:W.8:OU.A|
00000DC0: 28 49 29 3A 8D 34 3A 99 00 CE 11 2B 07 82 00 E1 |(I):.4:....+....|
00000DD0: 11 32 07 8B 41 28 44 29 B1 2E 30 34 A7 31 38 35 |.2..A(D)..04.185|
00000DE0: 30 00 14 12 34 07 4F 55 24 B2 22 59 CF D5 A0 C4 |0...4.OU$."Y....|
00000DF0: CF A0 CE CF D4 A0 C8 C1 D6 C5 A0 C5 CE CF D5 C7 |................|
00000E00: C8 A0 CD CF CE C5 D9 A0 CC C5 C6 D4 A0 D4 CF 20 |............... |
00000E10: 22 3A 8D 32 00 4E 12 36 07 4F 55 24 B2 22 D3 D4 |":.2.N.6.OU$."..|
00000E20: C1 D9 A0 C9 CE A0 C2 D5 D3 C9 CE C5 D3 D3 2E 20 |............... |
00000E30: 59 CF D5 A0 C1 D2 C5 A0 C2 C1 CE CB D2 D5 D0 D4 |Y...............|
00000E40: 20 21 21 20 22 3A 8D 32 3A 89 31 38 36 30 00 72 | !! ":.2:.1860.r|
00000E50: 12 3A 07 99 3A 99 22 43 CF CE D4 C9 CE D5 C5 20 |.:..:."C....... |
00000E60: 3F 20 22 3B 3A 8D 39 35 30 30 3A 8B 59 4E A7 37 |? ";:.9500:.YN.7|
00000E70: 30 30 00 9E 12 3F 07 99 3A 99 22 52 C5 D3 D4 C1 |00...?..:."R....|
00000E80: D2 D4 20 C1 D4 A0 C4 C1 D9 A0 31 20 3F 20 22 3B |.. .......1 ? ";|
00000E90: 3A 8D 39 35 30 30 3A 8B 59 4E A7 34 30 30 00 C3 |:.9500:.YN.400..|
00000EA0: 12 44 07 4F 55 24 B2 22 42 D9 C5 2C 20 C8 CF D0 |.D.OU$."B.., ...|
00000EB0: C5 A0 D9 CF D5 A0 C8 C1 C4 A0 C6 D5 CE 20 21 22 |............. !"|
00000EC0: 3A 8D 32 00 C9 12 4E 07 80 00 DF 12 B8 0B 8F 20 |:.2...N........ |
00000ED0: 52 41 4E 44 4F 4D 20 52 4F 55 54 49 4E 45 53 00 |RANDOM ROUTINES.|
00000EE0: 10 13 1C 0C 4F 55 24 B2 22 54 C8 C5 A0 D7 C5 C1 |....OU$."T......|
00000EF0: D4 C8 C5 D2 A0 C9 D3 A0 C3 CF CF CC 3B 20 D4 C8 |............; ..|
00000F00: C5 D2 C5 27 D3 A0 C1 A0 35 30 25 20 22 3A 8D 32 |...'....50% ":.2|
00000F10: 00 3A 13 26 0C 4F 55 24 B2 22 C3 C8 C1 CE C3 C5 |.:.&.OU$."......|
00000F20: A0 CF C6 A0 CC C9 C7 C8 D4 A0 D2 C1 C9 CE A0 D4 |................|
00000F30: CF C4 C1 D9 2E 20 22 3A 8D 32 00 45 13 30 0C 52 |..... ":.2.E.0.R|
00000F40: B2 2E 35 3A 8E 00 79 13 80 0C 4F 55 24 B2 22 52 |..5:..y...OU$."R|
00000F50: CF C1 C4 D7 CF D2 CB A0 C9 D3 A0 C2 C5 C9 CE C7 |................|
00000F60: A0 C4 CF CE C5 A0 CF CE A0 D9 CF D5 D2 A0 D3 D4 |................|
00000F70: D2 C5 C5 D4 20 22 3A 8D 32 00 B0 13 8A 0C 4F 55 |.... ":.2.....OU|
00000F80: 24 B2 22 D4 CF C4 C1 D9 20 2D 20 D4 C8 C5 A0 D3 |$."..... - .....|
00000F90: D4 D2 C5 C5 D4 A0 C9 D3 A0 C3 CC CF D3 C5 C4 A0 |................|
00000FA0: D4 CF A0 D4 D2 C1 C6 C6 C9 C3 2E 20 22 3A 8D 32 |........... ":.2|
00000FB0: 00 D3 13 94 0C 53 58 B2 BB 28 31 29 3A 8B 50 28 |.....SX..(1):.P(|
00000FC0: 44 29 B1 32 35 B0 53 58 B3 2E 35 A7 52 B2 2E 31 |D).25.SX..5.R..1|
00000FD0: 20 3A 8E 00 E3 13 9E 0C 4E 28 44 29 B2 4C 28 44 | :......N(D).L(D|
00000FE0: 29 3A 8E 00 F0 13 B2 0C 8B 53 58 B3 2E 35 A7 8E |):.......SX..5..|
00000FF0: 00 24 14 BC 0C 4F 55 24 B2 22 41 D4 A0 CC D5 CE |.$...OU$."A.....|
00001000: C3 C8 20 D4 C9 CD C5 A0 D4 C8 C5 A0 D3 D4 D2 C5 |.. .............|
00001010: C5 D4 A0 C3 D2 C5 D7 D3 A0 C2 D5 D9 A0 C1 CC CC |................|
00001020: 22 3A 8D 32 00 4B 14 C6 0C 4F 55 24 B2 22 D9 CF |":.2.K...OU$."..|
00001030: D5 D2 A0 CC C5 CD CF CE C1 C4 C5 2E 20 22 3A 8D |............ ":.|
00001040: 32 3A 4E 28 44 29 B2 4C 28 44 29 00 51 14 D0 0C |2:N(D).L(D).Q...|
00001050: 8E 00 89 14 E4 0C 4F 55 24 B2 22 41 20 C8 C5 C1 |......OU$."A ...|
00001060: D4 A0 D7 C1 D6 C5 A0 C9 D3 A0 D0 D2 C5 C4 C9 C3 |................|
00001070: D4 C5 C4 A0 C6 CF D2 A0 D4 CF C4 C1 D9 2E 20 22 |.............. "|
00001080: 3A 8D 32 3A 52 B2 32 3A 8E 00 BC 14 48 0D 4F 55 |:.2:R.2:....H.OU|
00001090: 24 B2 22 41 20 D3 D4 CF D2 CD A0 C8 C9 D4 D3 A0 |$."A ...........|
000010A0: C1 D3 A0 D9 CF D5 A0 CF D0 C5 CE 20 D9 CF D5 D2 |........... ....|
000010B0: A0 D3 D4 C1 CE C4 2E 20 22 3A 8D 32 00 D5 14 52 |....... ":.2...R|
000010C0: 0D 4F 55 24 B2 22 59 CF D5 D2 20 D3 C9 C7 CE D3 |.OU$."Y... .....|
000010D0: 20 22 3A 8D 32 00 FB 14 5C 0D 4F 55 24 B2 22 C1 | ":.2...\.OU$.".|
000010E0: CE C4 A0 CC C5 CD CF CE C1 C4 C5 A0 C1 D2 C5 A0 |................|
000010F0: D2 D5 C9 CE C5 C4 2E 22 3A 8D 32 00 05 15 66 0D |.......":.2...f.|
00001100: 52 B2 30 3A 8E 00 18 15 CC 10 4F 55 24 B2 C4 28 |R.0:......OU$..(|
00001110: 4B 29 3A 89 34 35 30 30 00 22 15 30 11 8D 38 35 |K):.4500.".0..85|
00001120: 30 30 00 3B 15 94 11 99 C9 28 22 20 20 20 20 20 |00.;.....(" |
00001130: 22 AA 4F 55 24 2C 57 29 3B 3A 8E 00 41 15 F8 11 |".OU$,W);:..A...|
00001140: 8E 00 4D 15 20 1C 8F 20 41 47 41 49 4E 00 7C 15 |..M. .. AGAIN.|.|
00001150: 2A 1C 99 3A 4F 55 24 B2 22 54 C8 C9 CE CB A0 C1 |*..:OU$."T......|
00001160: C7 C1 C9 CE 20 2E 2E 2E 20 D9 CF D5 A0 C8 C1 D6 |.... ... .......|
00001170: C5 A0 CF CE CC D9 20 24 22 3A 8D 32 00 86 15 34 |...... $":.2...4|
00001180: 1C 8D 38 35 30 30 00 A5 15 3E 1C 99 4F 55 24 AA |..8500...>..OU$.|
00001190: 22 20 22 3A 4F 55 24 B2 22 C9 CE A0 C3 C1 D3 C8 |" ":OU$.".......|
000011A0: 20 22 3A 8D 32 00 AB 15 48 1C 8E 00 C1 15 4C 1D | ":.2...H.....L.|
000011B0: 50 4F B2 C3 28 4F 55 24 29 3A 8B 50 4F B2 30 A7 |PO..(OU$):.PO.0.|
000011C0: 8E 00 E9 15 51 1D 8B 28 C6 28 4F 55 24 29 AF 31 |....Q..(.(OU$).1|
000011D0: 32 37 29 B2 33 32 A7 4F 55 24 B2 CA 28 4F 55 24 |27).32.OU$..(OU$|
000011E0: 2C 32 29 3A 89 37 35 30 30 00 05 16 56 1D 50 5A |,2):.7500...V.PZ|
000011F0: B2 B9 28 30 29 3A 8B 50 5A B1 33 39 A7 50 5A B2 |..(0):.PZ.39.PZ.|
00001200: 50 5A AB 34 30 00 18 16 5B 1D 8B 50 5A AA 50 4F |PZ.40...[..PZ.PO|
00001210: B3 34 30 A7 37 35 37 30 00 28 16 60 1D 8B 50 5A |.40.7570.(.`..PZ|
00001220: B1 33 38 A7 37 36 30 30 00 3B 16 6A 1D 81 50 59 |.38.7600.;.j..PY|
00001230: B2 33 39 AB 50 5A A4 31 A9 AB 31 00 5F 16 74 1D |.39.PZ.1..1._.t.|
00001240: 8B 28 C6 28 CA 28 4F 55 24 2C 50 59 2C 31 29 29 |.(.(.(OU$,PY,1))|
00001250: AF 31 32 37 29 B2 33 32 A7 50 59 B2 AB 50 59 00 |.127).32.PY..PY.|
00001260: 7A 16 7E 1D 82 50 59 3A 8B 50 59 A7 50 59 B2 AB |z.~..PY:.PY.PY..|
00001270: 31 AB 50 59 3A 89 37 35 38 30 00 89 16 88 1D 8B |1.PY:.7580......|
00001280: 50 5A B1 31 A7 37 36 30 30 00 9C 16 92 1D 99 4F |PZ.1.7600......O|
00001290: 55 24 3B 3A 4F 55 24 B2 22 22 3A 8E 00 BC 16 9C |U$;:OU$."":.....|
000012A0: 1D 99 C8 28 4F 55 24 2C 50 59 29 3B 3A 4F 55 24 |...(OU$,PY);:OU$|
000012B0: B2 CA 28 4F 55 24 2C 50 59 AA 31 29 00 C8 16 B0 |..(OU$,PY.1)....|
000012C0: 1D 99 3A 89 37 35 30 30 00 D4 16 40 1F 8F 20 49 |..:.7500...@.. I|
000012D0: 4E 50 55 54 00 DE 16 A4 1F 8D 39 30 30 30 00 EE |NPUT......9000..|
000012E0: 16 AE 1F 81 49 B2 31 A4 C3 28 49 4E 24 29 00 00 |....I.1..(IN$)..|
000012F0: 17 B3 1F 43 24 B2 CA 28 49 4E 24 2C 49 2C 31 29 |...C$..(IN$,I,1)|
00001300: 00 24 17 B8 1F 8B 28 22 30 22 B3 B2 43 24 AF 43 |.$....("0"..C$.C|
00001310: 24 B3 B2 22 39 22 29 B0 43 24 B2 22 2B 22 89 20 |$.."9").C$."+". |
00001320: 38 31 34 30 00 2C 17 BD 1F 99 3A 99 00 68 17 C2 |8140.,....:..h..|
00001330: 1F 4F 55 24 B2 22 54 D9 D0 C5 A0 C1 A0 D7 C8 CF |.OU$."T.........|
00001340: CC C5 20 CE D5 CD C2 C5 D2 20 C6 D2 CF CD 22 AA |.. ...... ....".|
00001350: C4 28 4C 4F 29 AA 22 20 D4 CF 22 AA C4 28 48 49 |.(LO)." .."..(HI|
00001360: 29 AA 22 3A 22 3A 8D 32 00 78 17 C7 1F 99 22 20 |).":":.2.x...." |
00001370: 22 3B 3A 89 38 30 30 30 00 7F 17 CC 1F 82 49 00 |";:.8000......I.|
00001380: 8D 17 D6 1F 49 4E B2 C5 28 49 4E 24 29 00 A3 17 |....IN..(IN$)...|
00001390: DB 1F 8B 49 4E B3 4C 4F B0 49 4E B1 48 49 89 38 |...IN.LO.IN.HI.8|
000013A0: 31 32 35 00 A9 17 E0 1F 8E 00 B2 17 08 20 8F 20 |125.......... . |
000013B0: 43 43 00 E6 17 12 20 99 20 C8 28 22 13 11 11 11 |CC.... . .("....|
000013C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000013D0: 11 11 11 11 11 22 2C 59 AA 31 29 3B A6 58 AA 31 |.....",Y.1);.X.1|
000013E0: 29 3B 22 9D 22 3B 00 EC 17 1C 20 8E 00 00 18 6C |);".";.... ....l|
000013F0: 20 8F 20 3F 4F 55 24 20 56 45 52 54 49 43 41 4C | . ?OU$ VERTICAL|
00001400: 00 0A 18 76 20 8D 38 32 30 30 00 1E 18 A8 20 81 |...v .8200.... .|
00001410: 4F 49 B2 C3 28 4F 55 24 29 A4 31 A9 AB 31 00 34 |OI..(OU$).1..1.4|
00001420: 18 B2 20 99 CA 28 4F 55 24 2C 4F 49 2C 31 29 22 |.. ..(OU$,OI,1)"|
00001430: 9D 91 22 3B 00 3A 18 B7 20 82 00 40 18 BC 20 8E |..";.:.. ..@.. .|
00001440: 00 5B 18 34 21 8F 20 4F 55 20 54 4F 20 4F 55 24 |.[.4!. OU TO OU$|
00001450: 20 41 53 20 44 4F 4C 4C 41 52 53 00 7F 18 3E 21 | AS DOLLARS...>!|
00001460: 43 53 B2 A5 43 28 4F 55 29 3A 43 4E B2 B6 28 43 |CS..C(OU):CN..(C|
00001470: 53 29 3A 44 4E B2 B5 28 43 4E AD 31 30 30 29 00 |S):DN..(CN.100).|
00001480: A0 18 52 21 44 4E 24 B2 22 22 3A 8B 44 4E B3 B1 |..R!DN$."":.DN..|
00001490: 30 A7 44 4E 24 B2 CA 28 C4 28 44 4E 29 2C 32 29 |0.DN$..(.(DN),2)|
000014A0: 00 B6 18 57 21 8B 43 53 B3 30 A7 44 4E 24 B2 22 |...W!.CS.0.DN$."|
000014B0: 2D 22 AA 44 4E 24 00 D5 18 5C 21 4F 55 24 B2 44 |-".DN$...\!OU$.D|
000014C0: 4E 24 AA 22 2E 22 AA C9 28 C4 28 43 4E AA 31 30 |N$."."..(.(CN.10|
000014D0: 30 29 2C 32 29 00 DB 18 70 21 8E 00 E7 18 28 23 |0),2)...p!....(#|
000014E0: 8F 20 4C 4F 57 45 52 00 F2 18 2D 23 49 4E 24 B2 |. LOWER...-#IN$.|
000014F0: 22 22 00 08 19 32 23 A1 49 4D 24 3A 8B 49 4D 24 |""...2#.IM$:.IM$|
00001500: B2 22 22 A7 39 30 31 30 00 22 19 3C 23 49 4D B2 |."".9010.".<#IM.|
00001510: C6 28 49 4D 24 29 3A 8B 49 4D B2 32 30 A7 39 30 |.(IM$):.IM.20.90|
00001520: 39 30 00 3B 19 46 23 49 56 B2 31 32 37 AF 49 4D |90.;.F#IV.127.IM|
00001530: 3A 8B 49 56 B2 31 33 A7 99 3A 8E 00 4B 19 4B 23 |:.IV.13..:..K.K#|
00001540: 8B 49 56 B3 33 32 89 39 30 31 30 00 59 19 50 23 |.IV.32.9010.Y.P#|
00001550: 49 55 24 B2 C7 28 49 56 29 00 82 19 5A 23 8B 49 |IU$..(IV)...Z#.I|
00001560: 55 24 B1 B2 22 41 22 AF 49 55 24 B3 B2 22 5A 22 |U$.."A".IU$.."Z"|
00001570: A7 49 4D 24 B2 C7 28 49 4D AA 31 32 38 AF 32 35 |.IM$..(IM.128.25|
00001580: 35 29 00 9E 19 64 23 99 49 4D 24 3B 3A 49 4E 24 |5)...d#.IM$;:IN$|
00001590: B2 49 4E 24 AA 49 4D 24 3A 89 39 30 31 30 00 AF |.IN$.IM$:.9010..|
000015A0: 19 82 23 8B 49 4E 24 B2 22 22 A7 39 30 31 30 00 |..#.IN$."".9010.|
000015B0: B9 19 8C 23 99 49 4D 24 3B 00 D3 19 96 23 49 4E |...#.IM$;....#IN|
000015C0: 24 B2 CA 28 49 4E 24 2C 31 2C C3 28 49 4E 24 29 |$..(IN$,1,.(IN$)|
000015D0: AB 31 29 00 DD 19 A0 23 89 39 30 31 30 00 EA 19 |.1)....#.9010...|
000015E0: 1C 25 8F 20 59 45 53 2F 4E 4F 00 FA 19 26 25 59 |.%. YES/NO...&%Y|
000015F0: 4E B2 AB 31 3A 8D 39 30 30 30 00 08 1A 30 25 8B |N..1:.9000...0%.|
00001600: 49 4E 24 B2 22 22 A7 8E 00 16 1A 35 25 49 4D B2 |IN$."".....5%IM.|
00001610: C6 28 49 4E 24 29 00 27 1A 3A 25 8B 49 4D B2 C6 |.(IN$).'.:%.IM..|
00001620: 28 22 D9 22 29 A7 8E 00 3D 1A 44 25 8B 49 4D B2 |(".")...=.D%.IM.|
00001630: C6 28 22 CE 22 29 A7 59 4E B2 30 3A 8E 00 57 1A |.(".").YN.0:..W.|
00001640: 4E 25 99 22 D9 C5 D3 A0 CF D2 A0 CE CF 3F 20 22 |N%.".........? "|
00001650: 3B 3A 89 39 35 30 30 00 63 1A AC 26 8F 20 4C 4F |;:.9500.c..&. LO|
00001660: 57 45 52 00 71 1A B6 26 97 35 39 34 36 38 2C 31 |WER.q..&.59468,1|
00001670: 34 00 77 1A 0F 27 8E 00 00 00 |4.w..'.... |
.......100......7500......4300.(....4400
.......G.D.. RUN LEMONADE STAND.V...MD.3
:.9900.A.... INIT...... L(MD),S(MD),P(MD
),N(MD),M(MD),E(MD),R(MD),A(MD).....S2.3
0:C2.1:C9..5.A...S2.30:C2.1:C9..5.....A2
.2:S3..15:H.100:HF..5......".":D.0:DD.0:
A(0).A2.......C(D)..(H.D.HF).*.....10)"T
HE LEMONADE STAND..Q...."IN THIS GAME, Y
OU CAN ANSWER YES.Z...."TO A QUESTION BY
PRESSING RETURN........ "DO YOU WANT IN
STRUCTIONS ? ";:.9500.......YN.700......
:OU$.".YOU ARE IN CHARGE OF A LEMONADE S
TAND. ":.2...&.OU$."IT COSTS YOU MONEY T
O MAKE LEMONADE ":.2.R.0.OU$."AND TO ADV
ERTISE YOUR STAND. THE OBJECT ":.2...:.O
U$."IS TO MAKE DECISIONS SO AS TO EARN A
S ":.2...D.OU$."MUCH MONEY AS POSSIBLE."
:.2...X..:.:OU$."'ASSETS' ARE HOW MUCH Y
OUR LEMONADE ":.2...B.OU$."BUSINESS IS W
ORTH. YOU CAN SPEND YOUR ":.2.F.L.OU$."A
SSETS TO BUY LEMONADE INGREDIENTS ":.2.V
.V.OU$."AND SIGNS. IF YOU MAKE MONEY YOU
R ":.2.....OU$."ASSETS GROW. IF YOU LOSE
ALL YOUR ":.2.K...OU$."MONEY YOU ARE BA
NKRUPT.":.2.S....:......OU$."IF YOU HAVE
ENOUGH ASSETS, YOU ":.2.?...OU$."CAN MA
KE UP TO 99 GLASSES AND BUY UP TO 9 SIGN
S. ":.2.....OU$."YOU CAN CHARGE UP TO 99
CENTS FOR A GLASS OF LEMONADE. ":.2. ..
..:."..CONTINUE ?":.9500...... NEW DAY.H
.F.AS.A(D):DD.DD.1:D.D.1.V.H..D.MD.D.0..
.K.N(D).0:.:OU$.".TODAY IS DAY".D(DD).".
":.2.#.P.. COST:C=CENTS,C1=DOLLARS.A.Z.
P9.12:C.5:.DD.7.C.4:P9.10.O....DD.3.C.2.
\...C1.C..01.|...A(D).AS:OU$."YOU HAVE $
":.2.....OU.A(D):.8500:.2......" ";:OU$.
"IN ASSETS. ":.2......DD.3.OU$."YOUR MOT
HER QUIT GIVING YOU FREE PAPER CUPS. ":.
2.,....DD.7.OU$."INFLATION SENT THE PRIC
E OF LEMONS UP. ":.2.K...OU$."IT NOW COS
TS YOU ":.2.....OU$.D(C)." CENTS TO MAKE
EACH GLASS OF LEMONADE. ":.2... .. RAND
OM EVENTS...%.R.1...*..DD.2.RX..(9..(1))
.1...4..RX.3100,3200,5,3300,5,5,5,5,5...
R.. USER CHOICES.%.\.OU$."HOW MANY GLASS
ES DO YOU WANT TO MAKE ? ":.2.:.F.LO.0:H
I.99:.8000._....IN.0.L(D).0:S(D).0:P(D).
0:.1165.|.....C(IN.C1)...C(A(D)).970....
.OU.A(D):.7200.....OU$."AND TO MAKE".D(I
N)." GLASSES OF ":.2.....OU$."LEMONADE Y
OU NEED ":.2.....OU.IN.C1:.8500:OU$.OU$.
" "......2:OU$."IN CASH. ":.2:.860.&.J.L
(D).IN.D....:OU$."ADVERTISING SIGNS COST
".D(S3.H)." CENTS EACH. ":.2.....OU$."HO
W MANY SIGNS DO YOU WANT TO BUY ? ":.2..
...LO.0:HI.9:.8000.V.$.OU.A(D).L(D).C1:.
.C(IN.S3)...C(OU).1090......7200...8.OU$
."AFTER MAKING YOUR LEMONADE.":.2:. 1000
...B.S(D).IN.Q.L..:OU$."WHAT PRICE (IN C
ENTS) DO YOU WISH TO ":.2...V.OU$."CHARG
E FOR A GLASS OF LEMONADE ? ":.2...`.LO.
0:HI.99:.8000.....P(D).IN...........OU$.
D(L(D)).H(" GLASSES",8.2.(L(D).1)).",".D
(S(D))." ":.2.....OU$.H(" SIGNS",6.(S(D)
.1)):.2.K...OU$.", PRICE OF".D(P(D)).H("
CENTS",6.(P(D).1)).", RIGHT ? ":.2.U...
.9500.C....YN.0.850.T.... SIMULATION....
..".":.RX.5,3250,3400,5,5,5,5,5,5...D..N
(D).L(D).1310...N..P(D).P9.1260...X.N1.(
P9.P(D)).P9..8.S2.S2:.1270.....N1.(P9.2.
S2.P(D).2).....N2.R.(N1.N1.(1..(.S(D).C9
).C2)).;...N(D)..(N2.(.95..(1)..1)).X...
..C(N(D))...C(L(D)).1310.F...N(D).L(D)..
...M(D).N(D).P(D)..01:E(D).S(D).S3.L(D).
C1...2.R(D).M(D).E(D):A(D).A(D).R(D).L..
.. RESULTS & RESTART...@.Y.8:.RX.2.Y.11.
..J..RX.3.Y.11...^.....H..I.1.10:.X(I),T
$(I):.I.F.R..2,DAY,4,SIGNS,7,MADE,10,SOL
D,13,PRICE$,18,INCOME$.Z.|..23,EXPENSE$,
28,PROFIT(,30,OR LOSS ),37,ASSETS$......
I.1.10.....X.X(I):OU$.T$(I):.8300......I
.....X.12:.8200...B.. "($) ($) ($) (
$) ($)".....X.0:Y.Y.2:.8200.....DQ.D
D.3:.DQ.1.DQ.1......II.DQ.DD.....I.II.8.
...I.MD.I.I.(MD.1):.1818.O...W.3:K.II:.3
:W.2:K.S(I):.3: W.3:K.L(I):.3:K.N(I):.3.
..!.W.4:OU.P(I)..01:.4:W.6:OU.M(I):.4:W.
5:OU.E(I):.4.H.&.W.6:OU.R(I):.4:W.8:OU.A
(I):.4:..N.+.....2..A(D)..04.1850...4.OU
$."YOU DO NOT HAVE ENOUGH MONEY LEFT TO
":.2.N.6.OU$."STAY IN BUSINESS. YOU ARE
BANKRUPT !! ":.2:.1860.R.:..:."CONTINUE
? ";:.9500:.YN.700...?..:."RESTART AT DA
Y 1 ? ";:.9500:.YN.400.C.D.OU$."BYE, HOP
E YOU HAD FUN !":.2.I.N........ RANDOM R
OUTINES.....OU$."THE WEATHER IS COOL; TH
ERE'S A 50% ":.2.:.&.OU$."CHANCE OF LIGH
T RAIN TODAY. ":.2.E.0.R..5:..Y...OU$."R
OADWORK IS BEING DONE ON YOUR STREET ":.
2.....OU$."TODAY - THE STREET IS CLOSED
TO TRAFFIC. ":.2.S...SX..(1):.P(D).25.SX
..5.R..1 :......N(D).L(D):.......SX..5..
.$...OU$."AT LUNCH TIME THE STREET CREWS
BUY ALL":.2.K.F.OU$."YOUR LEMONADE. ":.
2:N(D).L(D).Q.P.......OU$."A HEAT WAVE I
S PREDICTED FOR TODAY. ":.2:R.2:....H.OU
$."A STORM HITS AS YOU OPEN YOUR STAND.
":.2.U.R.OU$."YOUR SIGNS ":.2...\.OU$."A
ND LEMONADE ARE RUINED.":.2...F.R.0:....
L.OU$.D(K):.4500.".0..8500.;....I("
".OU$,W);:..A.....M. .. AGAIN.|.*..:OU$.
"THINK AGAIN ... YOU HAVE ONLY $":.2...4
..8500...>..OU$." ":OU$."IN CASH ":.2...
H...A.L.PO.C(OU$):.PO.0.....Q..(F(OU$).1
27).32.OU$.J(OU$,2):.7500...V.PZ..(0):.P
Z.39.PZ.PZ.40...[..PZ.PO.40.7570.(.`..PZ
.38.7600.;.J..PY.39.PZ.1..1._.T..(F(J(OU
$,PY,1)).127).32.PY..PY.Z.~..PY:.PY.PY..
1.PY:.7580......PZ.1.7600......OU$;:OU$.
"":.......H(OU$,PY);:OU$.J(OU$,PY.1).H..
..:.7500.T.@.. INPUT......9000......I.1.
C(IN$).....C$.J(IN$,I,1).$....("0"..C$.C
$.."9").C$."+". 8140.,....:..H.B.OU$."TY
PE A WHOLE NUMBER FROM".D(LO)." TO".D(HI
).":":.2.X.G.." ";:.8000..L..I...V.IN.E
(IN$)......IN.LO.IN.HI.8125.......... .
CC.... . H(".........................",Y
.1);.X.1);".";.... ....L . ?OU$ VERTICAL
...V .8200.... .OI.C(OU$).1..1.4.. .J(OU
$,OI,1)"..";.:.. ..@.. ..[.4!. OU TO OU$
AS DOLLARS..>!CS..C(OU):CN..(CS):DN..(
CN.100). .R!DN$."":.DN..0.DN$.J(D(DN),2)
...W!.CS.0.DN$."-".DN$.U.\!OU$.DN$.".".I
(D(CN.100),2)...P!....(#. LOWER...-#IN$.
""...2#.IM$:.IM$."".9010.".<#IM.F(IM$):.
IM.20.9090.;.F#IV.127.IM:.IV.13..:..K.K#
.IV.32.9010.Y.P#IU$.G(IV)...Z#.IU$.."A".
IU$.."Z".IM$.G(IM.128.255)...D#.IM$;:IN$
.IN$.IM$:.9010....#.IN$."".9010....#.IM$
;.S..#IN$.J(IN$,1,C(IN$).1)... #.9010...
.%. YES/NO...&%YN..1:.9000...0%.IN$.""..
...5%IM.F(IN$).'.:%.IM.F("Y")...=.D%.IM.
F("N").YN.0:..W.N%."YES OR NO? ";:.9500.
C..&. LOWER.Q..&.59468,14.W..'....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL