BAY STREET.C
FILE INFORMATION
FILENAME(S): BAY STREET.C
FILE TYPE(S): PRG
FILE SIZE: 7.7K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 1 disk(s)
FILE HASH
4dd9b55d575cea599379af9483123433ee8991d20534f335a7ac5a40f081a460
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG DEC 84 C | BAY STREET.C | PRG | DuncanTwain | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 51 08 05 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..Q.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 20 20 20 20 20 |********* |
00000030: 2A 20 20 20 20 20 20 20 20 20 22 42 41 59 20 53 |* "BAY S|
00000040: 54 52 45 45 54 22 20 20 20 20 20 20 20 20 20 20 |TREET" |
00000050: 2A 00 A0 08 0A 00 8F 2A 20 20 20 20 20 20 20 20 |*......* |
00000060: 20 20 20 20 20 46 52 4F 4D 20 20 20 20 20 20 20 | FROM |
00000070: 20 20 20 20 20 20 20 2A 20 20 20 20 20 20 20 2A | * *|
00000080: 20 20 20 20 20 20 20 20 52 4F 47 45 52 20 44 2E | ROGER D.|
00000090: 20 42 55 52 47 45 20 20 20 20 20 20 20 20 20 2A | BURGE *|
000000A0: 00 EF 08 0F 00 8F 2A 42 41 53 45 44 20 4F 4E 20 |......*BASED ON |
000000B0: 54 48 45 20 43 4F 4D 4D 4F 44 4F 52 45 20 50 45 |THE COMMODORE PE|
000000C0: 54 20 32 30 30 31 2A 20 20 20 20 20 20 20 2A 20 |T 2001* * |
000000D0: 20 20 20 20 20 20 20 50 52 4F 47 52 41 4D 20 22 | PROGRAM "|
000000E0: 53 54 4F 43 4B 22 20 20 20 20 20 20 20 20 2A 00 |STOCK" *.|
000000F0: 3E 09 14 00 8F 2A 20 20 20 20 52 45 56 49 53 45 |>....* REVISE|
00000100: 44 20 41 4E 44 20 55 50 47 52 41 44 45 44 20 42 |D AND UPGRADED B|
00000110: 59 20 20 20 20 2A 20 20 20 20 20 20 20 2A 20 20 |Y * * |
00000120: 20 20 20 20 20 20 52 4F 47 45 52 20 44 2E 20 42 | ROGER D. B|
00000130: 55 52 47 45 20 20 20 20 20 20 20 20 20 2A 00 8D |URGE *..|
00000140: 09 19 00 8F 2A 20 43 4F 4E 56 45 52 54 45 44 20 |....* CONVERTED |
00000150: 54 4F 20 54 48 45 20 43 4F 4D 4D 4F 44 4F 52 45 |TO THE COMMODORE|
00000160: 20 36 34 20 2A 20 20 20 20 20 20 20 2A 20 20 20 | 64 * * |
00000170: 20 20 20 20 20 20 20 20 20 20 20 42 59 20 20 20 | BY |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 DC 09 | *...|
00000190: 1E 00 8F 2A 20 20 20 20 20 20 20 20 52 4F 47 45 |...* ROGE|
000001A0: 52 20 44 2E 20 42 55 52 47 45 20 20 20 20 20 20 |R D. BURGE |
000001B0: 20 20 20 2A 20 20 20 20 20 20 20 2A 20 20 20 20 | * * |
000001C0: 20 20 20 20 20 20 20 20 20 23 32 36 36 37 20 20 | #2667 |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 2A 00 2B 0A 23 | *.+.#|
000001E0: 00 8F 2A 20 20 20 20 20 20 20 20 20 20 20 4A 55 |..* JU|
000001F0: 4C 59 2C 31 39 38 34 20 20 20 20 20 20 20 20 20 |LY,1984 |
00000200: 20 20 2A 20 20 20 20 20 20 20 2A 20 20 20 20 20 | * * |
00000210: 20 20 20 20 20 20 20 20 20 46 4F 52 20 20 20 20 | FOR |
00000220: 20 20 20 20 20 20 20 20 20 20 2A 00 7A 0A 28 00 | *.z.(.|
00000230: 8F 2A 20 54 4F 52 4F 4E 54 4F 20 50 45 54 20 55 |.* TORONTO PET U|
00000240: 53 45 52 53 20 47 52 4F 55 50 20 49 4E 43 2E 20 |SERS GROUP INC. |
00000250: 20 2A 20 20 20 20 20 20 20 2A 20 20 20 20 20 20 | * * |
00000260: 20 20 54 4F 52 4F 4E 54 4F 2C 20 43 41 4E 41 44 | TORONTO, CANAD|
00000270: 41 20 20 20 20 20 20 20 20 2A 00 C9 0A 2D 00 8F |A *...-..|
00000280: 2A 20 20 20 20 20 20 20 20 43 4C 41 53 53 49 46 |* CLASSIF|
00000290: 49 43 41 54 49 4F 4E 3A 20 20 20 20 20 20 20 20 |ICATION: |
000002A0: 2A 20 20 20 20 20 20 20 2A 20 20 20 52 45 43 52 |* * RECR|
000002B0: 45 41 54 49 4F 4E 41 4C 2C 45 44 55 43 41 54 49 |EATIONAL,EDUCATI|
000002C0: 4F 4E 41 4C 20 20 20 20 2A 00 F0 0A 32 00 8F 2A |ONAL *...2..*|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002F0: 00 06 0B 37 00 97 35 33 32 38 30 2C 33 3A 97 35 |...7..53280,3:.5|
00000300: 33 32 38 31 2C 2E 00 31 0B 3C 00 4B B2 BB 28 AB |3281,..1.<.K..(.|
00000310: 54 49 29 3A 58 24 B2 22 13 11 11 11 11 11 11 11 |TI):X$."........|
00000320: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 9E |................|
00000330: 22 00 69 0B 41 00 86 53 4E 24 28 36 29 2C 53 41 |".i.A..SN$(6),SA|
00000340: 28 36 29 2C 50 4E 24 28 36 29 2C 50 53 28 36 2C |(6),PN$(6),PS(6,|
00000350: 36 29 2C 50 41 28 36 29 2C 44 4E 28 33 29 2C 43 |6),PA(6),DN(3),C|
00000360: 24 28 36 29 2C 43 28 36 29 00 72 0B 46 00 8D 31 |$(6),C(6).r.F..1|
00000370: 35 30 00 7E 0B 4B 00 81 52 B2 31 A4 4E 52 00 91 |50.~.K..R.1.NR..|
00000380: 0B 50 00 44 31 B2 B5 28 36 AC BB 28 31 29 29 AA |.P.D1..(6..(1)).|
00000390: 31 00 A4 0B 55 00 44 32 B2 B5 28 33 AC BB 28 31 |1...U.D2..(3..(1|
000003A0: 29 29 AA 31 00 C5 0B 5A 00 44 33 B2 B5 28 33 AC |)).1...Z.D3..(3.|
000003B0: BB 28 31 29 29 AA 31 3A 44 33 B2 35 AC 32 AE 28 |.(1)).1:D3.5.2.(|
000003C0: 44 33 AB 31 29 00 E6 0B 5F 00 99 58 24 22 20 20 |D3.1)..._..X$" |
000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003E0: 20 20 20 20 20 22 00 00 0C 64 00 99 58 24 53 4E | "...d..X$SN|
000003F0: 24 28 44 31 29 3B 44 4E 24 28 44 32 29 3B 44 33 |$(D1);DN$(D2);D3|
00000400: 00 14 0C 69 00 91 44 32 8D 36 39 35 2C 37 33 30 |...i..D2.695,730|
00000410: 2C 37 36 35 00 20 0C 6E 00 8D 31 30 37 35 3A 82 |,765. .n..1075:.|
00000420: 00 55 0C 73 00 49 58 B2 32 31 3A 4D 4C B2 31 3A |.U.s.IX.21:ML.1:|
00000430: 99 58 24 22 4F 4E 45 20 4D 4F 52 45 20 52 4F 55 |.X$"ONE MORE ROU|
00000440: 4E 44 20 59 2F 4E 20 3F 05 20 20 9D 9D 22 3B 3A |ND Y/N ?. ..";:|
00000450: 8D 31 31 35 30 00 70 0C 78 00 8B 57 4B 24 B3 B1 |.1150.p.x..WK$..|
00000460: 22 4E 22 AF 57 4B 24 B3 B1 22 59 22 A7 31 31 35 |"N".WK$.."Y".115|
00000470: 00 88 0C 7D 00 8B 57 4B 24 B2 22 4E 22 A7 8D 37 |...}..WK$."N"..7|
00000480: 39 30 3A 89 31 32 32 30 00 9B 0C 82 00 81 49 B2 |90:.1220......I.|
00000490: 31 A4 4E 32 3A 8D 34 37 35 3A 82 00 AE 0C 87 00 |1.N2:.475:......|
000004A0: 8B 4E 31 B2 2E A7 5A B2 2E 3A 8D 39 31 30 00 BD |.N1...Z..:.910..|
000004B0: 0C 8C 00 99 22 93 22 3B 3A 8D 33 34 30 00 C5 0C |....".";:.340...|
000004C0: 91 00 89 37 35 00 00 0D 96 00 83 22 53 49 4C 56 |...75......"SILV|
000004D0: 45 52 22 2C 22 20 49 4E 44 20 20 22 2C 22 47 52 |ER"," IND ","GR|
000004E0: 41 49 4E 20 22 2C 22 20 4F 49 4C 20 20 22 2C 22 |AIN "," OIL ","|
000004F0: 47 4F 4C 44 20 20 22 2C 22 42 4F 4E 44 53 20 22 |GOLD ","BONDS "|
00000500: 00 1F 0D 9B 00 81 49 B2 31 A4 36 3A 53 41 28 49 |......I.1.6:SA(I|
00000510: 29 B2 31 30 30 3A 87 53 4E 24 28 49 29 3A 82 00 |).100:.SN$(I):..|
00000520: 3E 0D A0 00 83 22 20 20 55 50 20 20 22 2C 22 20 |>...." UP "," |
00000530: 44 4F 57 4E 22 2C 22 20 20 44 49 56 20 22 00 53 |DOWN"," DIV ".S|
00000540: 0D A5 00 81 49 B2 31 A4 33 3A 87 44 4E 24 28 49 |....I.1.3:.DN$(I|
00000550: 29 3A 82 00 70 0D AA 00 83 22 05 22 2C 22 96 22 |):..p....".","."|
00000560: 2C 22 9E 22 2C 22 1F 22 2C 22 95 22 2C 22 99 22 |,".",".",".","."|
00000570: 00 84 0D AF 00 81 49 B2 31 A4 36 3A 87 43 24 28 |......I.1.6:.C$(|
00000580: 49 29 3A 82 00 97 0D B4 00 83 31 2C 31 30 2C 37 |I):.......1,10,7|
00000590: 2C 36 2C 39 2C 31 33 00 AA 0D B9 00 81 49 B2 31 |,6,9,13......I.1|
000005A0: A4 36 3A 87 43 28 49 29 3A 82 00 B4 0D BE 00 8D |.6:.C(I):.......|
000005B0: 31 31 33 35 00 E7 0D C3 00 49 58 B2 32 30 3A 4D |1135.....IX.20:M|
000005C0: 4C B2 31 3A 99 22 8E 08 13 11 11 11 49 4E 53 54 |L.1:."......INST|
000005D0: 52 55 43 54 49 4F 4E 53 3F 20 28 59 2F 4E 29 22 |RUCTIONS? (Y/N)"|
000005E0: 3B 3A 8D 31 31 35 30 00 FF 0D C8 00 8B 57 4B 24 |;:.1150......WK$|
000005F0: B2 22 59 22 A7 8D 31 32 36 35 3A 89 32 31 30 00 |."Y"..1265:.210.|
00000600: 11 0E CD 00 8B 57 4B 24 B3 B1 22 4E 22 A7 31 39 |.....WK$.."N".19|
00000610: 30 00 44 0E D2 00 49 58 B2 32 34 3A 99 22 13 11 |0.D...IX.24:."..|
00000620: 11 11 48 4F 57 20 4D 41 4E 59 20 50 4C 41 59 45 |..HOW MANY PLAYE|
00000630: 52 53 3F 20 28 31 2D 36 29 20 20 9D 22 3B 3A 8D |RS? (1-6) .";:.|
00000640: 31 31 35 30 00 52 0E D7 00 4E 32 B2 C5 28 57 4B |1150.R...N2..(WK|
00000650: 24 29 00 65 0E DC 00 8B 4E 32 B3 31 B0 4E 32 B1 |$).e....N2.1.N2.|
00000660: 36 A7 32 31 30 00 79 0E E1 00 8B 4E 32 B2 31 A7 |6.210.y....N2.1.|
00000670: 4E 31 B2 2E 3A 89 32 34 35 00 AC 0E E6 00 49 58 |N1..:.245.....IX|
00000680: B2 32 39 3A 99 22 13 11 11 11 4D 41 59 20 59 4F |.29:."....MAY YO|
00000690: 55 52 20 36 34 20 50 4C 41 59 20 54 4F 4F 3F 20 |UR 64 PLAY TOO? |
000006A0: 20 28 59 2F 4E 29 20 20 9D 9D 22 3B 00 CD 0E EB | (Y/N) ..";....|
000006B0: 00 8D 31 31 35 30 3A 8B 57 4B 24 B3 B1 22 4E 22 |..1150:.WK$.."N"|
000006C0: AF 57 4B 24 B3 B1 22 59 22 A7 32 33 30 00 E4 0E |.WK$.."Y".230...|
000006D0: F0 00 4E 31 B2 2E 3A 8B 57 4B 24 B2 22 4E 22 A7 |..N1..:.WK$."N".|
000006E0: 4E 31 B2 31 00 F0 0E F5 00 81 49 B2 31 A4 4E 32 |N1.1......I.1.N2|
000006F0: 00 07 0F FA 00 81 4A B2 31 A4 36 3A 50 53 28 49 |......J.1.6:PS(I|
00000700: 2C 4A 29 B2 2E 3A 82 00 16 0F FF 00 50 41 28 49 |,J)..:......PA(I|
00000710: 29 B2 35 30 30 30 00 5E 0F 04 01 99 22 13 11 11 |).5000.^...."...|
00000720: 11 50 4C 41 59 45 52 20 20 20 20 9D 9D 9D 9D 22 |.PLAYER ...."|
00000730: 3B 49 3B 22 57 48 41 54 20 49 53 20 59 4F 55 52 |;I;"WHAT IS YOUR|
00000740: 20 4E 41 4D 45 3F 20 20 20 20 20 20 20 20 20 20 | NAME? |
00000750: 20 20 20 20 20 20 20 22 3A 4D 4C B2 32 34 00 80 | ":ML.24..|
00000760: 0F 09 01 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 | ."|
00000780: 00 9A 0F 0E 01 49 58 B2 2E 3A 8D 31 31 35 30 3A |.....IX..:.1150:|
00000790: 50 4E 24 28 49 29 B2 57 4B 24 00 B9 0F 13 01 8B |PN$(I).WK$......|
000007A0: C3 28 57 4B 24 29 B2 2E B0 C8 28 57 4B 24 2C 31 |.(WK$)....(WK$,1|
000007B0: 29 B2 22 20 22 A7 32 36 30 00 BF 0F 18 01 82 00 |)." ".260.......|
000007C0: DF 0F 1D 01 50 4E 24 28 2E 29 B2 22 59 4F 55 52 |....PN$(.)."YOUR|
000007D0: 20 36 34 22 3A 50 41 28 2E 29 B2 32 30 30 30 00 | 64":PA(.).2000.|
000007E0: F8 0F 22 01 81 49 B2 31 A4 36 3A 50 53 28 2E 2C |.."..I.1.6:PS(.,|
000007F0: 49 29 B2 35 30 30 3A 82 00 01 10 27 01 8D 34 32 |I).500:....'..42|
00000800: 35 00 14 10 2C 01 8B 4E 31 B2 2E A7 49 B2 2E 3A |5...,..N1...I..:|
00000810: 8D 35 34 35 00 22 10 31 01 8B 4E 31 A7 8D 31 31 |.545.".1..N1..11|
00000820: 33 35 00 58 10 36 01 99 C8 28 58 24 2C 31 36 29 |35.X.6...(X$,16)|
00000830: 22 9E 48 4F 57 20 4D 41 4E 59 20 43 4F 4D 50 4C |".HOW MANY COMPL|
00000840: 45 54 45 20 52 4F 55 4E 44 53 20 42 45 46 4F 52 |ETE ROUNDS BEFOR|
00000850: 45 20 42 55 59 49 4E 47 00 92 10 3B 01 99 22 41 |E BUYING...;.."A|
00000860: 4E 44 20 53 45 4C 4C 49 4E 47 20 53 54 4F 43 4B |ND SELLING STOCK|
00000870: 53 20 28 31 2D 33 29 3F 20 20 20 9D 9D 9D 05 22 |S (1-3)? ...."|
00000880: 3B 3A 49 58 B2 32 36 3A 4D 4C B2 31 3A 8D 31 31 |;:IX.26:ML.1:.11|
00000890: 35 30 00 A0 10 40 01 4E 52 B2 C5 28 57 4B 24 29 |50...@.NR..(WK$)|
000008A0: 00 B3 10 45 01 8B 4E 52 B3 31 B0 4E 52 B1 33 A7 |...E..NR.1.NR.3.|
000008B0: 33 31 30 00 D2 10 4A 01 4E 52 B2 4E 52 AC 28 31 |310...J.NR.NR.(1|
000008C0: AB 4E 31 AA 4E 32 29 3A 99 22 93 22 3B 3A 8D 33 |.N1.N2):.".";:.3|
000008D0: 34 30 00 D8 10 4F 01 8E 00 0E 11 54 01 99 22 11 |40...O.....T..".|
000008E0: 11 11 12 9F 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
000008F0: 20 20 20 42 41 59 20 53 54 52 45 45 54 20 20 20 | BAY STREET |
00000900: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 3E | ";.>|
00000910: 11 59 01 99 22 20 20 20 20 20 20 20 20 20 20 46 |.Y.." F|
00000920: 52 4F 4D 20 20 52 4F 47 45 52 20 44 2E 20 42 55 |ROM ROGER D. BU|
00000930: 52 47 45 20 20 20 20 20 20 20 20 20 20 22 00 64 |RGE ".d|
00000940: 11 5E 01 81 4B B2 2E A4 31 39 3A 99 22 13 11 9D |.^..K...19:."...|
00000950: 94 94 22 3A 97 32 31 38 2C 31 33 32 3A 82 3A 99 |..":.218,132:.:.|
00000960: 22 13 22 3B 00 75 11 63 01 81 49 B2 31 39 30 A4 |".";.u.c..I.190.|
00000970: 2E A9 AB 31 30 00 8E 11 68 01 47 24 B2 22 98 22 |...10...h.G$."."|
00000980: 3A 8B 49 B2 31 30 30 A7 47 24 B2 22 1C 22 00 C0 |:.I.100.G$."."..|
00000990: 11 6D 01 47 4E 24 B2 22 20 20 22 AA C4 28 49 29 |.m.GN$." "..(I)|
000009A0: 3A 47 4E 24 B2 C9 28 47 4E 24 2C 33 29 3A 47 4E |:GN$..(GN$,3):GN|
000009B0: 24 B2 22 05 22 AA 47 4E 24 AA 47 24 AA 22 C0 22 |$.".".GN$.G$."."|
000009C0: 00 D4 11 72 01 81 4A B2 31 A4 36 3A 57 4B 24 B2 |...r..J.1.6:WK$.|
000009D0: 22 C0 C0 22 00 F2 11 77 01 8B 53 41 28 4A 29 B1 |".."...w..SA(J).|
000009E0: 49 A7 57 4B 24 B2 43 24 28 4A 29 AA 22 12 20 20 |I.WK$.C$(J).". |
000009F0: 92 22 00 0E 12 7C 01 8B 53 41 28 4A 29 B2 49 A7 |."...|..SA(J).I.|
00000A00: 57 4B 24 B2 43 24 28 4A 29 AA 22 A2 A2 22 00 34 |WK$.C$(J)."..".4|
00000A10: 12 81 01 57 4B 24 B2 57 4B 24 AA 47 24 AA 22 C0 |...WK$.WK$.G$.".|
00000A20: 22 3A 8B 4A B3 36 A7 57 4B 24 B2 57 4B 24 AA 22 |":.J.6.WK$.WK$."|
00000A30: C0 C0 C0 22 00 46 12 86 01 47 4E 24 B2 47 4E 24 |...".F...GN$.GN$|
00000A40: AA 57 4B 24 3A 82 00 5F 12 8B 01 49 24 B2 C9 28 |.WK$:.._...I$..(|
00000A50: C4 28 49 29 2C C3 28 C4 28 49 29 29 AB 31 29 00 |.(I),.(.(I)).1).|
00000A60: 83 12 90 01 8B C3 28 49 24 29 B3 33 A7 81 4B B2 |......(I$).3..K.|
00000A70: C3 28 49 24 29 A4 32 3A 49 24 B2 49 24 AA 22 20 |.(I$).2:I$.I$." |
00000A80: 22 3A 82 00 92 12 95 01 99 47 4E 24 22 05 22 49 |":.......GN$"."I|
00000A90: 24 3B 00 98 12 9A 01 82 00 CD 12 9F 01 99 22 20 |$;............" |
00000AA0: 20 20 22 3B 53 4E 24 28 31 29 3B 53 4E 24 28 32 | ";SN$(1);SN$(2|
00000AB0: 29 3B 53 4E 24 28 33 29 3B 53 4E 24 28 34 29 3B |);SN$(3);SN$(4);|
00000AC0: 53 4E 24 28 35 29 3B 53 4E 24 28 36 29 00 D3 12 |SN$(5);SN$(6)...|
00000AD0: A4 01 8E 00 DF 12 A9 01 81 49 B2 31 A4 4E 32 00 |.........I.1.N2.|
00000AE0: E8 12 AE 01 8D 35 34 35 00 0F 13 B3 01 99 22 91 |.....545......".|
00000AF0: 9E 59 4F 55 20 4D 55 53 54 20 42 55 59 20 53 4F |.YOU MUST BUY SO|
00000B00: 4D 45 20 53 54 4F 43 4B 05 22 3A 42 53 B2 31 00 |ME STOCK.":BS.1.|
00000B10: 19 13 B8 01 8D 31 30 33 30 00 22 13 BD 01 8D 36 |.....1030."....6|
00000B20: 34 35 00 5A 13 C2 01 8B 53 4E B2 37 A7 99 22 9E |45.Z....SN.7..".|
00000B30: 49 4E 53 55 46 46 49 43 49 45 4E 54 20 46 55 4E |INSUFFICIENT FUN|
00000B40: 44 53 05 22 3A 81 4B B2 2E A4 32 30 30 30 3A 82 |DS.":.K...2000:.|
00000B50: 3A 8D 35 34 35 3A 89 34 34 30 00 63 13 C7 01 8D |:.545:.440.c....|
00000B60: 34 37 35 00 77 13 CC 01 8B 50 41 28 49 29 B2 35 |475.w....PA(I).5|
00000B70: 30 30 30 A7 34 33 30 00 7D 13 D1 01 82 00 83 13 |000.430.}.......|
00000B80: D6 01 8E 00 8C 13 DB 01 8D 35 34 35 00 CB 13 E0 |.........545....|
00000B90: 01 42 53 B2 2E 3A 49 58 B2 32 38 3A 4D 4C B2 31 |.BS..:IX.28:ML.1|
00000BA0: 3A 99 22 91 42 55 59 2C 20 53 45 4C 4C 20 4F 52 |:.".BUY, SELL OR|
00000BB0: 20 4E 4F 54 48 49 4E 47 20 42 2F 53 2F 4E 3F 20 | NOTHING B/S/N? |
00000BC0: 20 9D 9D 22 3B 3A 8D 31 31 35 30 00 F8 13 E5 01 | ..";:.1150.....|
00000BD0: 8B 57 4B 24 B3 B1 22 4E 22 AF 57 4B 24 B3 B1 22 |.WK$.."N".WK$.."|
00000BE0: 53 22 AF 57 4B 24 B3 B1 22 42 22 A7 99 3A 99 22 |S".WK$.."B"..:."|
00000BF0: 91 91 22 3A 89 34 38 30 00 0A 14 EA 01 8B 57 4B |..":.480......WK|
00000C00: 24 B2 22 42 22 A7 42 53 B2 31 00 19 14 EF 01 8B |$."B".BS.1......|
00000C10: 57 4B 24 B2 22 4E 22 A7 8E 00 2B 14 F4 01 53 42 |WK$."N"...+...SB|
00000C20: 24 B2 57 4B 24 3A 99 3A 99 22 91 00 35 14 F9 01 |$.WK$:.:."..5...|
00000C30: 8D 31 30 33 30 00 47 14 FE 01 8B 53 42 24 B2 22 |.1030.G....SB$."|
00000C40: 53 22 A7 8D 36 37 30 00 59 14 03 02 8B 53 42 24 |S"..670.Y....SB$|
00000C50: B2 22 42 22 A7 8D 36 34 35 00 67 14 08 02 8B 53 |."B"..645.g....S|
00000C60: 4E B3 37 A7 34 37 35 00 94 14 0D 02 8B 53 42 24 |N.7.475......SB$|
00000C70: B2 22 53 22 A7 99 22 9E 59 4F 55 20 44 4F 4E 27 |."S"..".YOU DON'|
00000C80: 54 20 4F 57 4E 20 45 4E 4F 55 47 48 20 53 54 4F |T OWN ENOUGH STO|
00000C90: 43 4B 05 22 00 C2 14 12 02 8B 53 42 24 B2 22 42 |CK."......SB$."B|
00000CA0: 22 A7 99 22 9E 59 4F 55 20 44 4F 4E 27 54 20 48 |"..".YOU DON'T H|
00000CB0: 41 56 45 20 45 4E 4F 55 47 48 20 4D 4F 4E 45 59 |AVE ENOUGH MONEY|
00000CC0: 05 22 00 D2 14 17 02 81 4B B2 31 A4 32 30 30 30 |."......K.1.2000|
00000CD0: 3A 82 00 DB 14 1C 02 89 34 37 35 00 0F 15 21 02 |:.......475...!.|
00000CE0: 99 22 93 9E 12 20 20 20 20 20 20 20 20 20 20 20 |."... |
00000CF0: 20 20 20 20 42 41 59 20 53 54 52 45 45 54 20 20 | BAY STREET |
00000D00: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 | ";.|
00000D10: 42 15 26 02 99 22 20 20 20 20 20 20 20 20 20 20 |B.&.." |
00000D20: 46 52 4F 4D 20 20 52 4F 47 45 52 20 44 2E 20 42 |FROM ROGER D. B|
00000D30: 55 52 47 45 20 20 20 20 20 20 20 20 20 20 05 92 |URGE ..|
00000D40: 22 3B 00 89 15 2B 02 57 4B 24 B2 22 20 50 4F 52 |";...+.WK$." POR|
00000D50: 54 46 4F 4C 49 4F 20 2D 20 22 AA 50 4E 24 28 49 |TFOLIO - ".PN$(I|
00000D60: 29 3A 57 4B B2 B5 28 28 34 30 AB C3 28 57 4B 24 |):WK..((40..(WK$|
00000D70: 29 29 AD 32 29 3A 81 4B B2 31 A4 57 4B 3A 57 4B |)).2):.K.1.WK:WK|
00000D80: 24 B2 22 20 22 AA 57 4B 24 00 BB 15 30 02 82 3A |$." ".WK$...0..:|
00000D90: 57 4B B2 34 30 AB C3 28 57 4B 24 29 3A 81 4B B2 |WK.40..(WK$):.K.|
00000DA0: 31 A4 57 4B 3A 57 4B 24 B2 57 4B 24 AA 22 20 22 |1.WK:WK$.WK$." "|
00000DB0: 3A 82 3A 99 22 12 9F 22 57 4B 24 00 DF 15 35 02 |:.:.".."WK$...5.|
00000DC0: 99 22 05 20 23 20 20 44 45 53 43 20 20 20 56 41 |.". # DESC VA|
00000DD0: 4C 55 45 20 20 20 48 4F 4C 44 49 4E 47 53 22 00 |LUE HOLDINGS".|
00000DE0: 02 16 3A 02 99 22 20 A3 A0 A0 A3 A3 A3 A3 A0 20 |..:.." ........ |
00000DF0: A0 A3 A3 A3 A3 A3 A0 20 A0 A3 A3 A3 A3 A3 A3 A3 |....... ........|
00000E00: A3 22 00 0D 16 3F 02 81 4B B2 31 A4 36 00 2F 16 |."...?..K.1.6./.|
00000E10: 44 02 57 4B 24 B2 22 20 20 22 AA C4 28 53 41 28 |D.WK$." "..(SA(|
00000E20: 4B 29 29 3A 56 24 B2 C9 28 57 4B 24 2C 33 29 00 |K)):V$..(WK$,3).|
00000E30: 51 16 49 02 57 4B B2 50 53 28 49 2C 4B 29 3A 57 |Q.I.WK.PS(I,K):W|
00000E40: 4B 24 B2 22 20 20 20 20 20 20 22 AA C4 28 57 4B |K$." "..(WK|
00000E50: 29 00 63 16 4E 02 3A 57 4B 24 B2 C9 28 57 4B 24 |).c.N.:WK$..(WK$|
00000E60: 2C 37 29 00 7B 16 53 02 8B 57 4B B3 31 30 30 30 |,7).{.S..WK.1000|
00000E70: A7 48 24 B2 22 20 22 AA 57 4B 24 00 A0 16 58 02 |.H$." ".WK$...X.|
00000E80: 8B 57 4B B1 35 30 30 A7 48 24 B2 C8 28 57 4B 24 |.WK.500.H$..(WK$|
00000E90: 2C 34 29 AA 22 2C 22 AA C9 28 57 4B 24 2C 33 29 |,4).","..(WK$,3)|
00000EA0: 00 B5 16 5D 02 57 4B 24 B2 22 20 22 AA C4 28 4B |...].WK$." "..(K|
00000EB0: 29 AA 22 20 22 00 BF 16 62 02 99 57 4B 24 3B 00 |)." "...b..WK$;.|
00000EC0: F4 16 67 02 8B C8 28 53 4E 24 28 4B 29 2C 31 29 |..g...(SN$(K),1)|
00000ED0: B2 22 20 22 A7 99 C9 28 53 4E 24 28 4B 29 2C C3 |." "...(SN$(K),.|
00000EE0: 28 53 4E 24 28 4B 29 29 AB 31 29 22 20 22 3B 3A |(SN$(K)).1)" ";:|
00000EF0: 89 36 32 35 00 01 17 6C 02 99 53 4E 24 28 4B 29 |.625...l..SN$(K)|
00000F00: 3B 00 18 17 71 02 99 22 20 20 20 22 3B 56 24 3B |;...q.." ";V$;|
00000F10: 22 20 20 20 22 3B 48 24 00 1E 17 76 02 82 00 41 |" ";H$...v...A|
00000F20: 17 7B 02 99 3A 99 22 43 41 53 48 20 4F 4E 20 48 |.{..:."CASH ON H|
00000F30: 41 4E 44 20 2D 2D 2D 20 22 3B 50 41 28 49 29 3A |AND --- ";PA(I):|
00000F40: 99 00 47 17 80 02 8E 00 61 17 85 02 57 4B B2 53 |..G.....a...WK.S|
00000F50: 41 28 53 4E 29 AC 53 51 AD 31 30 30 3A 50 54 B2 |A(SN).SQ.100:PT.|
00000F60: 31 00 76 17 8A 02 8B 57 4B B1 50 41 28 49 29 A7 |1.v....WK.PA(I).|
00000F70: 53 4E B2 37 3A 8E 00 89 17 8F 02 50 41 28 49 29 |SN.7:......PA(I)|
00000F80: B2 50 41 28 49 29 AB 57 4B 00 A2 17 94 02 50 53 |.PA(I).WK.....PS|
00000F90: 28 49 2C 53 4E 29 B2 50 53 28 49 2C 53 4E 29 AA |(I,SN).PS(I,SN).|
00000FA0: 53 51 00 A8 17 99 02 8E 00 B1 17 9E 02 50 54 B2 |SQ...........PT.|
00000FB0: 31 00 C9 17 A3 02 8B 53 51 B1 50 53 28 49 2C 53 |1......SQ.PS(I,S|
00000FC0: 4E 29 A7 53 4E B2 37 3A 8E 00 E7 17 A8 02 50 41 |N).SN.7:......PA|
00000FD0: 28 49 29 B2 50 41 28 49 29 AA 53 41 28 53 4E 29 |(I).PA(I).SA(SN)|
00000FE0: AC 53 51 AD 31 30 30 00 00 18 AD 02 50 53 28 49 |.SQ.100.....PS(I|
00000FF0: 2C 53 4E 29 B2 50 53 28 49 2C 53 4E 29 AB 53 51 |,SN).PS(I,SN).SQ|
00001000: 00 06 18 B2 02 8E 00 1B 18 B7 02 53 41 28 44 31 |...........SA(D1|
00001010: 29 B2 53 41 28 44 31 29 AA 44 33 00 2D 18 BC 02 |).SA(D1).D3.-...|
00001020: 8B 53 41 28 44 31 29 B3 32 30 30 A7 8E 00 3C 18 |.SA(D1).200...<.|
00001030: C1 02 53 41 28 44 31 29 B2 31 30 30 00 49 18 C6 |..SA(D1).100.I..|
00001040: 02 81 49 B2 4E 31 A4 4E 32 00 61 18 CB 02 50 53 |..I.N1.N2.a...PS|
00001050: 28 49 2C 44 31 29 B2 50 53 28 49 2C 44 31 29 AC |(I,D1).PS(I,D1).|
00001060: 32 00 67 18 D0 02 82 00 6D 18 D5 02 8E 00 82 18 |2.g.....m.......|
00001070: DA 02 53 41 28 44 31 29 B2 53 41 28 44 31 29 AB |..SA(D1).SA(D1).|
00001080: 44 33 00 92 18 DF 02 8B 53 41 28 44 31 29 B1 2E |D3......SA(D1)..|
00001090: A7 8E 00 A1 18 E4 02 53 41 28 44 31 29 B2 31 30 |.......SA(D1).10|
000010A0: 30 00 AE 18 E9 02 81 49 B2 4E 31 A4 4E 32 00 BD |0......I.N1.N2..|
000010B0: 18 EE 02 50 53 28 49 2C 44 31 29 B2 2E 00 C3 18 |...PS(I,D1).....|
000010C0: F3 02 82 00 C9 18 F8 02 8E 00 DB 18 FD 02 8B 53 |...............S|
000010D0: 41 28 44 31 29 B3 31 30 30 A7 8E 00 E8 18 02 03 |A(D1).100.......|
000010E0: 81 49 B2 4E 31 A4 4E 32 00 09 19 07 03 3A 50 41 |.I.N1.N2.....:PA|
000010F0: 28 49 29 B2 50 41 28 49 29 AA 50 53 28 49 2C 44 |(I).PA(I).PS(I,D|
00001100: 31 29 AC 44 33 AD 31 30 30 00 0F 19 0C 03 82 00 |1).D3.100.......|
00001110: 15 19 11 03 8E 00 49 19 16 03 8D 31 31 33 35 3A |......I....1135:|
00001120: 99 22 1D 1D 50 4C 41 59 45 52 20 4E 41 4D 45 20 |."..PLAYER NAME |
00001130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 | CA|
00001140: 53 48 20 56 41 4C 55 45 22 00 77 19 1B 03 99 22 |SH VALUE".w...."|
00001150: 1D 1D A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 20 20 |............. |
00001160: 20 20 20 20 20 20 20 20 20 20 20 20 A3 A3 A3 A3 | ....|
00001170: A3 A3 A3 A3 A3 A3 22 00 84 19 20 03 81 4B B2 4E |......"... ..K.N|
00001180: 31 A4 4E 32 00 8F 19 25 03 81 4A B2 31 A4 36 00 |1.N2...%..J.1.6.|
00001190: B3 19 2A 03 3A 3A 50 41 28 4B 29 B2 50 41 28 4B |..*.::PA(K).PA(K|
000011A0: 29 AA 53 41 28 4A 29 AC 50 53 28 4B 2C 4A 29 AD |).SA(J).PS(K,J).|
000011B0: 31 30 30 00 B9 19 2F 03 82 00 BF 19 34 03 82 00 |100.../.....4...|
000011C0: CC 19 39 03 81 4B B2 4E 31 A4 4E 32 00 D7 19 3E |..9..K.N1.N2...>|
000011D0: 03 3A 57 4B B2 AB 31 00 E4 19 43 03 81 4A B2 4E |.:WK..1...C..J.N|
000011E0: 31 A4 4E 32 00 FF 19 48 03 8B 50 41 28 4A 29 B1 |1.N2...H..PA(J).|
000011F0: 57 4B A7 57 4B B2 50 41 28 4A 29 3A 49 B2 4A 00 |WK.WK.PA(J):I.J.|
00001200: 06 1A 4D 03 3A 82 00 23 1A 52 03 57 4B 24 B2 22 |..M.:..#.R.WK$."|
00001210: 20 20 20 20 20 20 20 20 20 22 AA C4 28 50 41 28 | "..(PA(|
00001220: 49 29 29 00 40 1A 57 03 57 4B 24 B2 C9 28 57 4B |I)).@.W.WK$..(WK|
00001230: 24 2C 38 29 3A 56 24 B2 C8 28 57 4B 24 2C 32 29 |$,8):V$..(WK$,2)|
00001240: 00 58 1A 5C 03 8B 56 24 B3 B1 22 20 20 22 A7 56 |.X.\..V$.." ".V|
00001250: 24 B2 56 24 AA 22 2C 22 00 70 1A 61 03 8B 56 24 |$.V$.",".p.a..V$|
00001260: B2 20 22 20 20 22 A7 56 24 B2 56 24 AA 22 20 22 |. " ".V$.V$." "|
00001270: 00 86 1A 66 03 3A 56 24 B2 56 24 AA CA 28 57 4B |...f.:V$.V$..(WK|
00001280: 24 2C 33 2C 33 29 00 A2 1A 6B 03 8B C9 28 56 24 |$,3,3)...k...(V$|
00001290: 2C 31 29 B3 B1 22 20 22 A7 56 24 B2 56 24 AA 22 |,1).." ".V$.V$."|
000012A0: 2C 22 00 BD 1A 70 03 8B C9 28 56 24 2C 31 29 B2 |,"...p...(V$,1).|
000012B0: 22 20 22 A7 56 24 B2 56 24 AA 22 20 22 00 D1 1A |" ".V$.V$." "...|
000012C0: 75 03 3A 56 24 B2 56 24 AA C9 28 57 4B 24 2C 33 |u.:V$.V$..(WK$,3|
000012D0: 29 00 13 1B 7A 03 99 22 20 20 22 50 4E 24 28 49 |)...z.." "PN$(I|
000012E0: 29 3B A3 32 38 29 3B 56 24 3A 99 22 1D 1D C0 C0 |);.28);V$:."....|
000012F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001300: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001310: C0 C0 22 00 21 1B 7F 03 3A 50 41 28 49 29 B2 AB |..".!...:PA(I)..|
00001320: 31 00 27 1B 84 03 82 00 2D 1B 89 03 8E 00 45 1B |1.'.....-.....E.|
00001330: 8E 03 49 B2 2E 3A 50 54 B2 2E 3A 8D 35 34 35 3A |..I..:PT..:.545:|
00001340: 99 22 91 22 3B 00 5D 1B 93 03 81 53 4E B2 31 A4 |.".";.]....SN.1.|
00001350: 36 3A 53 51 B2 50 53 28 2E 2C 53 4E 29 00 8F 1B |6:SQ.PS(.,SN)...|
00001360: 98 03 8B 53 41 28 53 4E 29 B3 39 35 AF 53 51 B1 |...SA(SN).95.SQ.|
00001370: 2E A7 99 22 53 45 4C 4C 22 3B 53 51 3B 53 4E 24 |..."SELL";SQ;SN$|
00001380: 28 53 4E 29 3A 5A B2 5A AA 31 3A 8D 36 37 30 00 |(SN):Z.Z.1:.670.|
00001390: 9D 1B 9D 03 8B 5A B2 31 30 A7 99 22 93 00 A3 1B |.....Z.10.."....|
000013A0: A2 03 82 00 B3 1B A7 03 81 4B B2 31 A4 31 35 30 |.........K.1.150|
000013B0: 30 3A 82 00 CA 1B AC 03 8B 50 41 28 2E 29 B3 36 |0:.......PA(.).6|
000013C0: 30 30 A7 8D 31 30 30 35 3A 8E 00 DD 1B B1 03 57 |00..1005:......W|
000013D0: 4B B2 30 3A 53 51 B2 39 39 39 39 39 39 00 E8 1B |K.0:SQ.999999...|
000013E0: B6 03 81 4A B2 31 A4 36 00 12 1C BB 03 8B 53 41 |...J.1.6......SA|
000013F0: 28 4A 29 B1 31 30 35 AF 50 53 28 2E 2C 4A 29 B3 |(J).105.PS(.,J).|
00001400: 53 51 A7 57 4B B2 4A 3A 53 51 B2 50 53 28 2E 2C |SQ.WK.J:SQ.PS(.,|
00001410: 4A 29 00 18 1C C0 03 82 00 22 1C C5 03 53 4E B2 |J)......."...SN.|
00001420: 57 4B 00 34 1C CA 03 8B 57 4B B2 2E A7 8D 31 30 |WK.4....WK....10|
00001430: 30 35 3A 8E 00 44 1C CF 03 53 51 B2 35 30 30 3A |05:..D...SQ.500:|
00001440: 8D 36 34 35 00 56 1C D4 03 8B 53 4E B2 37 A7 8D |.645.V....SN.7..|
00001450: 31 30 30 35 3A 8E 00 64 1C D9 03 8B 5A B2 31 30 |1005:..d....Z.10|
00001460: A7 99 22 93 00 82 1C DE 03 99 22 42 55 59 20 35 |.."......."BUY 5|
00001470: 30 30 20 22 3B 53 4E 24 28 53 4E 29 3A 5A B2 5A |00 ";SN$(SN):Z.Z|
00001480: AA 31 00 92 1C E3 03 81 4B B2 31 A4 31 30 30 30 |.1......K.1.1000|
00001490: 3A 82 00 9B 1C E8 03 89 39 34 35 00 AA 1C ED 03 |:.......945.....|
000014A0: 81 4B B2 31 A4 33 30 30 3A 82 00 B9 1C F2 03 8B |.K.1.300:.......|
000014B0: 50 54 B2 31 A7 8D 35 34 35 00 D8 1C F7 03 8B 50 |PT.1..545......P|
000014C0: 54 B2 2E A7 99 3A 99 22 4E 4F 20 54 52 41 4E 53 |T....:."NO TRANS|
000014D0: 41 43 54 49 4F 4E 53 22 00 E8 1C FC 03 81 4B B2 |ACTIONS"......K.|
000014E0: 31 A4 32 30 30 30 3A 82 00 EE 1C 01 04 8E 00 02 |1.2000:.........|
000014F0: 1D 06 04 99 22 53 54 4F 43 4B 23 3F 20 20 9D 9D |...."STOCK#? ..|
00001500: 22 3B 00 20 1D 0B 04 49 58 B2 38 3A 4D 4C B2 31 |";. ...IX.8:ML.1|
00001510: 3A 8D 31 31 35 30 3A 53 4E B2 C5 28 57 4B 24 29 |:.1150:SN..(WK$)|
00001520: 00 3E 1D 10 04 8B 53 4E B3 31 B0 53 4E B1 36 A7 |.>....SN.1.SN.6.|
00001530: 99 3A 99 22 91 91 91 22 3A 89 31 30 33 30 00 4C |.:."...":.1030.L|
00001540: 1D 15 04 8B 42 53 A7 8D 31 32 35 30 00 61 1D 1A |....BS..1250.a..|
00001550: 04 99 3A 99 22 51 55 41 4E 54 49 54 59 3F 20 22 |..:."QUANTITY? "|
00001560: 3B 00 80 1D 1F 04 4D 4C B2 36 3A 49 58 B2 31 30 |;.....ML.6:IX.10|
00001570: 3A 8D 31 31 35 30 3A 53 51 B2 C5 28 57 4B 24 29 |:.1150:SQ..(WK$)|
00001580: 00 98 1D 24 04 57 4B B2 53 51 AB B5 28 53 51 AD |...$.WK.SQ..(SQ.|
00001590: 35 30 30 29 AC 35 30 30 00 C3 1D 29 04 8B 57 4B |500).500...)..WK|
000015A0: A7 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 |..".......... |
000015B0: 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 89 31 | .......";:.1|
000015C0: 30 35 35 00 C9 1D 2E 04 8E 00 EE 1D 33 04 53 31 |055.........3.S1|
000015D0: B2 31 30 32 34 AA 37 36 34 AA 28 44 31 AB 31 29 |.1024.764.(D1.1)|
000015E0: AC 36 3A 43 31 B2 53 31 AA 35 34 32 37 32 00 FE |.6:C1.S1.54272..|
000015F0: 1D 38 04 81 4B B2 2E A4 31 39 30 A9 31 30 00 08 |.8..K...190.10..|
00001600: 1E 3D 04 57 4B B2 36 34 00 1D 1E 42 04 8B 53 41 |.=.WK.64...B..SA|
00001610: 28 44 31 29 B1 4B A7 57 4B B2 31 36 30 00 31 1E |(D1).K.WK.160.1.|
00001620: 47 04 8B 53 41 28 44 31 29 B2 4B A7 57 4B B2 39 |G..SA(D1).K.WK.9|
00001630: 38 00 68 1E 4C 04 97 53 31 2C 57 4B 3A 97 53 31 |8.h.L..S1,WK:.S1|
00001640: AA 31 2C 57 4B 3A 8B 57 4B B1 36 34 A7 97 43 31 |.1,WK:.WK.64..C1|
00001650: 2C 43 28 44 31 29 3A 97 43 31 AA 31 2C 43 28 44 |,C(D1):.C1.1,C(D|
00001660: 31 29 3A 89 31 31 31 35 00 87 1E 51 04 8B 4B B2 |1):.1115...Q..K.|
00001670: 31 30 30 A7 97 43 31 2C 32 3A 97 43 31 AA 31 2C |100..C1,2:.C1.1,|
00001680: 32 3A 89 31 31 31 35 00 9B 1E 56 04 97 43 31 2C |2:.1115...V..C1,|
00001690: 31 32 3A 97 43 31 AA 31 2C 31 32 00 B1 1E 5B 04 |12:.C1.1,12...[.|
000016A0: 53 31 B2 53 31 AB 34 30 3A 43 31 B2 43 31 AB 34 |S1.S1.40:C1.C1.4|
000016B0: 30 00 B7 1E 60 04 82 00 C6 1E 65 04 81 4B B2 31 |0...`.....e..K.1|
000016C0: A4 35 30 30 3A 82 00 CC 1E 6A 04 8E 00 00 1F 6F |.500:....j.....o|
000016D0: 04 99 22 93 12 9F 20 20 20 20 20 20 20 20 20 20 |.."... |
000016E0: 20 20 20 20 20 42 41 59 20 53 54 52 45 45 54 20 | BAY STREET |
000016F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00001700: 00 33 1F 74 04 99 22 20 20 20 20 20 20 20 20 20 |.3.t.." |
00001710: 20 46 52 4F 4D 20 20 52 4F 47 45 52 20 44 2E 20 | FROM ROGER D. |
00001720: 42 55 52 47 45 20 20 20 20 20 20 20 20 20 20 05 |BURGE .|
00001730: 22 3A 8E 00 45 1F 7E 04 57 4B 24 B2 22 22 3A 97 |":..E.~.WK$."":.|
00001740: 31 39 38 2C 2E 00 58 1F 83 04 97 32 31 31 2C 49 |198,..X....211,I|
00001750: 58 3A 97 32 30 34 2C 2E 00 75 1F 88 04 97 32 30 |X:.204,..u....20|
00001760: 37 2C 2E 3A A1 49 54 24 3A 8B 49 54 24 B2 22 22 |7,.:.IT$:.IT$.""|
00001770: A7 31 31 36 30 00 8F 1F 8D 04 49 54 B2 C6 28 49 |.1160.....IT..(I|
00001780: 54 24 29 3A 8B 49 54 B2 31 33 A7 31 32 31 30 00 |T$):.IT.13.1210.|
00001790: 9F 1F 92 04 8B 49 54 B2 32 30 A7 31 31 39 30 00 |.....IT.20.1190.|
000017A0: B5 1F 97 04 8B 49 54 B3 33 31 B0 49 54 B1 39 36 |.....IT.31.IT.96|
000017B0: A7 31 31 36 30 00 C9 1F 9C 04 8B C3 28 57 4B 24 |.1160.......(WK$|
000017C0: 29 B2 4D 4C A7 31 31 36 30 00 E5 1F A1 04 99 49 |).ML.1160......I|
000017D0: 54 24 3B 3A 57 4B 24 B2 57 4B 24 AA 49 54 24 3A |T$;:WK$.WK$.IT$:|
000017E0: 89 31 31 36 30 00 F8 1F A6 04 8B C3 28 57 4B 24 |.1160.......(WK$|
000017F0: 29 B2 2E A7 31 31 36 30 00 10 20 AB 04 57 4B 24 |)...1160.. ..WK$|
00001800: B2 C8 28 57 4B 24 2C C3 28 57 4B 24 29 AB 31 29 |..(WK$,.(WK$).1)|
00001810: 00 2E 20 B0 04 8B C2 28 32 30 37 29 B2 2E A7 99 |.. ....(207)....|
00001820: 22 9D 20 20 9D 9D 22 3B 3A 89 31 31 36 30 00 38 |". ..";:.1160.8|
00001830: 20 B5 04 89 31 32 30 30 00 54 20 BA 04 8B C2 28 | ...1200.T ....(|
00001840: 32 30 37 29 B2 2E A7 97 32 30 34 2C 31 3A 99 22 |207)....204,1:."|
00001850: 20 22 3A 8E 00 5E 20 BF 04 89 31 32 31 30 00 9C | ":..^ ...1210..|
00001860: 20 C4 04 99 58 24 22 57 4F 55 4C 44 20 59 4F 55 | ...X$"WOULD YOU|
00001870: 20 4C 49 4B 45 20 54 4F 20 50 4C 41 59 20 41 47 | LIKE TO PLAY AG|
00001880: 41 49 4E 3F 20 28 59 2F 4E 29 20 20 05 9D 22 3B |AIN? (Y/N) ..";|
00001890: 3A 49 58 B2 33 36 3A 8D 31 31 35 30 00 AB 20 C9 |:IX.36:.1150.. .|
000018A0: 04 8B 57 4B 24 B2 22 59 22 A7 8A 00 BD 20 CE 04 |..WK$."Y".... ..|
000018B0: 8B 57 4B 24 B2 22 4E 22 A7 31 32 34 30 00 C7 20 |.WK$."N".1240.. |
000018C0: D3 04 89 31 32 32 30 00 E3 20 D8 04 97 35 33 32 |...1220.. ...532|
000018D0: 38 30 2C 33 3A 97 35 33 32 38 31 2C 31 3A 99 22 |80,3:.53281,1:."|
000018E0: 93 1F 22 00 E9 20 DD 04 80 00 0E 21 E2 04 50 55 |..".. .....!..PU|
000018F0: B2 B5 28 28 50 41 28 49 29 AC 31 30 30 AD 53 41 |..((PA(I).100.SA|
00001900: 28 53 4E 29 29 AD 35 30 30 29 AC 35 30 30 00 48 |(SN)).500).500.H|
00001910: 21 E7 04 99 22 9E 59 4F 55 20 43 41 4E 20 42 55 |!...".YOU CAN BU|
00001920: 59 20 55 50 20 54 4F 22 50 55 22 53 48 41 52 45 |Y UP TO"PU"SHARE|
00001930: 53 22 3A 99 22 49 4E 20 55 4E 49 54 53 20 4F 46 |S":."IN UNITS OF|
00001940: 20 35 4F 4F 05 22 3A 8E 00 4E 21 EC 04 8E 00 89 | 5OO.":..N!.....|
00001950: 21 F1 04 97 35 33 32 38 30 2C 2E 3A 99 22 91 91 |!...53280,.:."..|
00001960: 22 3A 8D 31 33 39 35 3A 99 22 20 20 20 20 20 20 |":.1395:." |
00001970: 20 20 20 57 45 4C 43 4F 4D 45 20 54 4F 20 42 41 | WELCOME TO BA|
00001980: 59 20 53 54 52 45 45 54 2E 00 BF 21 F6 04 99 22 |Y STREET...!..."|
00001990: 48 45 41 52 54 20 4F 46 20 43 41 4E 41 44 41 27 |HEART OF CANADA'|
000019A0: 53 20 57 4F 52 4C 44 20 4F 46 20 48 49 47 48 20 |S WORLD OF HIGH |
000019B0: 46 49 4E 41 4E 43 45 21 22 3A 8D 31 33 39 35 00 |FINANCE!":.1395.|
000019C0: 05 22 FB 04 99 22 20 41 20 47 41 4D 45 20 46 4F |."..." A GAME FO|
000019D0: 52 20 31 20 54 4F 20 36 20 50 45 4F 50 4C 45 2E |R 1 TO 6 PEOPLE.|
000019E0: 2E 2E 2E 22 3A 99 22 41 4E 44 20 59 4F 55 52 20 |...":."AND YOUR |
000019F0: 36 34 20 4C 49 4B 45 53 20 54 4F 20 50 4C 41 59 |64 LIKES TO PLAY|
00001A00: 20 54 4F 4F 2E 00 4B 22 00 05 99 22 20 48 45 27 | TOO..K"..." HE'|
00001A10: 53 20 54 48 45 20 42 41 4E 4B 45 52 20 41 53 20 |S THE BANKER AS |
00001A20: 57 45 4C 4C 2C 20 42 55 54 20 44 4F 4E 27 54 20 |WELL, BUT DON'T |
00001A30: 20 20 20 20 57 4F 52 52 59 2C 20 48 45 20 4E 45 | WORRY, HE NE|
00001A40: 56 45 52 20 43 48 45 41 54 53 2E 00 97 22 05 05 |VER CHEATS..."..|
00001A50: 99 22 11 20 4E 4F 54 45 3A 20 49 4E 20 4F 4E 45 |.". NOTE: IN ONE|
00001A60: 20 50 4C 41 59 45 52 20 47 41 4D 45 53 20 59 4F | PLAYER GAMES YO|
00001A70: 55 20 4D 55 53 54 20 50 4C 41 59 41 47 41 49 4E |U MUST PLAYAGAIN|
00001A80: 53 54 20 59 4F 55 52 20 36 34 2E 20 49 4E 20 4D |ST YOUR 64. IN M|
00001A90: 55 4C 54 49 2D 22 3B 00 D9 22 0A 05 99 22 20 50 |ULTI-";.."..." P|
00001AA0: 4C 41 59 45 52 20 47 41 4D 45 53 20 59 4F 55 20 |LAYER GAMES YOU |
00001AB0: 43 48 4F 4F 53 45 20 57 48 45 54 48 45 52 20 4F |CHOOSE WHETHER O|
00001AC0: 52 20 4E 4F 54 20 54 4F 20 4C 45 54 20 48 49 4D |R NOT TO LET HIM|
00001AD0: 20 20 20 20 50 4C 41 59 2E 00 25 23 0F 05 99 22 | PLAY..%#..."|
00001AE0: 11 20 54 48 45 20 4F 42 4A 45 43 54 20 4F 46 20 |. THE OBJECT OF |
00001AF0: 54 48 45 20 47 41 4D 45 20 49 53 20 54 4F 20 50 |THE GAME IS TO P|
00001B00: 4C 41 59 20 54 48 45 20 20 53 54 4F 43 4B 20 4D |LAY THE STOCK M|
00001B10: 41 52 4B 45 54 20 53 55 43 43 45 53 53 46 55 4C |ARKET SUCCESSFUL|
00001B20: 4C 59 2E 22 3B 00 6D 23 14 05 99 22 20 20 59 4F |LY.";.m#..." YO|
00001B30: 55 20 42 55 59 20 41 4E 44 20 53 45 4C 4C 20 53 |U BUY AND SELL S|
00001B40: 54 4F 43 4B 53 20 28 49 4E 20 42 4C 4F 43 4B 53 |TOCKS (IN BLOCKS|
00001B50: 20 4F 46 20 35 30 30 20 53 48 41 52 45 53 29 20 | OF 500 SHARES) |
00001B60: 20 20 46 52 4F 4D 20 53 49 58 20 22 3B 00 B1 23 | FROM SIX ";..#|
00001B70: 19 05 99 22 43 41 54 45 47 4F 52 49 45 53 2E 22 |..."CATEGORIES."|
00001B80: 3A 99 22 20 54 48 45 4E 20 57 41 54 43 48 20 54 |:." THEN WATCH T|
00001B90: 48 45 20 53 54 4F 43 4B 53 20 52 49 53 45 2C 20 |HE STOCKS RISE, |
00001BA0: 46 41 4C 4C 20 41 4E 44 20 20 20 50 41 59 20 22 |FALL AND PAY "|
00001BB0: 3B 00 E5 23 1E 05 99 22 44 49 56 49 44 45 4E 44 |;..#..."DIVIDEND|
00001BC0: 53 20 4F 4E 20 54 48 45 20 54 4F 52 4F 4E 54 4F |S ON THE TORONTO|
00001BD0: 20 53 54 4F 43 4B 20 20 20 20 20 20 45 58 43 48 | STOCK EXCH|
00001BE0: 41 4E 47 45 2E 00 1C 24 23 05 99 22 99 11 1D 1D |ANGE...$#.."....|
00001BF0: 1D 1D 1D 12 20 50 52 45 53 53 20 41 4E 59 20 4B |.... PRESS ANY K|
00001C00: 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E |EY TO CONTINUE..|
00001C10: 2E 20 05 13 22 3A 97 31 39 38 2C 2E 00 30 24 28 |. ..":.198,..0$(|
00001C20: 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 33 32 30 |..A$:.A$."".1320|
00001C30: 00 40 24 2D 05 8D 31 31 33 35 3A 8D 31 33 39 35 |.@$-..1135:.1395|
00001C40: 00 88 24 32 05 99 22 20 49 46 20 41 20 53 54 4F |..$2.." IF A STO|
00001C50: 43 4B 27 53 20 56 41 4C 55 45 20 52 45 41 43 48 |CK'S VALUE REACH|
00001C60: 45 53 20 54 48 45 20 54 4F 50 20 49 54 20 20 27 |ES THE TOP IT '|
00001C70: 53 50 4C 49 54 53 27 20 41 4E 44 20 59 4F 55 20 |SPLITS' AND YOU |
00001C80: 44 4F 55 42 4C 45 22 3B 00 AB 24 37 05 99 22 20 |DOUBLE";..$7.." |
00001C90: 41 4E 59 20 53 48 41 52 45 53 20 59 4F 55 20 20 |ANY SHARES YOU |
00001CA0: 48 41 56 45 20 49 4E 20 49 54 2E 00 F7 24 3C 05 |HAVE IN IT...$<.|
00001CB0: 99 22 11 20 49 46 20 41 20 53 54 4F 43 4B 27 53 |.". IF A STOCK'S|
00001CC0: 20 56 41 4C 55 45 20 44 52 4F 50 53 20 42 45 4C | VALUE DROPS BEL|
00001CD0: 4F 57 20 5A 45 52 4F 20 20 20 20 54 48 45 4E 20 |OW ZERO THEN |
00001CE0: 49 54 20 27 43 52 41 53 48 45 53 27 20 41 4E 44 |IT 'CRASHES' AND|
00001CF0: 20 59 4F 55 20 22 3B 00 1B 25 41 05 99 22 4C 4F | YOU ";..%A.."LO|
00001D00: 53 45 20 41 4E 59 20 53 54 4F 43 4B 59 4F 55 20 |SE ANY STOCKYOU |
00001D10: 48 41 56 45 20 49 4E 20 49 54 2E 00 66 25 46 05 |HAVE IN IT..f%F.|
00001D20: 99 22 11 1D 44 49 56 49 44 45 4E 44 53 20 41 52 |."..DIVIDENDS AR|
00001D30: 45 20 42 41 53 45 44 20 4F 4E 20 54 48 45 20 4D |E BASED ON THE M|
00001D40: 41 52 4B 45 54 20 56 41 4C 55 45 4F 46 20 54 48 |ARKET VALUEOF TH|
00001D50: 45 20 53 54 4F 43 4B 20 41 4E 44 20 48 4F 57 20 |E STOCK AND HOW |
00001D60: 4D 55 43 48 22 3B 00 77 25 4B 05 99 22 20 59 4F |MUCH";.w%K.." YO|
00001D70: 55 20 48 41 56 45 2E 00 C1 25 50 05 99 22 11 20 |U HAVE...%P..". |
00001D80: 57 48 45 4E 20 42 55 59 49 4E 47 20 4F 52 20 53 |WHEN BUYING OR S|
00001D90: 45 4C 4C 49 4E 47 2C 20 50 52 49 43 45 53 20 41 |ELLING, PRICES A|
00001DA0: 52 45 20 20 20 20 20 42 41 53 45 44 20 53 54 52 |RE BASED STR|
00001DB0: 49 43 54 4C 59 20 4F 4E 20 4D 41 52 4B 45 54 22 |ICTLY ON MARKET"|
00001DC0: 3B 00 CF 25 55 05 99 22 20 56 41 4C 55 45 2E 00 |;..%U.." VALUE..|
00001DD0: FC 25 5A 05 99 22 11 20 59 4F 55 52 20 36 34 20 |.%Z..". YOUR 64 |
00001DE0: 57 49 4C 4C 20 48 41 4E 44 4C 45 20 41 4C 4C 20 |WILL HANDLE ALL |
00001DF0: 54 48 45 20 44 45 54 41 49 4C 53 2E 00 24 26 5F |THE DETAILS..$&_|
00001E00: 05 99 22 11 20 44 4F 4E 27 20 42 45 20 41 46 52 |..". DON' BE AFR|
00001E10: 41 49 44 20 54 4F 20 54 41 4B 45 20 43 48 41 4E |AID TO TAKE CHAN|
00001E20: 43 45 53 21 00 58 26 64 05 99 22 11 11 11 1D 1D |CES!.X&d..".....|
00001E30: 1D 1D 1D 1D 1D 1D 12 99 20 50 52 45 53 53 20 41 |........ PRESS A|
00001E40: 4E 59 20 4B 45 59 20 54 4F 20 50 4C 41 59 2E 20 |NY KEY TO PLAY. |
00001E50: 22 3A 97 31 39 38 2C 2E 00 91 26 69 05 A1 41 24 |":.198,...&i..A$|
00001E60: 3A 8B 41 24 B2 22 22 A7 31 33 38 35 20 20 20 20 |:.A$."".1385 |
00001E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E90: 20 00 A6 26 6E 05 97 35 33 32 38 30 2C 33 3A 8D | ..&n..53280,3:.|
00001EA0: 31 31 33 35 3A 8E 00 DC 26 73 05 99 22 99 91 2D |1135:...&s.."..-|
00001EB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001EC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001ED0: 2D 2D 2D 2D 2D 2D 2D 05 22 3B 3A 8E 00 00 00 |-------.";:.... |
..Q.... ********************************
* * "BAY STREET"
*. ....* FROM *
* ROGER D. BURGE *
......*BASED ON THE COMMODORE PET 2001*
* PROGRAM "STOCK" *.
>....* REVISED AND UPGRADED BY *
* ROGER D. BURGE *..
....* CONVERTED TO THE COMMODORE 64 *
* BY *...
...* ROGER D. BURGE *
* #2667 *.+.#
..* JULY,1984 *
* FOR *.Z.(.
.* TORONTO PET USERS GROUP INC. *
* TORONTO, CANADA *.I.-..
* CLASSIFICATION: *
* RECREATIONAL,EDUCATIONAL *...2..*
********************************...7..53
280,3:.53281,..1.<.K..(.TI):X$."........
................".I.A..SN$(6),SA(6),PN$(
6),PS(6,6),PA(6),DN(3),C$(6),C(6).R.F..1
50.~.K..R.1.NR...P.D1..(6..(1)).1...U.D2
..(3..(1)).1.E.Z.D3..(3..(1)).1:D3.5.2.(
D3.1)..._..X$" "..
.D..X$SN$(D1);DN$(D2);D3...I..D2.695,730
,765. .N..1075:..U.S.IX.21:ML.1:.X$"ONE
MORE ROUND Y/N ?. ..";:.1150.P.X..WK$..
"N".WK$.."Y".115...}..WK$."N"..790:.1220
......I.1.N2:.475:.......N1...Z..:.910..
....".";:.340.E....75......"SILVER"," IN
D ","GRAIN "," OIL ","GOLD ","BONDS "
......I.1.6:SA(I).100:.SN$(I):..>. .."
UP "," DOWN"," DIV ".S....I.1.3:.DN$(I
):..P....".",".",".",".",".","."......I.
1.6:.C$(I):.......1,10,7,6,9,13......I.1
.6:.C(I):.......1135...C.IX.20:ML.1:."..
....INSTRUCTIONS? (Y/N)";:.1150...H..WK$
."Y"..1265:.210...M..WK$.."N".190.D.R.IX
.24:."....HOW MANY PLAYERS? (1-6) .";:.
1150.R.W.N2.E(WK$).E....N2.1.N2.6.210.Y.
...N2.1.N1..:.245.....IX.29:."....MAY YO
UR 64 PLAY TOO? (Y/N) ..";.M....1150:.
WK$.."N".WK$.."Y".230.....N1..:.WK$."N".
N1.1......I.1.N2......J.1.6:PS(I,J)..:..
....PA(I).5000.^...."....PLAYER ...."
;I;"WHAT IS YOUR NAME? "
:ML.24......" ."
.....IX..:.1150:PN$(I).WK$......C(WK$)..
.H(WK$,1)." ".260...........PN$(.)."YOUR
64":PA(.).2000..."..I.1.6:PS(.,I).500:.
...'..425...,..N1...I..:.545.".1..N1..11
35.X.6..H(X$,16)".HOW MANY COMPLETE ROUN
DS BEFORE BUYING...;.."AND SELLING STOCK
S (1-3)? ....";:IX.26:ML.1:.1150. .@.N
R.E(WK$)...E..NR.1.NR.3.310.R.J.NR.NR.(1
.N1.N2):.".";:.340.X.O.....T..".....
BAY STREET ";.>
.Y.." FROM ROGER D. BURGE
".D.^..K...19:.".....":.218,132:.:.
".";.U.C..I.190....10...H.G$.".":.I.100.
G$."."...M.GN$." ".D(I):GN$.I(GN$,3):GN
$.".".GN$.G$.".".T.R..J.1.6:WK$.".."...W
..SA(J).I.WK$.C$(J).". ."...|..SA(J).I.
WK$.C$(J)."..".4...WK$.WK$.G$.".":.J.6.W
K$.WK$."...".F...GN$.GN$.WK$:.._...I$.I(
D(I),C(D(I)).1)......C(I$).3..K.C(I$).2:
I$.I$." ":.......GN$"."I$;.......M...."
";SN$(1);SN$(2);SN$(3);SN$(4);SN$(5);S
N$(6).S..........I.1.N2......545......".
.YOU MUST BUY SOME STOCK.":BS.1......103
0."....645.Z.B..SN.7..".INSUFFICIENT FUN
DS.":.K...2000:.:.545:.440.C.G..475.W.L.
.PA(I).5000.430.}.Q.....V........545.K..
.BS..:IX.28:ML.1:.".BUY, SELL OR NOTHING
B/S/N? ..";:.1150......WK$.."N".WK$.."
S".WK$.."B"..:."..":.480......WK$."B".BS
.1......WK$."N"...+...SB$.WK$:.:."..5...
.1030.G....SB$."S"..670.Y....SB$."B"..64
5.G....SN.7.475......SB$."S"..".YOU DON'
T OWN ENOUGH STOCK.".B....SB$."B"..".YOU
DON'T HAVE ENOUGH MONEY.".R....K.1.2000
:.......475...!.."... BAY
STREET ";.B.&.."
FROM ROGER D. BURGE ..";...+.W
K$." PORTFOLIO - ".PN$(I):WK..((40.C(WK$
)).2):.K.1.WK:WK$." ".WK$...0..:WK.40.C(
WK$):.K.1.WK:WK$.WK$." ":.:.".."WK$...5.
.". # DESC VALUE HOLDINGS"...:.." .
.... ..... ........"...?..K.1.6./.
D.WK$." ".D(SA(K)):V$.I(WK$,3).Q.I.WK.P
S(I,K):WK$." ".D(WK).C.N.:WK$.I(WK$
,7).{.S..WK.1000.H$." ".WK$. .X..WK.500.
H$.H(WK$,4).",".I(WK$,3)...].WK$." ".D(K
)." "...B..WK$;...G..H(SN$(K),1)." "..I(
SN$(K),C(SN$(K)).1)" ";:.625...L..SN$(K)
;...Q.." ";V$;" ";H$...V...A.{..:."C
ASH ON HAND --- ";PA(I):..G.....A...WK.S
A(SN).SQ.100:PT.1.V....WK.PA(I).SN.7:...
...PA(I).PA(I).WK.....PS(I,SN).PS(I,SN).
SQ...........PT.1.I....SQ.PS(I,SN).SN.7:
......PA(I).PA(I).SA(SN).SQ.100.....PS(I
,SN).PS(I,SN).SQ...........SA(D1).SA(D1)
.D3.-....SA(D1).200...<.A.SA(D1).100.I.F
..I.N1.N2.A.K.PS(I,D1).PS(I,D1).2.G.P...
M.U.....Z.SA(D1).SA(D1).D3......SA(D1)..
.......SA(D1).100......I.N1.N2.....PS(I,
D1)...C.....I..........SA(D1).100.......
.I.N1.N2.....:PA(I).PA(I).PS(I,D1).D3.10
0.............I....1135:."..PLAYER NAME
CASH VALUE".W...."........
..... .........."... ..K.N
1.N2...%..J.1.6...*.::PA(K).PA(K).SA(J).
PS(K,J).100.../.....4...L.9..K.N1.N2.W.>
.:WK..1...C..J.N1.N2...H..PA(J).WK.WK.PA
(J):I.J...M.:..#.R.WK$." ".D(PA(
I)).@.W.WK$.I(WK$,8):V$.H(WK$,2).X.\..V$
.." ".V$.V$.",".P.A..V$. " ".V$.V$." "
...F.:V$.V$.J(WK$,3,3)...K..I(V$,1).." "
.V$.V$.","...P..I(V$,1)." ".V$.V$." ".Q.
U.:V$.V$.I(WK$,3)...Z.." "PN$(I);.28);V
$:."....................................
..".!..:PA(I)..1.'.....-.....E...I..:PT
..:.545:.".";.]....SN.1.6:SQ.PS(.,SN)...
...SA(SN).95.SQ...."SELL";SQ;SN$(SN):Z.Z
.1:.670......Z.10..".............K.1.150
0:..J....PA(.).600..1005:......WK.0:SQ.9
99999......J.1.6......SA(J).105.PS(.,J).
SQ.WK.J:SQ.PS(.,J).......".E.SN.WK.4.J..
WK....1005:..D.O.SQ.500:.645.V.T..SN.7..
1005:..D.Y..Z.10.."......."BUY 500 ";SN$
(SN):Z.Z.1......K.1.1000:.......945.....
.K.1.300:.......PT.1..545.X....PT....:."
NO TRANSACTIONS"......K.1.2000:.........
...."STOCK#? ..";. ...IX.8:ML.1:.1150:S
N.E(WK$).>....SN.1.SN.6..:."...":.1030.L
....BS..1250.A....:."QUANTITY? ";.....ML
.6:IX.10:.1150:SQ.E(WK$)...$.WK.SQ..(SQ.
500).500.C.)..WK..".......... ....
...";:.1055.I.......3.S1.1024.764.(D1.1)
.6:C1.S1.54272...8..K...190.10...=.WK.64
...B..SA(D1).K.WK.160.1.G..SA(D1).K.WK.9
8.H.L..S1,WK:.S1.1,WK:.WK.64..C1,C(D1):.
C1.1,C(D1):.1115...Q..K.100..C1,2:.C1.1,
2:.1115...V..C1,12:.C1.1,12...[.S1.S1.40
:C1.C1.40...`...F.E..K.1.500:..L.J.....O
.."... BAY STREET
";.3.T.." FROM ROGER D.
BURGE .":..E.~.WK$."":.198,..X.
...211,IX:.204,..U....207,.:.IT$:.IT$.""
.1160.....IT.F(IT$):.IT.13.1210......IT.
20.1190......IT.31.IT.96.1160.I....C(WK$
).ML.1160......IT$;:WK$.WK$.IT$:.1160...
...C(WK$)...1160.. ..WK$.H(WK$,C(WK$).1)
.. ...B(207)....". ..";:.1160.8 ...1200
.T ...B(207)....204,1:." ":..^ ...1210..
D..X$"WOULD YOU LIKE TO PLAY AGAIN? (Y/
N) ..";:IX.36:.1150.. I..WK$."Y".... N.
.WK$."N".1240.G S..1220.. X..53280,3:.53
281,1:."..".. .....!..PU..((PA(I).100.SA
(SN)).500).500.H!...".YOU CAN BUY UP TO"
PU"SHARES":."IN UNITS OF 5OO.":..N!.....
!...53280,.:."..":.1395:." WELCO
ME TO BAY STREET...!..."HEART OF CANADA'
S WORLD OF HIGH FINANCE!":.1395.."..." A
GAME FOR 1 TO 6 PEOPLE....":."AND YOUR
64 LIKES TO PLAY TOO..K"..." HE'S THE BA
NKER AS WELL, BUT DON'T WORRY, HE NE
VER CHEATS..."...". NOTE: IN ONE PLAYER
GAMES YOU MUST PLAYAGAINST YOUR 64. IN M
ULTI-";.Y"..." PLAYER GAMES YOU CHOOSE W
HETHER OR NOT TO LET HIM PLAY..%#..."
. THE OBJECT OF THE GAME IS TO PLAY THE
STOCK MARKET SUCCESSFULLY.";.M#..." YO
U BUY AND SELL STOCKS (IN BLOCKS OF 500
SHARES) FROM SIX ";..#..."CATEGORIES."
:." THEN WATCH THE STOCKS RISE, FALL AND
PAY ";..#..."DIVIDENDS ON THE TORONTO
STOCK EXCHANGE...$#.."........ PRE
SS ANY KEY TO CONTINUE... ..":.198,..0$(
..A$:.A$."".1320.@$-..1135:.1395..$2.."
IF A STOCK'S VALUE REACHES THE TOP IT '
SPLITS' AND YOU DOUBLE";..$7.." ANY SHAR
ES YOU HAVE IN IT...$<..". IF A STOCK'S
VALUE DROPS BELOW ZERO THEN IT 'CRAS
HES' AND YOU ";..%A.."LOSE ANY STOCKYOU
HAVE IN IT..F%F.."..DIVIDENDS ARE BASED
ON THE MARKET VALUEOF THE STOCK AND HOW
MUCH";.W%K.." YOU HAVE..A%P..". WHEN BUY
ING OR SELLING, PRICES ARE BASED STR
ICTLY ON MARKET";.O%U.." VALUE...%Z..".
YOUR 64 WILL HANDLE ALL THE DETAILS..$&_
..". DON' BE AFRAID TO TAKE CHANCES!.X&D
.."............. PRESS ANY KEY TO PLAY.
":.198,...&I..A$:.A$."".1385
..&N..53280,3:.
1135:...&S.."..-------------------------
---------------.";:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL