MAIN
FILE INFORMATION
FILENAME(S): MAIN
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-10-20 00:35:02
APPEARS ON: 1 disk(s)
FILE HASH
4f0545e5a16a082f48b8513cc461438dd4c86b993e076b11ed4137ef1c0f9eed
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES | MAIN | PRG | Robin Albicker | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 64 00 8F 20 20 20 20 20 20 20 27 4D |....d.. 'M| 00000010: 41 49 4E 27 20 50 52 4F 47 52 41 4D 00 33 08 67 |AIN' PROGRAM.3.g| 00000020: 00 8B 20 C2 28 35 31 32 31 30 29 B2 36 20 89 20 |.. .(51210).6 . | 00000030: 31 34 30 00 52 08 68 00 8B 20 C2 28 36 34 38 29 |140.R.h.. .(648)| 00000040: B2 34 20 A7 20 8D 20 33 30 30 30 3A 20 89 20 31 |.4 . . 3000: . 1| 00000050: 31 35 00 6A 08 69 00 97 35 33 32 38 30 2C 39 3A |15.j.i..53280,9:| 00000060: 20 97 20 35 33 32 38 31 2C 39 00 95 08 6B 00 99 | . 53281,9...k..| 00000070: 22 93 11 11 05 50 D0 4C CC 45 C5 41 C1 53 D3 45 |"....P.L.E.A.S.E| 00000080: C5 20 49 4E CE 53 D3 45 C5 52 D2 54 D4 20 54 D4 |. IN.S.E.R.T. T.| 00000090: 48 C8 45 C5 22 00 E3 08 6C 00 99 22 11 43 C3 59 |H.E."...l..".C.Y| 000000A0: D9 42 C2 45 C5 52 D2 57 D7 4F CF 52 D2 4C CC 44 |.B.E.R.W.O.R.L.D| 000000B0: C4 20 44 C4 41 C1 54 D4 41 C1 20 44 C4 49 53 D3 |. D.A.T.A. D.IS.| 000000C0: 4B CB 20 20 20 11 28 42 C2 29 20 41 C1 4E CE 44 |K. .(B.) A.N.D| 000000D0: C4 20 50 D0 52 D2 45 C5 53 D3 53 D3 20 3C 42 C2 |. P.R.E.S.S. <B.| 000000E0: 3E 3A 22 00 FD 08 73 00 A1 20 58 24 3A 20 8B 20 |>:"...s.. X$: . | 000000F0: 58 24 B3 B1 22 42 22 20 89 20 31 31 35 00 25 09 |X$.."B" . 115.%.| 00000100: 78 00 99 22 93 22 3A 8B 20 C2 28 35 31 32 31 30 |x..".":. .(51210| 00000110: 29 B3 B1 36 20 A7 20 93 22 43 48 52 2E 43 59 42 |)..6 . ."CHR.CYB| 00000120: 22 2C 38 2C 31 00 4A 09 8C 00 8B 20 C2 28 32 34 |",8,1.J.... .(24| 00000130: 33 32 30 29 B3 B1 31 36 32 20 A7 20 93 22 53 50 |320)..162 . ."SP| 00000140: 52 2E 43 59 42 22 2C 38 2C 31 00 64 09 A0 00 8B |R.CYB",8,1.d....| 00000150: 20 C2 28 37 36 37 29 B3 B1 37 20 A7 20 9E 20 32 | .(767)..7 . . 2| 00000160: 34 33 32 30 00 8C 09 B4 00 8B 20 C2 28 35 30 31 |4320...... .(501| 00000170: 37 36 29 B3 B1 31 36 30 20 A7 20 93 22 52 4F 42 |76)..160 . ."ROB| 00000180: 4F 54 53 2E 43 59 42 22 2C 38 2C 31 00 A5 09 C8 |OTS.CYB",8,1....| 00000190: 00 8F 20 20 20 20 20 20 42 45 47 49 4E 20 50 52 |.. BEGIN PR| 000001A0: 4F 47 52 41 4D 00 C5 09 D2 00 8D 20 35 30 30 30 |OGRAM...... 5000| 000001B0: 30 3A 20 8F 20 20 20 20 44 4F 20 4D 49 4E 49 2D |0: . DO MINI-| 000001C0: 54 49 54 4C 45 00 ED 09 DC 00 99 22 93 11 11 11 |TITLE......"....| 000001D0: 11 D0 52 45 53 53 20 9E 3C CE 3E 05 20 46 4F 52 |..RESS .<.>. FOR| 000001E0: 20 41 20 20 4E 45 57 20 47 41 4D 45 22 00 1D 0A | A NEW GAME"...| 000001F0: F0 00 99 22 11 12 50 52 45 53 53 92 20 12 9E 3C |..."..PRESS. ..<| 00000200: 4F 3E 05 92 20 12 46 4F 52 92 20 12 41 4E 92 20 |O>.. .FOR. .AN. | 00000210: 12 4F 4C 44 92 20 12 47 41 4D 45 92 22 00 41 0A |.OLD. .GAME.".A.| 00000220: 04 01 A1 20 58 24 3A 20 8B 20 58 24 B3 B1 22 4E |... X$: . X$.."N| 00000230: 22 20 AF 20 58 24 B3 B1 22 4F 22 20 89 20 32 36 |" . X$.."O" . 26| 00000240: 30 00 64 0A 40 01 99 22 11 11 D7 48 41 54 20 49 |0.d.@.."...HAT I| 00000250: 53 20 59 4F 55 52 20 41 53 53 55 4D 45 44 20 4E |S YOUR ASSUMED N| 00000260: 41 4D 45 22 00 80 0A 54 01 85 22 46 4F 52 20 54 |AME"...T.."FOR T| 00000270: 48 49 53 20 4D 49 53 53 49 4F 4E 12 22 3B 4E 24 |HIS MISSION.";N$| 00000280: 00 BC 0A 68 01 99 22 92 22 3A 8B 20 C3 28 4E 24 |...h..".":. .(N$| 00000290: 29 B3 33 20 A7 20 99 22 11 C1 54 20 4C 45 41 53 |).3 . ."..T LEAS| 000002A0: 54 20 33 20 4C 45 54 54 45 52 53 2C 20 50 4C 45 |T 3 LETTERS, PLE| 000002B0: 41 53 45 2E 22 3A 20 89 20 33 32 30 00 04 0B 7C |ASE.": . 320...|| 000002C0: 01 4E 30 24 B2 C8 28 4E 24 2C 33 29 3A 20 8B 20 |.N0$..(N$,3): . | 000002D0: 4E 30 24 B2 22 30 30 30 22 A7 99 22 C9 4E 56 41 |N0$."000"..".NVA| 000002E0: 4C 49 44 20 C3 4F 44 45 20 CE 41 4D 45 2E 20 C3 |LID .ODE .AME. .| 000002F0: 48 4F 4F 53 45 20 C1 4E 4F 54 48 45 52 2E 22 3A |HOOSE .NOTHER.":| 00000300: 89 33 32 30 00 18 0B 86 01 8B 20 58 24 B2 22 4F |.320...... X$."O| 00000310: 22 20 89 20 32 30 30 30 00 47 0B 90 01 9F 20 31 |" . 2000.G.... 1| 00000320: 35 2C 38 2C 31 35 2C 22 43 30 3A 43 59 42 22 AA |5,8,15,"C0:CYB".| 00000330: 4E 30 24 AA 22 2E 44 41 54 3D 30 3A 43 59 42 30 |N0$.".DAT=0:CYB0| 00000340: 30 30 2E 44 41 54 22 00 59 0B A4 01 8B 20 53 54 |00.DAT".Y.... ST| 00000350: B1 31 20 89 20 39 30 30 30 00 82 0B B8 01 98 31 |.1 . 9000......1| 00000360: 35 2C 22 43 30 3A 53 50 43 22 AA 4E 30 24 AA 22 |5,"C0:SPC".N0$."| 00000370: 2E 44 41 54 3D 30 3A 53 50 43 30 30 30 2E 44 41 |.DAT=0:SPC000.DA| 00000380: 54 22 00 94 0B CC 01 8B 20 53 54 B1 31 20 89 20 |T"...... ST.1 . | 00000390: 39 30 30 30 00 9D 0B E0 01 A0 20 31 35 00 C3 0B |9000...... 15...| 000003A0: F4 01 85 22 11 11 C4 49 46 46 49 43 55 4C 54 59 |..."...IFFICULTY| 000003B0: 20 C6 41 43 54 4F 52 20 28 31 2D 31 30 29 12 22 | .ACTOR (1-10)."| 000003C0: 3B 44 4C 00 07 0C 08 02 99 22 92 22 3A 8B 20 44 |;DL......".":. D| 000003D0: 4C B3 31 20 B0 20 44 4C B1 31 30 20 A7 20 99 22 |L.1 . DL.10 . ."| 000003E0: C3 48 4F 4F 53 45 20 41 20 46 41 43 54 4F 52 20 |.HOOSE A FACTOR | 000003F0: 42 45 54 57 45 45 4E 20 31 20 41 4E 44 20 31 30 |BETWEEN 1 AND 10| 00000400: 2E 22 3A 89 35 30 30 00 16 0C 1C 02 97 20 35 30 |.":.500...... 50| 00000410: 31 35 35 2C 44 4C 00 42 0C 30 02 99 22 93 11 11 |155,DL.B.0.."...| 00000420: 11 D0 52 45 50 41 52 45 20 54 4F 20 42 45 47 49 |..REPARE TO BEGI| 00000430: 4E 20 59 4F 55 52 20 4D 49 53 53 49 4F 4E 2E 2E |N YOUR MISSION..| 00000440: 2E 22 00 4D 0C 44 02 89 20 32 32 30 30 00 6E 0C |.".M.D.. 2200.n.| 00000450: D0 07 8F 20 20 20 20 20 42 52 41 4E 43 48 20 54 |... BRANCH T| 00000460: 4F 20 4E 45 58 54 20 50 52 4F 47 52 41 4D 00 7A |O NEXT PROGRAM.z| 00000470: 0C E4 07 8D 20 34 30 30 30 30 00 95 0C 98 08 97 |.... 40000......| 00000480: 20 35 33 32 38 30 2C 31 31 3A 20 97 20 35 33 32 | 53280,11: . 532| 00000490: 38 31 2C 31 31 00 BE 0C A2 08 41 24 B2 22 44 52 |81,11.....A$."DR| 000004A0: 4B 22 3A 20 8B 20 50 47 4D B2 31 20 B0 20 50 47 |K": . PGM.1 . PG| 000004B0: 4D B2 32 20 A7 20 41 24 B2 22 53 50 43 22 00 D5 |M.2 . A$."SPC"..| 000004C0: 0C AC 08 8B 20 50 47 4D B2 34 20 A7 20 41 24 B2 |.... PGM.4 . A$.| 000004D0: 22 4F 5A 58 22 00 F5 0C C0 08 99 22 93 97 4C 4F |"OZX"......"..LO| 000004E0: 41 44 22 C7 28 33 34 29 3B 41 24 3B C7 28 33 34 |AD".(34);A$;.(34| 000004F0: 29 22 2C 38 22 00 2D 0D D4 08 99 22 11 11 11 11 |)",8".-...."....| 00000500: 11 05 C9 4E 53 45 52 54 20 54 48 45 20 12 43 59 |...NSERT THE .CY| 00000510: 42 45 52 57 4F 52 4C 44 92 20 50 52 4F 47 52 41 |BERWORLD. PROGRA| 00000520: 4D 20 44 49 53 4B 20 90 28 C1 29 05 22 00 45 0D |M DISK .(.).".E.| 00000530: E8 08 99 22 41 4E 44 20 50 52 45 53 53 20 90 3C |..."AND PRESS .<| 00000540: C1 3E 05 3A 22 00 60 0D FC 08 A1 20 58 24 3A 20 |.>.:".`.... X$: | 00000550: 8B 20 58 24 B3 B1 22 41 22 20 89 20 32 33 30 30 |. X$.."A" . 2300| 00000560: 00 97 0D 10 09 99 22 11 11 11 11 12 90 D0 CC C5 |......".........| 00000570: C1 D3 C5 20 D7 C1 C9 D4 20 D7 C8 C9 CC C5 20 D4 |... .... ..... .| 00000580: C8 C5 20 CE C5 D8 D4 20 D0 D2 CF C7 D2 C1 CD 20 |.. .... ....... | 00000590: CC CF C1 C4 D3 90 22 00 B9 0D 24 09 97 20 36 33 |......"...$.. 63| 000005A0: 31 2C 31 39 3A 20 97 20 36 33 32 2C 31 33 3A 20 |1,19: . 632,13: | 000005B0: 97 20 36 33 33 2C 31 34 37 00 DB 0D 38 09 97 20 |. 633,147...8.. | 000005C0: 36 33 34 2C 38 32 3A 20 97 20 36 33 35 2C 32 31 |634,82: . 635,21| 000005D0: 33 3A 20 97 20 36 33 36 2C 31 33 00 EA 0D 4C 09 |3: . 636,13...L.| 000005E0: 97 20 31 39 38 2C 36 3A 20 80 00 31 0E B8 0B 99 |. 198,6: ..1....| 000005F0: 22 93 11 11 11 05 D0 4C 45 41 53 45 20 49 4E 53 |"......LEASE INS| 00000600: 45 52 54 20 54 48 45 20 C3 59 42 45 52 57 4F 52 |ERT THE .YBERWOR| 00000610: 4C 44 20 C4 41 54 41 20 C4 49 53 4B 20 20 28 42 |LD .ATA .ISK (B| 00000620: 29 20 41 4E 44 20 50 52 45 53 53 20 3C 42 3E 3A |) AND PRESS <B>:| 00000630: 22 00 37 0E CC 0B 8E 00 58 0E 28 23 8F 20 20 20 |".7.....X.(#. | 00000640: 20 20 45 52 52 4F 52 20 48 41 4E 44 4C 49 4E 47 | ERROR HANDLING| 00000650: 20 52 4F 55 54 49 4E 45 00 6C 0E 3C 23 84 31 35 | ROUTINE.l.<#.15| 00000660: 2C 41 24 2C 42 24 2C 43 24 2C 44 24 00 86 0E 50 |,A$,B$,C$,D$...P| 00000670: 23 97 20 35 33 32 38 30 2C 31 31 3A 20 97 20 35 |#. 53280,11: . 5| 00000680: 33 32 38 31 2C 31 00 AC 0E 64 23 99 22 1C C4 C9 |3281,1...d#."...| 00000690: D3 CB C5 D4 D4 C5 20 C4 C1 D4 C1 20 D4 D2 C1 CE |...... .... ....| 000006A0: D3 C6 C5 D2 20 C5 D2 D2 CF D2 3A 22 00 C3 0E 78 |.... .....:"...x| 000006B0: 23 99 41 24 22 2C 22 42 24 22 2C 22 43 24 22 2C |#.A$","B$","C$",| 000006C0: 22 44 24 00 CC 0E 82 23 A0 20 31 35 00 EE 0E 8C |"D$....#. 15....| 000006D0: 23 99 22 11 11 11 D0 52 45 53 53 20 41 4E 59 20 |#."....RESS ANY | 000006E0: 4B 45 59 20 54 4F 20 43 4C 45 41 52 2E 22 00 09 |KEY TO CLEAR."..| 000006F0: 0F A0 23 A1 20 58 24 3A 20 8B 20 C3 28 58 24 29 |..#. X$: . .(X$)| 00000700: B3 31 20 89 20 39 31 32 30 00 2A 0F B4 23 97 36 |.1 . 9120.*..#.6| 00000710: 34 38 2C 34 3A 20 97 35 36 35 37 36 2C 32 33 3A |48,4: .56576,23:| 00000720: 20 97 35 33 32 37 32 2C 32 33 00 49 0F C8 23 99 | .53272,23.I..#.| 00000730: 22 93 05 22 3A 20 97 35 33 32 38 30 2C 31 31 3A |"..": .53280,11:| 00000740: 20 97 35 33 32 38 31 2C 30 00 4F 0F DC 23 A2 00 | .53281,0.O..#..| 00000750: 8A 0F 40 9C 9F 37 2C 38 2C 37 2C 22 43 59 42 22 |..@..7,8,7,"CYB"| 00000760: AA 4E 30 24 AA 22 2E 44 41 54 2C 53 2C 52 22 3A |.N0$.".DAT,S,R":| 00000770: 20 8B 20 53 54 B1 31 20 A7 9F 31 35 2C 38 2C 31 | . ST.1 ..15,8,1| 00000780: 35 3A A0 37 3A 89 39 30 30 30 00 A3 0F 54 9C 81 |5:.7:.9000...T..| 00000790: 20 49 B2 31 20 A4 20 31 36 3A 20 84 37 2C 58 24 | I.1 . 16: .7,X$| 000007A0: 3A 20 82 00 C6 0F 90 9C 8B 20 53 54 B1 31 20 A7 |: ....... ST.1 .| 000007B0: 20 9F 20 31 35 2C 38 2C 31 35 3A 20 A0 37 3A 20 | . 15,8,15: .7: | 000007C0: 89 20 39 30 30 30 00 DB 0F A4 9C 81 49 B2 31 A4 |. 9000......I.1.| 000007D0: 32 36 3A 84 37 2C 58 24 3A 82 49 00 F6 0F B8 9C |26:.7,X$:.I.....| 000007E0: 81 49 B2 31 A4 32 30 3A 84 37 2C 58 24 3A 84 37 |.I.1.20:.7,X$:.7| 000007F0: 2C 58 24 3A 82 49 00 0B 10 CC 9C 81 49 B2 31 A4 |,X$:.I......I.1.| 00000800: 37 3A 84 37 2C 58 24 3A 82 20 49 00 28 10 E0 9C |7:.7,X$:. I.(...| 00000810: 81 49 B2 31 A4 32 30 3A 81 4A B2 30 A4 32 3A 84 |.I.1.20:.J.0.2:.| 00000820: 37 2C 58 3A 82 4A 2C 49 00 45 10 F4 9C 81 49 B2 |7,X:.J,I.E....I.| 00000830: 31 A4 32 36 3A 81 4A B2 30 A4 32 3A 84 37 2C 58 |1.26:.J.0.2:.7,X| 00000840: 3A 82 4A 2C 49 00 62 10 08 9D 81 49 B2 31 A4 32 |:.J,I.b....I.1.2| 00000850: 30 3A 81 4A B2 30 A4 37 3A 84 37 2C 58 3A 82 4A |0:.J.0.7:.7,X:.J| 00000860: 2C 49 00 7D 10 1C 9D 84 37 2C 48 50 3A 84 37 2C |,I.}....7,HP:.7,| 00000870: 4C 3A 84 37 2C 53 43 3A 84 37 2C 52 24 00 9B 10 |L:.7,SC:.7,R$...| 00000880: 30 9D 84 37 2C 4E 24 3A 84 37 2C 50 55 3A 84 37 |0..7,N$:.7,PU:.7| 00000890: 2C 50 47 4D 3A 84 37 2C 57 47 54 00 B3 10 3A 9D |,PGM:.7,WGT...:.| 000008A0: 84 37 2C 43 58 3A 20 84 37 2C 43 59 3A 20 84 37 |.7,CX: .7,CY: .7| 000008B0: 2C 44 4C 00 C1 10 3F 9D 97 35 30 31 35 35 2C 44 |,DL...?..50155,D| 000008C0: 4C 00 C8 10 44 9D A0 37 00 DA 10 58 9D 97 20 35 |L...D..7...X.. 5| 000008D0: 30 34 33 30 2C 44 4C 3A 20 8E 00 EE 10 50 C3 8F |0430,DL: ....P..| 000008E0: 20 20 20 20 20 20 20 44 4F 20 4C 4F 47 4F 00 14 | DO LOGO..| 000008F0: 11 64 C3 97 20 36 34 38 2C 31 39 32 3A 20 97 20 |.d.. 648,192: . | 00000900: 35 36 35 37 36 2C 31 34 38 3A 20 97 20 35 33 32 |56576,148: . 532| 00000910: 37 32 2C 33 00 1A 11 37 C7 8E 00 00 00 00 |72,3...7...... |
....D.. 'MAIN' PROGRAM.3.G.. B(512 10).6 . 140.R.H.. B(648).4 . . 3000: . 1 15.J.I..53280,9: . 53281,9...K.."....PPL LEEAASSEE INNSSEERRTT TTHHEE"...L..".CCY YBBEERRWWOORRLLDD DDAATTAA DDISSKK .(B B) AANNDD PPRREESSSS <BB>:"...S.. X$: . X$.."B" . 115.%.X..".":. B(51210)..6 . . "CHR.CYB",8,1.J.... B(24320)..162 . ."SP R.CYB",8,1.D. .. B(767)..7 . . 24320.... .. B(50176)..160 . ."ROBOTS.CYB",8,1...H .. BEGIN PROGRAM.E.R.. 50000: . DO MINI-TITLE......".....PRESS .<N>. FOR A NEW GAME"......"..PRESS. ..<O>.. .FO R. .AN. .OLD. .GAME.".A.... X$: . X$.."N " . X$.."O" . 260.D.@.."..WHAT IS YOUR A SSUMED NAME"...T.."FOR THIS MISSION.";N$ ...H..".":. C(N$).3 . .".AT LEAST 3 LETT ERS, PLEASE.": . 320...|.N0$.H(N$,3): . N0$."000".."INVALID CODE NAME. CHOOSE AN OTHER.":.320...... X$."O" . 2000.G.... 1 5,8,15,"C0:CYB".N0$.".DAT=0:CYB000.DAT". Y.... ST.1 . 9000......15,"C0:SPC".N0$." .DAT=0:SPC000.DAT"...L.. ST.1 . 9000.... . 15.C...."..DIFFICULTY FACTOR (1-10)." ;DL......".":. DL.1 . DL.10 . ."CHOOSE A FACTOR BETWEEN 1 AND 10.":.500...... 50 155,DL.B.0.."....PREPARE TO BEGIN YOUR M ISSION...".M.D.. 2200.N.P.. BRANCH T O NEXT PROGRAM.Z.... 40000...... 53280,1 1: . 53281,11.....A$."DRK": . PGM.1 . PG M.2 . A$."SPC".U.... PGM.4 . A$."OZX"... ..."..LOAD"G(34);A$;G(34)",8".-.T..".... ..INSERT THE .CYBERWORLD. PROGRAM DISK . (A).".E...."AND PRESS .<A>.:".`.... X$: . X$.."A" . 2300......"......PLEASE WAIT WHILE THE NEXT PROGRAM LOADS."...$.. 63 1,19: . 632,13: . 633,147...8.. 634,82: . 635,213: . 636,13...L.. 198,6: ..1.... ".....PLEASE INSERT THE CYBERWORLD DATA DISK (B) AND PRESS <B>:".7.L...X.(#. ERROR HANDLING ROUTINE.L.<#.15,A$,B$,C $,D$...P#. 53280,11: . 53281,1...D#.".DI SKETTE DATA TRANSFER ERROR:".C.X#.A$","B $","C$","D$.L..# 15....#."...PRESS ANY KEY TO CLEAR."... #. X$: . C(X$).1 . 912 0.*..#.648,4: .56576,23: .53272,23.I.H#. "..": .53280,11: .53281,0.O..#....@..7,8 ,7,"CYB".N0$.".DAT,S,R": . ST.1 ..15,8,1 5: 7:.9000...T.. I.1 . 16: .7,X$: ..F... . ST.1 . . 15,8,15: 7: . 9000......I.1. 26:.7,X$:.I......I.1.20:.7,X$:.7,X$:.I.. .L..I.1.7:.7,X$:. I.(....I.1.20:.J.0.2:. 7,X:.J,I.E....I.1.26:.J.0.2:.7,X:.J,I.B. ...I.1.20:.J.0.7:.7,X:.J,I.}....7,HP:.7, L:.7,SC:.7,R$...0..7,N$:.7,PU:.7,PGM:.7, WGT...:..7,CX: .7,CY: .7,DL.A.?..50155,D L.H.D. 7.Z.X.. 50430,DL: ....PC. D O LOGO...DC. 648,192: . 56576,148: . 532 72,3...7G.....
> CLICK IMAGE PREVIEW FOR FULL MODAL