MONEY
FILE INFORMATION
FILENAME(S): MONEY
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 21:07:03
APPEARS ON: 2 disk(s)
FILE HASH
449f7aa2277b4e89c9d4f0f76382daf0cb097af4fbbfcb410a0528671c43e41b
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITY PET 01 | MONEY | PRG | DuncanTwain | 2 | 1 | DOWNLOAD FILE |
| CS TAPES PET 12 | MONEY | PRG | DuncanTwain | 28 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 24 04 1E 00 81 49 B2 31 A4 34 30 3A 4C 24 |..$....I.1.40:L$|
00000010: B2 4C 24 AA 22 12 20 92 22 3A 82 3A 53 24 B2 22 |.L$.". .":.:S$."|
00000020: 12 20 92 22 00 41 04 28 00 54 B2 4F 3A 52 4D B2 |. .".A.(.T.O:RM.|
00000030: 33 32 30 30 30 30 30 3A 43 B2 35 30 30 30 30 30 |3200000:C.500000|
00000040: 30 00 63 04 32 00 55 43 B2 33 2E 33 35 3A 53 43 |0.c.2.UC.3.35:SC|
00000050: B2 32 30 30 30 30 30 30 30 3A 46 47 B2 31 30 30 |.20000000:FG.100|
00000060: 30 30 30 00 7A 04 3C 00 50 41 B2 32 31 33 35 30 |000.z.<.PA.21350|
00000070: 30 30 3A 4F 54 B2 31 30 30 30 00 9D 04 46 00 99 |00:OT.1000...F..|
00000080: 22 93 22 3B 3A 52 24 B2 22 1D 1D 1D 22 3A 52 B2 |".";:R$."...":R.|
00000090: 30 3A 53 41 B2 31 35 33 35 30 30 30 30 00 C7 04 |0:SA.15350000...|
000000A0: 50 00 50 56 B2 31 32 30 30 30 30 30 30 3A 52 B2 |P.PV.12000000:R.|
000000B0: 30 3A 53 41 B2 31 35 33 35 30 30 30 30 3A 46 56 |0:SA.15350000:FV|
000000C0: B2 33 33 35 30 30 30 00 ED 04 5A 00 85 22 44 4F |.335000...Z.."DO|
000000D0: 20 59 4F 55 20 52 45 51 55 49 52 45 20 49 4E 53 | YOU REQUIRE INS|
000000E0: 54 52 55 43 54 49 4F 4E 53 22 3B 41 24 00 04 05 |TRUCTIONS";A$...|
000000F0: 64 00 8B 41 24 B2 22 59 22 A7 8D 32 33 30 30 3A |d..A$."Y"..2300:|
00000100: 99 22 93 22 00 0D 05 69 00 89 31 34 30 00 1D 05 |."."...i..140...|
00000110: 6E 00 99 22 4F 50 54 49 4F 4E 20 3F 22 00 30 05 |n.."OPTION ?".0.|
00000120: 78 00 A1 56 24 3A 8B 56 24 B2 22 22 A7 31 32 30 |x..V$:.V$."".120|
00000130: 00 3C 05 7D 00 56 B2 C5 28 56 24 29 00 4F 05 82 |.<.}.V..(V$).O..|
00000140: 00 8B 56 B1 B2 31 AF 56 B3 B2 36 A7 32 31 30 00 |..V..1.V..6.210.|
00000150: 70 05 8C 00 99 22 12 4F 50 54 49 4F 4E 53 20 41 |p....".OPTIONS A|
00000160: 56 41 49 4C 41 42 4C 45 20 41 52 45 20 3A 92 22 |VAILABLE ARE :."|
00000170: 00 8E 05 96 00 99 A3 31 30 29 3B 22 31 20 44 45 |.......10);"1 DE|
00000180: 43 49 53 49 4F 4E 20 53 43 52 45 45 4E 22 00 AF |CISION SCREEN"..|
00000190: 05 A0 00 99 A3 31 30 29 3B 22 32 20 49 4E 46 4F |.....10);"2 INFO|
000001A0: 52 4D 41 54 49 4F 4E 20 53 43 52 45 45 4E 22 00 |RMATION SCREEN".|
000001B0: CA 05 AA 00 99 A3 31 30 29 3B 22 33 20 50 20 26 |......10);"3 P &|
000001C0: 20 4C 20 52 45 50 4F 52 54 22 00 E7 05 B4 00 99 | L REPORT"......|
000001D0: A3 31 30 29 3B 22 34 20 42 41 4C 41 4E 43 45 20 |.10);"4 BALANCE |
000001E0: 52 45 50 4F 52 54 22 00 02 06 BE 00 99 A3 31 30 |REPORT".......10|
000001F0: 29 3B 22 35 20 49 4E 53 54 52 55 43 54 49 4F 4E |);"5 INSTRUCTION|
00000200: 53 22 00 1C 06 C3 00 99 A3 31 30 29 3B 22 36 20 |S".......10);"6 |
00000210: 45 4E 44 20 50 52 4F 47 52 41 4D 22 00 25 06 C8 |END PROGRAM".%..|
00000220: 00 89 31 31 30 00 30 06 D2 00 8B 56 B2 36 A7 80 |..110.0....V.6..|
00000230: 00 4F 06 DC 00 91 56 8D 32 35 30 2C 31 33 30 30 |.O....V.250,1300|
00000240: 2C 31 35 30 30 2C 31 37 35 30 2C 32 33 30 30 00 |,1500,1750,2300.|
00000250: 59 06 E6 00 99 22 93 22 3B 00 62 06 F0 00 89 31 |Y....".";.b....1|
00000260: 31 30 00 7D 06 FA 00 8F 52 2A 2A 2A 2A 2A 2A 44 |10.}....R******D|
00000270: 45 43 49 53 4F 4E 20 53 43 52 45 45 4E 00 90 06 |ECISON SCREEN...|
00000280: 04 01 99 4C 24 3B 3A 99 53 24 3B A6 31 30 29 3B |...L$;:.S$;.10);|
00000290: 00 B2 06 0E 01 99 22 12 44 45 43 49 53 49 4F 4E |......".DECISION|
000002A0: 20 53 43 52 45 45 4E 92 22 3B A6 31 33 29 3B 53 | SCREEN.";.13);S|
000002B0: 24 3B 00 CE 06 13 01 52 4D B2 52 4D AA 52 3A 43 |$;.....RM.RM.R:C|
000002C0: B2 43 AB 52 AC 31 2E 35 3A 54 B2 54 AA 31 00 D7 |.C.R.1.5:T.T.1..|
000002D0: 06 18 01 99 4C 24 3B 00 F2 06 22 01 81 49 B2 31 |....L$;..."..I.1|
000002E0: A4 32 30 3A 99 53 24 3B A6 33 38 29 3B 53 24 3B |.20:.S$;.38);S$;|
000002F0: 3A 82 00 02 07 27 01 99 4C 24 3B 22 13 11 11 11 |:....'..L$;"....|
00000300: 22 3B 00 24 07 2C 01 85 22 1D 1D 1D 1D 1D 1D 44 |";.$.,.."......D|
00000310: 49 44 20 59 4F 55 20 57 41 4E 54 20 54 48 49 53 |ID YOU WANT THIS|
00000320: 22 3B 41 24 00 37 07 31 01 8B C8 28 41 24 2C 31 |";A$.7.1...(A$,1|
00000330: 29 B2 22 4E 22 A7 8E 00 4B 07 36 01 85 22 1D 1D |)."N"...K.6.."..|
00000340: 1D 50 52 49 43 45 20 24 22 3B 50 00 6E 07 40 01 |.PRICE $";P.n.@.|
00000350: 85 22 1D 1D 1D 41 44 56 45 52 54 49 53 49 4E 47 |."...ADVERTISING|
00000360: 20 28 27 30 30 30 29 20 53 24 22 3B 41 45 00 91 | ('000) S$";AE..|
00000370: 07 4A 01 85 22 1D 1D 1D 53 43 48 45 44 55 4C 45 |.J.."...SCHEDULE|
00000380: 44 20 50 52 4F 47 2E 28 27 30 30 30 29 22 3B 53 |D PROG.('000)";S|
00000390: 50 00 B2 07 54 01 85 22 1D 1D 1D 52 41 57 20 4D |P...T.."...RAW M|
000003A0: 41 54 45 52 41 49 4C 53 20 28 27 30 30 30 29 22 |ATERAILS ('000)"|
000003B0: 3B 52 00 D6 07 68 01 85 22 1D 1D 1D 42 4F 4E 55 |;R...h.."...BONU|
000003C0: 53 20 54 48 52 45 53 48 4F 4C 44 20 28 27 30 30 |S THRESHOLD ('00|
000003D0: 30 29 22 3B 42 54 00 F6 07 72 01 85 22 1D 1D 1D |0)";BT...r.."...|
000003E0: 4E 55 4D 42 45 52 20 4F 46 20 45 4D 50 4C 4F 59 |NUMBER OF EMPLOY|
000003F0: 45 45 53 22 3B 45 00 15 08 7C 01 85 22 1D 1D 1D |EES";E...|.."...|
00000400: 54 48 45 20 57 45 45 4B 4C 45 59 20 57 41 47 45 |THE WEEKLEY WAGE|
00000410: 20 24 22 3B 57 00 36 08 86 01 85 22 1D 1D 1D 4D | $";W.6...."...M|
00000420: 41 49 4E 54 45 4E 41 4E 43 45 20 28 27 30 30 30 |AINTENANCE ('000|
00000430: 29 20 24 22 3B 4D 00 57 08 90 01 85 22 1D 1D 1D |) $";M.W...."...|
00000440: 49 4E 56 45 53 54 4D 45 4E 54 20 28 27 30 30 30 |INVESTMENT ('000|
00000450: 29 53 24 22 3B 49 4D 00 7E 08 9A 01 99 52 24 3B |)S$";IM.~....R$;|
00000460: 22 12 50 52 45 53 53 20 59 20 49 46 20 49 4E 50 |".PRESS Y IF INP|
00000470: 55 54 53 20 4F 4B 3B 20 4E 20 54 4F 22 3B 00 90 |UTS OK; N TO";..|
00000480: 08 A4 01 99 22 20 52 45 2D 49 4E 50 55 54 92 22 |...." RE-INPUT."|
00000490: 00 A3 08 AE 01 A1 51 24 3A 8B 51 24 B2 22 22 A7 |......Q$:.Q$."".|
000004A0: 34 33 30 00 BA 08 B8 01 8B 51 24 B2 22 4E 22 A7 |430......Q$."N".|
000004B0: 99 22 93 22 3B 3A 89 32 35 30 00 D5 08 C2 01 4D |.".";:.250.....M|
000004C0: B2 4D AC 4F 54 3A 53 50 B2 53 50 AC 4F 54 3A 52 |.M.OT:SP.SP.OT:R|
000004D0: B2 52 AC 4F 54 00 FD 08 C7 01 41 45 B2 41 45 AC |.R.OT.....AE.AE.|
000004E0: 4F 54 3A 49 4D B2 49 4D AC 4F 54 3A 42 54 B2 42 |OT:IM.IM.OT:BT.B|
000004F0: 54 AC 4F 54 3A 43 49 B2 43 49 AC 4F 54 00 16 09 |T.OT:CI.CI.OT...|
00000500: CC 01 8D 35 30 30 3A 8D 32 31 30 30 3A 8D 36 35 |...500:.2100:.65|
00000510: 30 3A 8D 39 30 30 00 1C 09 D6 01 8E 00 39 09 F4 |0:.900.......9..|
00000520: 01 8F 2A 2A 2A 2A 2A 2A 41 43 54 55 41 4C 20 50 |..******ACTUAL P|
00000530: 52 4F 44 55 43 54 49 4F 4E 00 43 09 F9 01 8D 31 |RODUCTION.C....1|
00000540: 31 31 30 00 64 09 FE 01 58 58 B2 B5 28 50 56 AD |110.d...XX..(PV.|
00000550: 33 2E 35 32 39 29 3A 8B 58 58 B1 B2 53 50 A7 41 |3.529):.XX..SP.A|
00000560: 50 B2 53 50 00 75 09 08 02 8B 52 4D B3 B2 53 50 |P.SP.u....RM..SP|
00000570: A7 56 B2 53 50 00 86 09 12 02 8B 58 58 B3 53 50 |.V.SP......XX.SP|
00000580: A7 41 50 B2 58 58 00 96 09 1C 02 8B 52 4D B3 53 |.AP.XX......RM.S|
00000590: 50 A7 56 B2 52 4D 00 A5 09 26 02 8B 56 B3 41 50 |P.V.RM...&..V.AP|
000005A0: A7 41 50 B2 56 00 AF 09 30 02 42 53 B2 41 50 00 |.AP.V...0.BS.AP.|
000005B0: C3 09 3A 02 56 B2 28 53 4D AC 53 44 AD 33 31 29 |..:.V.(SM.SD.31)|
000005C0: AC 41 50 00 D2 09 44 02 8B 56 B1 41 50 A7 56 B2 |.AP...D..V.AP.V.|
000005D0: 41 50 00 E3 09 4E 02 41 50 B2 B5 28 41 50 AB 56 |AP...N.AP..(AP.V|
000005E0: 29 3A 8E 00 00 0A 8A 02 8F 2A 2A 2A 2A 2A 50 20 |):.......*****P |
000005F0: 26 20 4C 20 43 41 4C 43 55 4C 41 54 49 4F 4E 53 |& L CALCULATIONS|
00000600: 00 0D 0A 94 02 4C 43 B2 45 AC 57 AC 34 00 33 0A |.....LC.E.W.4.3.|
00000610: 9E 02 8B 41 50 AB 42 54 B1 30 A7 4C 43 B2 4C 43 |...AP.BT.0.LC.LC|
00000620: AA 28 28 41 50 AB 42 54 29 AD 31 30 30 30 30 30 |.((AP.BT).100000|
00000630: 29 AC 45 00 40 0A A3 02 4C 43 B2 B5 28 4C 43 29 |).E.@...LC..(LC)|
00000640: 00 57 0A A8 02 41 44 B2 B5 28 31 30 30 AC 45 AC |.W...AD..(100.E.|
00000650: 31 AD BC 28 57 29 29 00 75 0A B2 02 43 43 B2 B5 |1..(W)).u...CC..|
00000660: 28 2E 31 AC 46 47 AC 55 43 AA 2E 30 35 AC 52 4D |(.1.FG.UC..05.RM|
00000670: AC 31 2E 35 29 00 8C 0A BC 02 8B 43 B3 30 A7 46 |.1.5)......C.0.F|
00000680: B2 B6 28 B5 28 2E 30 32 AC 43 29 29 00 AA 0A C6 |..(.(.02.C))....|
00000690: 02 8B 43 B3 AB 32 30 30 30 30 30 30 A7 46 B2 B6 |..C..2000000.F..|
000006A0: 28 B5 28 2E 31 30 AC 43 29 29 00 B7 0A D0 02 8B |(.(.10.C))......|
000006B0: 43 B1 30 A7 46 B2 30 00 CB 0A DA 02 52 4D B2 52 |C.0.F.0.....RM.R|
000006C0: 4D AB 41 50 3A 43 B2 B5 28 43 29 00 DD 0A E4 02 |M.AP:C..(C).....|
000006D0: 8B 41 50 B3 B2 4D 50 A7 8D 31 30 35 30 00 F5 0A |.AP..MP..1050...|
000006E0: E9 02 8B 52 B1 30 A7 4F 43 B2 31 30 30 30 30 30 |...R.0.OC.100000|
000006F0: 3A 89 37 36 30 00 FE 0A EE 02 4F 43 B2 30 00 22 |:.760.....OC.0."|
00000700: 0B F8 02 44 B2 B5 28 2E 30 32 30 AC 50 56 AA 28 |...D..(.020.PV.(|
00000710: 31 AD BC 28 4D AC 35 29 29 AC 31 30 30 30 30 30 |1..(M.5)).100000|
00000720: 30 29 00 46 0B 02 03 50 56 B2 B5 28 50 56 AA 49 |0).F...PV..(PV.I|
00000730: 4D AB 44 29 3A 4F 50 B2 41 50 3A 46 56 B2 B5 28 |M.D):OP.AP:FV..(|
00000740: 46 47 AC 55 43 29 00 68 0B 34 03 8B 41 50 B1 4D |FG.UC).h.4..AP.M|
00000750: 50 A7 4F 50 B2 4D 50 3A 46 43 B2 B5 28 28 4D 50 |P.OP.MP:FC..((MP|
00000760: AB 41 50 29 AC 55 43 29 00 79 0B 3E 03 4D 43 B2 |.AP).UC).y.>.MC.|
00000770: B5 28 41 50 AC 31 2E 35 29 00 9F 0B 48 03 45 54 |.(AP.1.5)...H.ET|
00000780: B2 B5 28 44 AA 4D 43 AA 46 AA 43 43 AA 41 44 AA |..(D.MC.F.CC.AD.|
00000790: 4C 43 AA 46 43 AA 49 4D AA 41 45 AA 4F 43 29 00 |LC.FC.IM.AE.OC).|
000007A0: AD 0B 5C 03 8B 41 50 B2 30 A7 38 37 30 00 CE 0B |..\..AP.0.870...|
000007B0: 61 03 55 43 B2 45 54 AD 41 50 3A 8B 46 43 B3 30 |a.UC.ET.AP:.FC.0|
000007C0: A7 55 43 B2 28 45 54 AB 46 43 29 AD 41 50 00 F9 |.UC.(ET.FC).AP..|
000007D0: 0B 66 03 8B 41 50 B1 4D 50 A7 46 56 B2 B5 28 46 |.f..AP.MP.FV..(F|
000007E0: 56 AA 28 41 50 AB 4D 50 29 AC 55 43 29 3A 46 47 |V.(AP.MP).UC):FG|
000007F0: B2 46 47 AA 41 50 AD 4D 50 00 23 0C 70 03 53 52 |.FG.AP.MP.#.p.SR|
00000800: B2 B5 28 4F 50 AC 50 29 3A 4E 50 B2 53 52 AB 45 |..(OP.P):NP.SR.E|
00000810: 54 3A 53 41 B2 53 41 AA 53 52 3A 50 41 B2 50 41 |T:SA.SA.SR:PA.PA|
00000820: AA 4E 50 00 39 0C 75 03 43 B2 43 AA 4E 50 AA 4D |.NP.9.u.C.C.NP.M|
00000830: 43 AA 44 AA 46 43 AB 49 4D 00 3F 0C 7F 03 8E 00 |C.D.FC.IM.?.....|
00000840: 80 0C 84 03 8F 2A 49 4E 46 4F 52 4D 41 54 49 4F |.....*INFORMATIO|
00000850: 4E 20 53 43 52 45 45 4E 20 43 41 4C 43 55 54 41 |N SCREEN CALCUTA|
00000860: 54 49 4F 4E 53 20 39 30 35 20 49 46 41 50 3D 30 |TIONS 905 IFAP=0|
00000870: 54 48 45 4E 50 53 3D 30 3A 47 4F 54 4F 39 32 30 |THENPS=0:GOTO920|
00000880: 00 95 0C 8E 03 50 53 B2 4E 50 AD 28 50 AC 41 50 |.....PS.NP.(P.AP|
00000890: 29 AC 31 30 30 00 AA 0C 98 03 50 53 B2 B5 28 50 |).100.....PS..(P|
000008A0: 53 AC 31 30 30 29 AD 31 30 30 00 CC 0C A2 03 41 |S.100).100.....A|
000008B0: 53 B2 50 41 AD 53 41 AC 31 30 30 3A 41 53 B2 B5 |S.PA.SA.100:AS..|
000008C0: 28 41 53 AC 31 30 30 29 AD 31 30 30 00 D2 0C AC |(AS.100).100....|
000008D0: 03 8E 00 F1 0C 1A 04 8F 2A 2A 2A 50 4F 54 45 4E |........***POTEN|
000008E0: 54 49 41 4C 20 3E 20 50 52 4F 44 55 43 54 49 4F |TIAL > PRODUCTIO|
000008F0: 4E 00 FA 0C 24 04 56 B2 46 47 00 13 0D 2E 04 8B |N...$.V.FG......|
00000900: 4D 50 AB 41 50 B1 46 47 A7 46 47 B2 30 3A 89 31 |MP.AP.FG.FG.0:.1|
00000910: 30 39 30 00 23 0D 38 04 46 47 B2 46 47 AB 4D 50 |090.#.8.FG.FG.MP|
00000920: AA 41 50 00 39 0D 42 04 46 43 B2 B5 28 28 56 AB |.AP.9.B.FC..((V.|
00000930: 46 47 29 AC 55 43 29 3A 8E 00 50 0D 4C 04 8F 2A |FG).UC):..P.L..*|
00000940: 2A 2A 53 54 52 49 4B 45 20 46 41 43 54 4F 52 53 |**STRIKE FACTORS|
00000950: 00 73 0D 56 04 53 44 B2 BC 28 42 54 AE 32 AD 28 |.s.V.SD..(BT.2.(|
00000960: 36 30 30 30 30 AE 32 29 29 AC 28 38 AB 31 AD 50 |60000.2)).(8.1.P|
00000970: AE 32 29 00 87 0D 60 04 53 44 B2 53 44 AD BC 28 |.2)...`.SD.SD..(|
00000980: 57 AD 32 2E 37 35 29 00 A4 0D 6A 04 53 44 B2 53 |W.2.75)...j.SD.S|
00000990: 44 AC 33 30 30 30 AD 28 BC 28 45 29 AC BC 28 57 |D.3000.(.(E)..(W|
000009A0: AE 32 29 29 00 BA 0D 74 04 41 43 B2 B5 28 41 45 |.2))...t.AC..(AE|
000009B0: AD 32 34 35 30 30 30 AA 31 29 00 CF 0D 7E 04 53 |.245000.1)...~.S|
000009C0: 44 B2 28 53 44 AE 31 AD 41 43 29 AD 31 33 30 00 |D.(SD.1.AC).130.|
000009D0: F1 0D 88 04 53 4D B2 36 30 30 30 30 AD 28 57 AC |....SM.60000.(W.|
000009E0: 32 35 30 AA 31 30 30 30 29 AB 31 34 2E 35 AD 31 |250.1000).14.5.1|
000009F0: 32 00 05 0E 92 04 8B 53 44 B3 30 B0 53 4D B3 30 |2......SD.0.SM.0|
00000A00: A7 53 44 B2 30 00 18 0E 97 04 8B 45 B3 32 30 30 |.SD.0......E.200|
00000A10: 30 A7 53 44 B2 31 30 30 00 1E 0E 9C 04 8E 00 37 |0.SD.100.......7|
00000A20: 0E 14 05 8F 2A 2A 4F 50 45 52 41 54 49 4F 4E 53 |....**OPERATIONS|
00000A30: 20 53 43 52 45 45 4E 00 48 0E 1E 05 99 4C 24 3B | SCREEN.H....L$;|
00000A40: 53 24 3B A6 31 30 29 3B 00 6D 0E 28 05 99 22 12 |S$;.10);.m.(..".|
00000A50: 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 53 43 52 45 |INFORMATION SCRE|
00000A60: 45 4E 92 22 3B A6 31 30 29 3B 53 24 3B 00 76 0E |EN.";.10);S$;.v.|
00000A70: 32 05 99 4C 24 3B 00 91 0E 3C 05 81 49 B2 31 A4 |2..L$;...<..I.1.|
00000A80: 32 30 3A 99 53 24 3B A6 33 38 29 3B 53 24 3B 3A |20:.S$;.38);S$;:|
00000A90: 82 00 9A 0E 46 05 99 4C 24 3B 00 B1 0E 50 05 99 |....F..L$;...P..|
00000AA0: 22 13 11 11 11 1D 1D 1D 12 4D 4F 4E 54 48 22 3B |"........MONTH";|
00000AB0: 54 00 BA 0E 55 05 99 52 24 3B 00 E0 0E 5A 05 99 |T...U..R$;...Z..|
00000AC0: 22 12 52 41 54 49 4F 20 4F 46 20 50 52 4F 46 49 |".RATIO OF PROFI|
00000AD0: 54 2F 53 41 4C 45 53 92 22 3B 50 53 3B 22 25 22 |T/SALES.";PS;"%"|
00000AE0: 00 E9 0E 5F 05 99 52 24 3B 00 0F 0F 64 05 99 22 |..._..R$;...d.."|
00000AF0: 12 41 43 43 55 4D 41 4C 41 54 45 44 20 50 52 4F |.ACCUMALATED PRO|
00000B00: 46 49 54 2F 53 41 4C 45 53 92 22 3B 41 53 3B 00 |FIT/SALES.";AS;.|
00000B10: 18 0F 6E 05 99 22 25 22 00 39 0F 78 05 99 52 24 |..n.."%".9.x..R$|
00000B20: 3B 22 52 41 57 20 4D 41 54 45 52 49 41 4C 53 20 |;"RAW MATERIALS |
00000B30: 53 54 4F 43 4B 3A 22 52 4D 00 56 0F 82 05 99 52 |STOCK:"RM.V....R|
00000B40: 24 3B 22 46 49 4E 49 53 48 45 44 20 47 4F 4F 44 |$;"FINISHED GOOD|
00000B50: 53 3A 22 3B 46 47 00 A5 0F 8C 05 99 52 24 3B 22 |S:";FG......R$;"|
00000B60: 41 43 54 55 41 4C 20 50 52 4F 44 55 43 54 49 4F |ACTUAL PRODUCTIO|
00000B70: 4E 22 3B 41 50 20 20 20 20 20 20 20 20 20 20 20 |N";AP |
00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000BA0: 20 20 20 20 20 00 CC 0F 96 05 99 52 24 3B 22 50 | ......R$;"P|
00000BB0: 52 4F 44 55 43 54 49 4F 4E 20 12 42 45 46 4F 52 |RODUCTION .BEFOR|
00000BC0: 45 92 20 53 54 52 49 4B 45 53 22 3B 00 EE 0F A0 |E. STRIKES";....|
00000BD0: 05 99 42 53 3A 99 52 24 3B 22 4D 41 52 4B 45 54 |..BS:.R$;"MARKET|
00000BE0: 20 50 4F 54 45 4E 54 49 41 4C 22 3B 4D 50 00 12 | POTENTIAL";MP..|
00000BF0: 10 AA 05 99 52 24 3B 22 55 4E 49 54 20 43 4F 53 |....R$;"UNIT COS|
00000C00: 54 20 54 48 49 53 20 4D 4F 4E 54 48 20 24 22 3B |T THIS MONTH $";|
00000C10: 55 43 00 2C 10 B4 05 56 B2 B5 28 50 56 AD 33 2E |UC.,...V..(PV.3.|
00000C20: 35 32 39 AC 31 30 30 29 AD 31 30 30 00 51 10 BE |529.100).100.Q..|
00000C30: 05 99 52 24 3B 22 43 55 52 52 45 4E 54 20 50 4C |..R$;"CURRENT PL|
00000C40: 41 4E 54 20 43 41 50 41 42 49 4C 54 59 3A 22 3B |ANT CAPABILTY:";|
00000C50: 56 00 5B 10 C3 05 99 52 53 24 3B 00 82 10 C8 05 |V.[....RS$;.....|
00000C60: 99 22 12 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |.".PRESS ANY KEY|
00000C70: 5C 46 4F 52 20 4E 45 58 54 20 4F 50 54 49 4F 4E |\FOR NEXT OPTION|
00000C80: 92 22 00 96 10 D2 05 A1 41 24 3A 8B 41 24 B2 22 |."......A$:.A$."|
00000C90: 22 A7 31 34 39 30 00 9C 10 D7 05 8E 00 B4 10 DC |".1490..........|
00000CA0: 05 8F 2A 2A 2A 50 52 4F 46 49 54 20 41 4E 44 20 |..***PROFIT AND |
00000CB0: 4C 4F 53 53 00 C4 10 E6 05 99 4C 24 3B 53 24 3B |LOSS......L$;S$;|
00000CC0: A6 38 29 3B 00 E9 10 F0 05 99 22 12 50 52 4F 46 |.8);......".PROF|
00000CD0: 49 54 20 41 4E 44 20 4C 4F 53 53 20 52 45 50 4F |IT AND LOSS REPO|
00000CE0: 52 54 92 22 3B A6 38 29 3B 00 F5 10 FA 05 99 53 |RT.";.8);......S|
00000CF0: 24 3B 4C 24 3B 00 10 11 04 06 81 49 B2 31 A4 32 |$;L$;......I.1.2|
00000D00: 30 3A 99 53 24 3B A6 33 38 29 3B 53 24 3B 3A 82 |0:.S$;.38);S$;:.|
00000D10: 00 26 11 0E 06 99 4C 24 3B 22 13 11 11 11 1D 1D |.&....L$;"......|
00000D20: 1D 1D 1D 1D 22 3B 00 41 11 18 06 99 22 12 53 41 |....";.A....".SA|
00000D30: 4C 45 53 20 52 45 56 45 4E 55 45 20 92 22 3B 53 |LES REVENUE .";S|
00000D40: 52 00 60 11 1D 06 99 52 24 3B 22 11 4C 41 42 4F |R.`....R$;".LABO|
00000D50: 55 52 20 43 4F 53 54 53 22 2C 22 24 22 3B 4C 43 |UR COSTS","$";LC|
00000D60: 00 80 11 22 06 99 52 24 3B 22 4D 41 54 45 52 49 |..."..R$;"MATERI|
00000D70: 41 4C 53 20 55 53 45 44 22 2C 22 24 22 3B 4D 43 |ALS USED","$";MC|
00000D80: 00 9E 11 2C 06 99 52 24 3B 22 91 41 44 56 45 52 |...,..R$;".ADVER|
00000D90: 54 49 53 49 4E 47 22 2C 22 24 22 3B 41 45 00 BA |TISING","$";AE..|
00000DA0: 11 36 06 99 52 24 3B 22 4D 41 49 4E 54 45 4E 41 |.6..R$;"MAINTENA|
00000DB0: 4E 43 45 22 2C 22 24 22 3B 4D 00 DB 11 40 06 99 |NCE","$";M...@..|
00000DC0: 52 24 3B 22 91 46 47 20 53 54 4F 43 4B 20 52 45 |R$;".FG STOCK RE|
00000DD0: 44 27 4E 22 2C 22 24 22 3B 46 43 00 F6 11 4A 06 |D'N","$";FC...J.|
00000DE0: 99 52 24 3B 22 44 45 50 52 45 41 54 49 4F 4E 22 |.R$;"DEPREATION"|
00000DF0: 2C 22 24 22 3B 44 00 15 12 54 06 99 52 24 3B 22 |,"$";D...T..R$;"|
00000E00: 91 46 49 4E 41 4E 43 45 20 43 4F 53 54 53 22 2C |.FINANCE COSTS",|
00000E10: 22 24 22 3B 46 00 35 12 5E 06 99 52 24 3B 22 43 |"$";F.5.^..R$;"C|
00000E20: 41 52 52 59 49 4E 47 20 43 4F 53 54 53 22 2C 22 |ARRYING COSTS","|
00000E30: 24 22 3B 43 43 00 56 12 68 06 99 52 24 3B 22 91 |$";CC.V.h..R$;".|
00000E40: 4F 52 44 45 52 49 4E 47 20 43 4F 53 54 53 22 2C |ORDERING COSTS",|
00000E50: 22 24 22 3B 4F 43 00 72 12 72 06 99 52 24 3B 22 |"$";OC.r.r..R$;"|
00000E60: 49 4E 56 45 53 54 4D 45 4E 54 22 2C 22 24 22 3B |INVESTMENT","$";|
00000E70: 49 4D 00 94 12 7C 06 99 52 24 3B 22 91 41 44 4D |IM...|..R$;".ADM|
00000E80: 49 4E 49 53 54 45 52 41 54 49 4F 4E 22 2C 22 24 |INISTERATION","$|
00000E90: 22 3B 41 44 00 BA 12 86 06 99 52 24 3B 22 11 12 |";AD......R$;"..|
00000EA0: 50 52 4F 46 49 54 92 22 2C 22 24 22 3B 4E 50 2C |PROFIT.","$";NP,|
00000EB0: 22 12 4D 4F 4E 54 48 22 3B 54 00 DD 12 90 06 99 |".MONTH";T......|
00000EC0: 52 24 3B 22 11 12 41 43 43 55 4D 55 4C 41 54 45 |R$;"..ACCUMULATE|
00000ED0: 44 20 50 52 4F 46 49 54 92 22 3B 50 41 00 02 13 |D PROFIT.";PA...|
00000EE0: 9A 06 99 52 24 3B 22 11 12 50 52 45 53 53 20 41 |...R$;"..PRESS A|
00000EF0: 4E 59 20 4B 45 59 20 46 4F 52 20 4E 45 58 54 20 |NY KEY FOR NEXT |
00000F00: 22 3B 00 11 13 9F 06 99 22 4F 50 54 49 4F 4E 92 |";......"OPTION.|
00000F10: 22 00 25 13 A4 06 A1 41 24 3A 8B 41 24 B2 22 22 |".%....A$:.A$.""|
00000F20: A7 31 37 30 30 00 2B 13 AE 06 8E 00 41 13 D6 06 |.1700.+.....A...|
00000F30: 8F 2A 2A 2A 42 41 4C 41 4E 43 45 20 53 48 45 45 |.***BALANCE SHEE|
00000F40: 54 00 64 13 E0 06 99 4C 24 3B 53 24 3B A6 31 33 |T.d....L$;S$;.13|
00000F50: 29 20 22 12 42 41 4C 41 4E 43 45 20 53 48 45 45 |) ".BALANCE SHEE|
00000F60: 54 92 22 3B 00 75 13 EA 06 99 A6 31 32 29 3B 53 |T.";.u.....12);S|
00000F70: 24 3B 4C 24 3B 00 90 13 F4 06 81 49 B2 31 A4 32 |$;L$;......I.1.2|
00000F80: 30 3A 99 53 24 3B A6 33 38 29 3B 53 24 3B 3A 82 |0:.S$;.38);S$;:.|
00000F90: 00 AF 13 FE 06 99 4C 24 3B 22 13 11 11 11 22 3B |......L$;"....";|
00000FA0: A6 33 30 29 3B 22 12 4D 4F 4E 54 48 22 3B 54 00 |.30);".MONTH";T.|
00000FB0: C7 13 08 07 99 52 24 3B 22 12 4C 49 41 42 49 4C |.....R$;".LIABIL|
00000FC0: 49 54 49 45 53 92 22 00 E1 13 12 07 99 22 91 1D |ITIES."......"..|
00000FD0: 12 4F 57 4E 45 52 27 53 20 45 51 55 49 54 59 92 |.OWNER'S EQUITY.|
00000FE0: 22 00 FD 13 1C 07 99 22 1D 53 48 41 52 20 43 41 |"......".SHAR CA|
00000FF0: 50 49 54 41 4C 22 2C 22 24 22 3B 53 43 00 0C 14 |PITAL","$";SC...|
00001000: 21 07 8B 50 41 B3 4F A7 50 41 B2 4F 00 2C 14 26 |!..PA.O.PA.O.,.&|
00001010: 07 99 22 91 1D 52 45 56 45 4E 45 55 20 52 45 53 |.."..REVENEU RES|
00001020: 56 45 52 53 22 2C 22 24 22 3B 50 41 00 42 14 30 |VERS","$";PA.B.0|
00001030: 07 8B 43 B3 30 A7 58 B2 B6 28 43 29 3A 89 31 38 |..C.0.X..(C):.18|
00001040: 36 30 00 4A 14 3A 07 58 B2 30 00 62 14 44 07 99 |60.J.:.X.0.b.D..|
00001050: 22 12 1D 43 55 52 52 45 4E 54 20 4C 49 41 42 2E |"..CURRENT LIAB.|
00001060: 92 22 00 7B 14 4E 07 99 22 91 1D 4F 56 45 52 44 |.".{.N.."..OVERD|
00001070: 52 41 46 54 22 2C 22 24 22 3B 58 00 97 14 58 07 |RAFT","$";X...X.|
00001080: 99 22 12 1D 54 4F 54 41 4C 92 22 2C 22 24 22 3B |."..TOTAL.","$";|
00001090: 53 43 AA 50 41 AA 58 00 B8 14 62 07 99 52 24 3B |SC.PA.X...b..R$;|
000010A0: 22 11 12 41 53 53 45 54 53 92 22 3A 56 B2 43 3A |"..ASSETS.":V.C:|
000010B0: 8B 43 B3 30 A7 56 B2 30 00 C9 14 6C 07 58 58 B2 |.C.0.V.0...l.XX.|
000010C0: B5 28 52 4D AC 31 2E 35 29 00 E6 14 71 07 8B 53 |.(RM.1.5)...q..S|
000010D0: 43 AA 50 41 AA 58 B2 50 56 AA 56 AA 58 58 AA 46 |C.PA.X.PV.V.XX.F|
000010E0: 56 A7 31 39 33 30 00 FF 14 76 07 59 B2 53 43 AA |V.1930...v.Y.SC.|
000010F0: 50 41 AA 58 AB 50 56 AB 56 AB 58 58 AB 46 56 00 |PA.X.PV.V.XX.FV.|
00001100: 0B 15 80 07 50 56 B2 50 56 AA 59 00 24 15 8A 07 |....PV.PV.Y.$...|
00001110: 99 22 12 1D 43 55 52 52 45 4E 54 20 41 53 53 45 |."..CURRENT ASSE|
00001120: 54 53 92 22 00 40 15 94 07 99 22 91 1D 43 41 53 |TS.".@...."..CAS|
00001130: 48 20 41 54 20 42 41 4E 4B 22 2C 22 24 22 3B 56 |H AT BANK","$";V|
00001140: 00 5E 15 9E 07 99 22 1D 46 47 20 53 54 4F 43 4B |.^....".FG STOCK|
00001150: 20 56 41 4C 55 45 22 2C 22 24 22 3B 46 56 00 7E | VALUE","$";FV.~|
00001160: 15 A8 07 99 22 91 1D 4D 41 54 45 52 49 41 4C 53 |...."..MATERIALS|
00001170: 20 56 41 4C 55 45 22 2C 22 24 22 3B 58 58 00 95 | VALUE","$";XX..|
00001180: 15 B2 07 99 22 1D 12 46 49 58 45 44 20 41 53 53 |...."..FIXED ASS|
00001190: 45 54 53 92 22 00 B1 15 BC 07 99 22 91 1D 50 4C |ETS."......"..PL|
000011A0: 41 4E 54 20 56 41 4C 55 45 22 2C 22 24 22 3B 50 |ANT VALUE","$";P|
000011B0: 56 00 D0 15 D0 07 99 22 1D 12 54 4F 54 41 4C 92 |V......"..TOTAL.|
000011C0: 22 2C 22 24 22 3B 50 56 AA 56 AA 58 58 AA 46 56 |","$";PV.V.XX.FV|
000011D0: 00 F4 15 DA 07 99 52 24 3B 22 12 50 52 45 53 53 |......R$;".PRESS|
000011E0: 20 41 4E 59 20 4B 45 59 20 46 4F 52 20 4E 45 58 | ANY KEY FOR NEX|
000011F0: 54 20 22 3B 00 03 16 E4 07 99 22 4F 50 54 49 4F |T ";......"OPTIO|
00001200: 4E 92 22 00 17 16 EE 07 A1 41 24 3A 8B 41 24 B2 |N."......A$:.A$.|
00001210: 22 22 A7 32 30 33 30 00 1D 16 F8 07 8E 00 36 16 |"".2030.......6.|
00001220: 34 08 8F 2A 2A 2A 4D 41 52 4B 45 54 20 50 4F 54 |4..***MARKET POT|
00001230: 45 4E 54 49 41 4C 00 57 16 3E 08 56 B2 BD 28 53 |ENTIAL.W.>.V..(S|
00001240: 4D AD 34 29 AC BD 28 50 29 AC BD 28 42 54 AD 33 |M.4)..(P)..(BT.3|
00001250: 30 30 30 30 30 30 29 00 7D 16 48 08 56 B2 56 AC |000000).}.H.V.V.|
00001260: 28 38 2E 36 AB BC 28 41 45 AD 31 30 30 30 29 AB |(8.6..(AE.1000).|
00001270: BD 28 41 45 AD 38 30 30 30 30 30 29 29 00 99 16 |.(AE.800000))...|
00001280: 52 08 4D 50 B2 33 34 30 30 30 30 30 AB 56 AE 31 |R.MP.3400000.V.1|
00001290: AD 41 43 AC 31 35 30 30 30 00 AA 16 57 08 8B 45 |.AC.15000...W..E|
000012A0: B3 32 30 30 30 A7 4D 50 B2 30 00 B9 16 5C 08 8B |.2000.MP.0...\..|
000012B0: 4D 50 B3 30 A7 4D 50 B2 30 00 C8 16 66 08 4D 50 |MP.0.MP.0...f.MP|
000012C0: B2 B5 28 4D 50 29 3A 8E 00 DD 16 FC 08 8F 2A 2A |..(MP):.......**|
000012D0: 2A 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 01 17 |*INSTRUCTIONS...|
000012E0: 06 09 99 22 93 22 3B A6 31 31 29 3B 22 12 50 45 |...".";.11);".PE|
000012F0: 54 20 42 55 53 49 4E 45 53 20 4D 4F 44 45 4C 92 |T BUSINES MODEL.|
00001300: 22 00 0B 17 10 09 99 22 11 11 22 00 32 17 1A 09 |"......"..".2...|
00001310: 99 22 59 4F 55 20 48 41 56 45 20 54 48 45 20 54 |."YOU HAVE THE T|
00001320: 41 53 4B 20 20 4F 46 20 52 55 4E 4E 49 4E 47 20 |ASK OF RUNNING |
00001330: 41 22 00 58 17 24 09 99 22 46 49 52 4D 20 57 48 |A".X.$.."FIRM WH|
00001340: 49 43 48 20 49 53 20 53 49 4D 55 4C 41 54 45 44 |ICH IS SIMULATED|
00001350: 42 59 20 54 48 49 53 22 00 7D 17 2E 09 99 22 50 |BY THIS".}...."P|
00001360: 52 4F 47 52 41 4D 2E 54 48 45 20 4F 42 4A 45 43 |ROGRAM.THE OBJEC|
00001370: 54 20 49 53 20 54 4F 20 4D 41 4B 45 22 00 A1 17 |T IS TO MAKE"...|
00001380: 38 09 99 22 54 48 45 20 41 43 43 55 4D 55 4C 41 |8.."THE ACCUMULA|
00001390: 54 45 44 20 50 52 4F 46 49 54 2F 53 41 4C 45 53 |TED PROFIT/SALES|
000013A0: 22 00 C5 17 42 09 99 22 52 45 56 45 4E 55 20 50 |"...B.."REVENU P|
000013B0: 45 52 43 45 4E 54 41 47 45 20 41 53 20 48 49 47 |ERCENTAGE AS HIG|
000013C0: 48 20 41 53 22 00 EC 17 4C 09 99 22 59 4F 55 20 |H AS"...L.."YOU |
000013D0: 50 4F 53 53 49 42 4C 45 20 43 41 4E 2E 42 45 4C |POSSIBLE CAN.BEL|
000013E0: 4F 57 20 49 53 20 41 20 53 45 54 22 00 10 18 56 |OW IS A SET"...V|
000013F0: 09 99 22 4F 46 20 46 49 47 55 52 45 53 20 54 48 |.."OF FIGURES TH|
00001400: 41 54 20 43 41 4E 20 42 45 20 49 4E 50 55 54 22 |AT CAN BE INPUT"|
00001410: 00 31 18 60 09 99 22 41 4E 44 20 57 4F 55 4C 44 |.1.`.."AND WOULD|
00001420: 20 47 49 56 45 20 41 20 4D 4F 52 44 45 52 41 54 | GIVE A MORDERAT|
00001430: 22 00 44 18 6A 09 99 22 50 45 52 43 45 4E 54 41 |".D.j.."PERCENTA|
00001440: 47 45 2E 22 00 6B 18 74 09 99 22 11 11 50 52 49 |GE.".k.t.."..PRI|
00001450: 43 45 20 20 34 2E 32 35 22 2C 22 41 44 56 45 52 |CE 4.25","ADVER|
00001460: 54 49 53 49 4E 47 20 35 30 30 22 00 93 18 7E 09 |TISING 500"...~.|
00001470: 99 22 50 52 4F 44 55 43 54 49 4F 4E 20 33 32 30 |."PRODUCTION 320|
00001480: 30 22 2C 22 4D 41 54 45 52 49 41 4C 53 20 33 32 |0","MATERIALS 32|
00001490: 30 30 22 00 B6 18 88 09 99 22 42 4F 4E 55 53 20 |00"......"BONUS |
000014A0: 32 35 30 30 22 2C 22 45 4D 50 4C 4F 59 45 45 53 |2500","EMPLOYEES|
000014B0: 20 35 30 30 30 22 00 DE 18 92 09 99 22 57 45 45 | 5000"......"WEE|
000014C0: 4B 4C 59 20 57 41 47 45 20 31 32 30 22 2C 22 49 |KLY WAGE 120","I|
000014D0: 4E 56 45 53 54 4D 45 4E 54 20 34 30 30 22 00 F5 |NVESTMENT 400"..|
000014E0: 18 9C 09 99 22 4D 41 49 4E 54 45 4E 41 4E 43 45 |...."MAINTENANCE|
000014F0: 20 33 35 30 22 00 1A 19 A6 09 99 22 12 11 50 52 | 350"......"..PR|
00001500: 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |ESS ANY KEY TO C|
00001510: 4F 4E 54 49 4E 55 45 92 12 22 00 2E 19 B0 09 A1 |ONTINUE.."......|
00001520: 41 24 3A 8B 41 24 B2 22 22 A7 32 34 38 30 00 34 |A$:.A$."".2480.4|
00001530: 19 BA 09 8E 00 00 00 |....... |
..$....I.1.40:L$.L$.". .":.:S$.". .".A.(
.T.O:RM.3200000:C.5000000.C.2.UC.3.35:SC
.20000000:FG.100000.Z.<.PA.2135000:OT.10
00...F..".";:R$."...":R.0:SA.15350000.G.
P.PV.12000000:R.0:SA.15350000:FV.335000.
..Z.."DO YOU REQUIRE INSTRUCTIONS";A$...
D..A$."Y"..2300:."."...I..140...N.."OPTI
ON ?".0.X..V$:.V$."".120.<.}.V.E(V$).O..
..V..1.V..6.210.P....".OPTIONS AVAILABLE
ARE :.".......10);"1 DECISION SCREEN"..
. ...10);"2 INFORMATION SCREEN".J.....10
);"3 P & L REPORT".......10);"4 BALANCE
REPORT".......10);"5 INSTRUCTIONS"...C..
.10);"6 END PROGRAM".%.H..110.0.R..V.6..
.O....V.250,1300,1500,1750,2300.Y...."."
;.B....110.}....R******DECISON SCREEN...
...L$;:.S$;.10);......".DECISION SCREEN.
";.13);S$;.N...RM.RM.R:C.C.R.1.5:T.T.1.W
....L$;..."..I.1.20:.S$;.38);S$;:....'..
L$;"....";.$.,.."......DID YOU WANT THIS
";A$.7.1..H(A$,1)."N"...K.6.."...PRICE $
";P.N.@.."...ADVERTISING ('000) S$";AE..
.J.."...SCHEDULED PROG.('000)";SP...T.."
...RAW MATERAILS ('000)";R.V.H.."...BONU
S THRESHOLD ('000)";BT...R.."...NUMBER O
F EMPLOYEES";E...|.."...THE WEEKLEY WAGE
$";W.6...."...MAINTENANCE ('000) $";M.W
...."...INVESTMENT ('000)S$";IM.~....R$;
".PRESS Y IF INPUTS OK; N TO";......" RE
-INPUT."......Q$:.Q$."".430......Q$."N".
.".";:.250.U.B.M.M.OT:SP.SP.OT:R.R.OT...
G.AE.AE.OT:IM.IM.OT:BT.BT.OT:CI.CI.OT...
L..500:.2100:.650:.900...V...9....******
ACTUAL PRODUCTION.C....1110.D...XX..(PV.
3.529):.XX..SP.AP.SP.U....RM..SP.V.SP...
...XX.SP.AP.XX......RM.SP.V.RM...&..V.AP
.AP.V...0.BS.AP.C.:.V.(SM.SD.31).AP.R.D.
.V.AP.V.AP...N.AP..(AP.V):.......*****P
& L CALCULATIONS.....LC.E.W.4.3....AP.BT
.0.LC.LC.((AP.BT).100000).E.@...LC..(LC)
.W...AD..(100.E.1..(W)).U...CC..(.1.FG.U
C..05.RM.1.5)......C.0.F..(.(.02.C))...F
..C..2000000.F..(.(.10.C))...P..C.0.F.0.
K.Z.RM.RM.AP:C..(C)......AP..MP..1050...
...R.0.OC.100000:.760.....OC.0."...D..(.
020.PV.(1..(M.5)).1000000).F...PV..(PV.I
M.D):OP.AP:FV..(FG.UC).H.4..AP.MP.OP.MP:
FC..((MP.AP).UC).Y.>.MC..(AP.1.5)...H.ET
..(D.MC.F.CC.AD.LC.FC.IM.AE.OC)...\..AP.
0.870.N.A.UC.ET.AP:.FC.0.UC.(ET.FC).AP..
.F..AP.MP.FV..(FV.(AP.MP).UC):FG.FG.AP.M
P.#.P.SR..(OP.P):NP.SR.ET:SA.SA.SR:PA.PA
.NP.9.U.C.C.NP.MC.D.FC.IM.?.........*IN
FORMATION SCREEN CALCUTATIONS 905 IFAP=0
THENPS=0:GOTO920.....PS.NP.(P.AP).100...
..PS..(PS.100).100.L...AS.PA.SA.100:AS..
(AS.100).100.R..........***POTENTIAL > P
RODUCTION...$.V.FG......MP.AP.FG.FG.0:.1
090.#.8.FG.FG.MP.AP.9.B.FC..((V.FG).UC):
..P.L..***STRIKE FACTORS.S.V.SD..(BT.2.(
60000.2)).(8.1.P.2)...`.SD.SD..(W.2.75).
..J.SD.SD.3000.(.(E)..(W.2))...T.AC..(AE
.245000.1).O.~.SD.(SD.1.AC).130.....SM.6
0000.(W.250.1000).14.5.12......SD.0.SM.0
.SD.0......E.2000.SD.100.......7....**OP
ERATIONS SCREEN.H....L$;S$;.10);.M.(..".
INFORMATION SCREEN.";.10);S$;.V.2..L$;..
.<..I.1.20:.S$;.38);S$;:....F..L$;...P..
"........MONTH";T...U..R$;...Z..".RATIO
OF PROFIT/SALES.";PS;"%"..._..R$;...D.."
.ACCUMALATED PROFIT/SALES.";AS;...N.."%"
.9.X..R$;"RAW MATERIALS STOCK:"RM.V....R
$;"FINISHED GOODS:";FG......R$;"ACTUAL P
RODUCTION";AP
.L....R$;"PRODUCTIO
N .BEFORE. STRIKES";... ..BS:.R$;"MARKET
POTENTIAL";MP......R$;"UNIT COST THIS M
ONTH $";UC.,...V..(PV.3.529.100).100.Q..
..R$;"CURRENT PLANT CAPABILTY:";V.[.C..R
S$;...H..".PRESS ANY KEY\FOR NEXT OPTION
."...R..A$:.A$."".1490...W........***PRO
FIT AND LOSS.D....L$;S$;.8);......".PROF
IT AND LOSS REPORT.";.8);......S$;L$;...
...I.1.20:.S$;.38);S$;:..&....L$;"......
....";.A....".SALES REVENUE .";SR.`....R
$;".LABOUR COSTS","$";LC..."..R$;"MATERI
ALS USED","$";MC...,..R$;".ADVERTISING",
"$";AE...6..R$;"MAINTENANCE","$";M...@..
R$;".FG STOCK RED'N","$";FC...J..R$;"DEP
REATION","$";D...T..R$;".FINANCE COSTS",
"$";F.5.^..R$;"CARRYING COSTS","$";CC.V.
H..R$;".ORDERING COSTS","$";OC.R.R..R$;"
INVESTMENT","$";IM...|..R$;".ADMINISTERA
TION","$";AD......R$;"..PROFIT.","$";NP,
".MONTH";T......R$;"..ACCUMULATED PROFIT
.";PA......R$;"..PRESS ANY KEY FOR NEXT
";......"OPTION.".%....A$:.A$."".1700.+.
....A.V..***BALANCE SHEET.D....L$;S$;.13
) ".BALANCE SHEET.";.U.....12);S$;L$;...
...I.1.20:.S$;.38);S$;:.......L$;"....";
.30);".MONTH";T.G....R$;".LIABILITIES.".
....."...OWNER'S EQUITY."......".SHAR CA
PITAL","$";SC...!..PA.O.PA.O.,.&.."..REV
ENEU RESVERS","$";PA.B.0..C.0.X..(C):.18
60.J.:.X.0.B.D.."..CURRENT LIAB..".{.N..
"..OVERDRAFT","$";X...X.."..TOTAL.","$";
SC.PA.X...B..R$;"..ASSETS.":V.C:.C.0.V.0
.I.L.XX..(RM.1.5)...Q..SC.PA.X.PV.V.XX.F
V.1930...V.Y.SC.PA.X.PV.V.XX.FV.....PV.P
V.Y.$...."..CURRENT ASSETS.".@...."..CAS
H AT BANK","$";V.^....".FG STOCK VALUE",
"$";FV.~...."..MATERIALS VALUE","$";XX..
...."..FIXED ASSETS."......"..PLANT VALU
E","$";PV.P.P.."..TOTAL.","$";PV.V.XX.FV
...Z..R$;".PRESS ANY KEY FOR NEXT ";....
.."OPTION."......A$:.A$."".2030.......6.
4..***MARKET POTENTIAL.W.>.V..(SM.4)..(P
)..(BT.3000000).}.H.V.V.(8.6..(AE.1000).
.(AE.800000))...R.MP.3400000.V.1.AC.1500
0...W..E.2000.MP.0...\..MP.0.MP.0.H.F.MP
..(MP):.......***INSTRUCTIONS......".";.
11);".PET BUSINES MODEL."......"..".2...
."YOU HAVE THE TASK OF RUNNING A".X.$..
"FIRM WHICH IS SIMULATEDBY THIS".}...."P
ROGRAM.THE OBJECT IS TO MAKE"...8.."THE
ACCUMULATED PROFIT/SALES".E.B.."REVENU P
ERCENTAGE AS HIGH AS"...L.."YOU POSSIBLE
CAN.BELOW IS A SET"...V.."OF FIGURES TH
AT CAN BE INPUT".1.`.."AND WOULD GIVE A
MORDERAT".D.J.."PERCENTAGE.".K.T.."..PRI
CE 4.25","ADVERTISING 500"...~.."PRODUC
TION 3200","MATERIALS 3200"......"BONUS
2500","EMPLOYEES 5000"......"WEEKLY WAGE
120","INVESTMENT 400"......"MAINTENANCE
350"......"..PRESS ANY KEY TO CONTINUE.
."......A$:.A$."".2480.4.......
> CLICK IMAGE PREVIEW FOR FULL MODAL