_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL