ARMY MAKER
FILE INFORMATION
FILENAME(S): ARMY MAKER
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-11-30 19:11:45
APPEARS ON: 1 disk(s)
FILE HASH
4c7621d639f2f9c521d43e6b10a296682949b33d270ed29fe567ba4b78cd5402
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASS PRESENTS | ARMY MAKER | PRG | Commodore 64 Extras | 12 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2D 08 02 00 9C 3A 97 35 36 35 37 38 2C C2 |..-....:.56578,.| 00000010: 28 35 36 35 37 38 29 B0 33 3A 97 35 36 35 37 36 |(56578).3:.56576| 00000020: 2C C2 28 35 36 35 37 36 29 AF 32 35 32 00 59 08 |,.(56576).252.Y.| 00000030: 03 00 97 35 33 32 36 35 2C 32 37 3A 97 35 33 32 |...53265,27:.532| 00000040: 37 30 2C 32 30 30 3A 97 35 33 32 37 32 2C 33 33 |70,200:.53272,33| 00000050: 3A 97 36 34 38 2C 32 30 30 00 76 08 04 00 97 35 |:.648,200.v....5| 00000060: 33 32 38 30 2C 31 32 3A 97 35 33 32 38 31 2C 30 |3280,12:.53281,0| 00000070: 3A 99 22 93 05 22 00 A9 08 0A 00 43 4C B2 39 AC |:."..".....CL.9.| 00000080: 34 30 39 36 AA 31 35 AC 32 35 36 3A 43 55 B2 43 |4096.15.256:CU.C| 00000090: 4C AB 31 31 3A 57 49 B2 32 35 33 3A 4C 53 B2 32 |L.11:WI.253:LS.2| 000000A0: 35 31 3A 52 53 B2 32 35 32 00 CD 08 14 00 97 4C |51:RS.252......L| 000000B0: 53 2C 30 3A 97 52 53 2C 34 30 3A 97 57 49 2C 30 |S,0:.RS,40:.WI,0| 000000C0: 3A 97 57 49 AA 31 2C 32 35 3A 9E 43 4C 00 FF 08 |:.WI.1,25:.CL...| 000000D0: 15 00 49 4E 24 B2 C7 28 31 38 29 3A 4F 46 24 B2 |..IN$..(18):OF$.| 000000E0: C7 28 31 34 36 29 3A 45 4E B2 34 30 31 39 34 3A |.(146):EN.40194:| 000000F0: 4E 55 B2 34 30 31 39 38 3A 46 4C B2 31 36 35 00 |NU.40198:FL.165.| 00000100: 3A 09 16 00 97 35 31 32 30 30 AA 31 30 31 36 2C |:....51200.1016,| 00000110: 34 38 3A 97 35 33 32 37 37 2C 31 3A 97 35 33 32 |48:.53277,1:.532| 00000120: 37 31 2C 31 3A 97 35 33 32 34 38 2C 32 34 38 3A |71,1:.53248,248:| 00000130: 97 35 33 32 34 39 2C 31 36 34 00 47 09 17 00 97 |.53249,164.G....| 00000140: 35 33 32 38 37 2C 31 00 5A 09 19 00 48 B2 31 31 |53287,1.Z...H.11| 00000150: 3A 56 B2 31 30 3A 8D 36 30 30 00 81 09 1A 00 99 |:V.10:.600......| 00000160: 22 43 52 45 41 54 45 20 4E 45 57 20 41 52 4D 59 |"CREATE NEW ARMY| 00000170: 22 3B 3A 48 B2 31 31 3A 56 B2 31 32 3A 8D 36 30 |";:H.11:V.12:.60| 00000180: 30 00 AD 09 1B 00 99 49 4E 24 3B 22 20 53 45 54 |0......IN$;" SET| 00000190: 55 50 20 50 52 4F 47 52 41 4D 20 22 3B 4F 46 24 |UP PROGRAM ";OF$| 000001A0: 3B 3A 81 49 B2 31 A4 32 30 30 30 3A 82 00 C1 09 |;:.I.1.2000:....| 000001B0: 1E 00 41 24 B2 22 41 22 AA 22 22 3A 89 32 35 30 |..A$."A"."":.250| 000001C0: 30 00 D6 09 F4 01 97 57 49 2C 30 3A 97 57 49 AA |0......WI,0:.WI.| 000001D0: 31 2C 32 35 3A 8E 00 E8 09 26 02 81 44 B2 31 A4 |1,25:....&..D.1.| 000001E0: 31 32 30 30 3A 82 3A 8E 00 00 0A 58 02 97 37 38 |1200:.:....X..78| 000001F0: 32 2C 48 3A 97 37 38 31 2C 56 3A 9E 43 55 3A 8E |2,H:.781,V:.CU:.| 00000200: 00 08 0A C4 09 9E 43 4C 00 2F 0A C9 09 99 22 20 |......CL./...." | 00000210: 20 20 20 20 20 50 41 52 54 48 49 41 4E 20 4B 49 | PARTHIAN KI| 00000220: 4E 47 53 20 41 52 4D 59 20 53 45 54 55 50 22 00 |NGS ARMY SETUP".| 00000230: 63 0A CE 09 99 49 4E 24 3B 22 20 23 20 20 4E 41 |c....IN$;" # NA| 00000240: 4D 45 20 20 20 20 20 20 20 20 48 50 20 20 53 54 |ME HP ST| 00000250: 20 52 47 20 41 52 20 4D 56 20 20 20 20 43 4F 53 | RG AR MV COS| 00000260: 54 20 22 00 A1 0A D8 09 48 B2 30 3A 56 B2 31 30 |T ".....H.0:V.10| 00000270: 3A 8D 36 30 30 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D |:.600:."--------| 00000280: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000002A0: 22 00 B9 0A E2 09 81 4A B2 31 A4 35 3A 8D 35 30 |"......J.1.5:.50| 000002B0: 30 3A 8D 33 30 30 30 3A 82 00 C8 0A F6 09 97 57 |0:.3000:.......W| 000002C0: 49 2C 31 31 3A 9E 43 4C 00 F0 0A F7 09 97 57 49 |I,11:.CL......WI| 000002D0: 2C 32 33 3A 9E 43 4C 3A 99 22 41 52 4D 59 20 4F |,23:.CL:."ARMY O| 000002E0: 4B 20 28 59 2F 4E 29 22 3B 3A 97 31 39 38 2C 30 |K (Y/N)";:.198,0| 000002F0: 00 04 0B F8 09 A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".| 00000300: 32 35 35 32 00 15 0B F9 09 8B 41 24 B2 22 59 22 |2552......A$."Y"| 00000310: A7 32 36 30 30 00 3C 0B 00 0A 9E 43 4C 3A 99 22 |.2600.<....CL:."| 00000320: 43 48 41 4E 47 45 20 57 48 49 43 48 20 55 4E 49 |CHANGE WHICH UNI| 00000330: 54 20 23 22 3B 3A 97 31 39 38 2C 30 00 50 0B 01 |T #";:.198,0.P..| 00000340: 0A A1 41 24 3A 8B 41 24 B2 22 22 A7 32 35 36 31 |..A$:.A$."".2561| 00000350: 00 6A 0B 02 0A 4A B2 C5 28 41 24 29 3A 8B 4A B3 |.j...J..(A$):.J.| 00000360: 31 B0 4A B1 35 A7 32 35 35 30 00 79 0B 0A 0A 8D |1.J.5.2550.y....| 00000370: 35 30 30 3A 8D 33 30 30 30 00 83 0B 14 0A 89 32 |500:.3000......2| 00000380: 35 35 30 00 B1 0B 28 0A 97 57 49 2C 32 30 3A 9E |550...(..WI,20:.| 00000390: 43 4C 3A 99 22 45 4E 54 45 52 20 41 52 4D 59 20 |CL:."ENTER ARMY | 000003A0: 46 49 4C 45 4E 41 4D 45 20 22 3B 3A 9E 45 4E 2C |FILENAME ";:.EN,| 000003B0: 39 00 C7 0B 2A 0A 9E 43 4C 3A 42 24 B2 41 24 AA |9...*..CL:B$.A$.| 000003C0: 22 2E 41 52 4D 59 22 00 FF 0B 2B 0A 99 A6 39 29 |".ARMY"...+...9)| 000003D0: 22 49 4E 53 45 52 54 20 53 43 45 4E 41 52 49 4F |"INSERT SCENARIO| 000003E0: 20 44 49 53 4B 22 3A 99 3A 99 A6 31 31 29 22 50 | DISK":.:..11)"P| 000003F0: 52 45 53 53 20 3C 46 20 31 3E 20 4B 45 59 22 00 |RESS <F 1> KEY".| 00000400: 21 0C 32 0A A1 41 24 3A 58 B2 C6 28 41 24 AA C7 |!.2..A$:X..(A$..| 00000410: 28 30 29 29 3A 8B 58 B3 B1 31 33 33 A7 32 36 31 |(0)):.X..133.261| 00000420: 30 00 4C 0C 36 0A 9E 43 4C 3A 99 A6 31 30 29 3B |0.L.6..CL:..10);| 00000430: 49 4E 24 3B 22 20 44 4F 20 4E 4F 54 20 49 4E 54 |IN$;" DO NOT INT| 00000440: 45 52 52 55 50 54 20 22 3B 4F 46 24 00 57 0C 3C |ERRUPT ";OF$.W.<| 00000450: 0A 8D 31 30 30 30 30 00 7F 0C 46 0A 4C B2 C3 28 |..10000...F.L..(| 00000460: 42 24 29 3A 46 49 28 31 29 B2 4C 3A 46 49 28 32 |B$):FI(1).L:FI(2| 00000470: 29 B2 31 31 33 3A 46 49 28 33 29 B2 32 30 34 00 |).113:FI(3).204.| 00000480: A9 0C 48 0A 46 49 28 34 29 B2 30 3A 46 49 28 35 |..H.FI(4).0:FI(5| 00000490: 29 B2 32 30 34 3A 46 49 28 36 29 B2 31 31 32 3A |).204:FI(6).112:| 000004A0: 46 49 28 37 29 B2 32 30 34 00 D4 0C 49 0A 4E 41 |FI(7).204...I.NA| 000004B0: B2 35 32 33 33 37 3A 81 49 B2 31 A4 4C 3A 97 4E |.52337:.I.1.L:.N| 000004C0: 41 AA 49 AB 31 2C C6 28 CA 28 42 24 2C 49 2C 31 |A.I.1,.(.(B$,I,1| 000004D0: 29 29 3A 82 00 DF 0C 4B 0A 8D 34 30 30 30 30 00 |)):....K..40000.| 000004E0: 11 0D 5A 0A 8D 35 30 30 3A 9E 43 4C 3A 56 B2 35 |..Z..500:.CL:V.5| 000004F0: 3A 48 B2 31 32 3A 8D 36 30 30 3A 99 22 41 52 4D |:H.12:.600:."ARM| 00000500: 59 20 43 4F 4D 50 4C 45 54 45 22 3B 3A 8D 35 35 |Y COMPLETE";:.55| 00000510: 30 00 23 0D 5C 0A 56 B2 31 31 3A 48 B2 38 3A 8D |0.#.\.V.11:H.8:.| 00000520: 36 30 30 00 5D 0D 5D 0A 99 22 49 4E 53 45 52 54 |600.].].."INSERT| 00000530: 20 22 3B 49 4E 24 3B 22 20 50 52 4F 47 52 41 4D | ";IN$;" PROGRAM| 00000540: 20 22 3B 4F 46 24 3B 22 20 44 49 53 4B 22 3A 97 | ";OF$;" DISK":.| 00000550: 34 30 34 36 34 2C 31 3A 97 46 4C 2C 31 00 7A 0D |40464,1:.FL,1.z.| 00000560: 5E 0A 99 3A 99 A6 31 31 29 22 50 52 45 53 53 20 |^..:..11)"PRESS | 00000570: 3C 46 20 31 3E 20 4B 45 59 22 00 9C 0D 5F 0A A1 |<F 1> KEY"..._..| 00000580: 41 24 3A 58 B2 C6 28 41 24 AA C7 28 30 29 29 3A |A$:X..(A$..(0)):| 00000590: 8B 58 B3 B1 31 33 33 A7 32 36 35 35 00 BB 0D 60 |.X..133.2655...`| 000005A0: 0A 97 35 33 32 37 37 2C 30 3A 97 35 33 32 37 31 |..53277,0:.53271| 000005B0: 2C 30 3A 97 35 33 32 36 39 2C 30 00 D8 0D 61 0A |,0:.53269,0...a.| 000005C0: 9E 43 4C 3A 97 34 30 34 36 34 2C 33 3A 9C 3A 93 |.CL:.40464,3:.:.| 000005D0: 22 42 4F 4F 54 22 2C 38 00 DE 0D 69 0A 80 00 00 |"BOOT",8...i....| 000005E0: 0E B8 0B 97 57 49 2C 31 31 3A 9E 43 4C 3A 99 22 |....WI,11:.CL:."| 000005F0: 55 4E 49 54 20 54 59 50 45 20 23 20 22 3B 4A 3B |UNIT TYPE # ";J;| 00000600: 00 20 0E DC 0B 97 37 38 31 2C 4A 3A 97 37 38 32 |. ....781,J:.782| 00000610: 2C 31 3A 9E 38 32 38 3A 97 35 33 32 36 39 2C 31 |,1:.828:.53269,1| 00000620: 00 3F 0E E0 0B 97 57 49 2C 31 32 3A 9E 43 4C 3A |.?....WI,12:.CL:| 00000630: 99 22 4E 41 4D 45 20 22 3B 3A 9E 45 4E 2C 39 00 |."NAME ";:.EN,9.| 00000640: 60 0E E2 0B 46 24 28 4A 29 B2 41 24 AA 22 22 3A |`...F$(J).A$."":| 00000650: 8B C3 28 46 24 28 4A 29 29 B3 31 A7 33 30 30 30 |..(F$(J)).1.3000| 00000660: 00 80 0E E5 0B 9E 43 4C 3A 99 49 4E 24 3B 22 20 |......CL:.IN$;" | 00000670: 22 3B 46 24 28 4A 29 3B 22 20 22 3B 4F 46 24 3B |";F$(J);" ";OF$;| 00000680: 00 93 0E E7 0B 56 B2 31 34 3A 97 57 49 2C 56 3A |.....V.14:.WI,V:| 00000690: 9E 43 4C 00 BF 0E EA 0B 99 22 48 49 54 20 50 4F |.CL......"HIT PO| 000006A0: 49 4E 54 53 20 28 31 30 2D 39 39 29 2E 2E 2E 22 |INTS (10-99)..."| 000006B0: 3B 3A 9E 4E 55 2C 33 3A 5A B2 C5 28 41 24 29 00 |;:.NU,3:Z..(A$).| 000006C0: D3 0E EB 0B 8B 5A B3 31 30 B0 5A B1 39 39 A7 33 |.....Z.10.Z.99.3| 000006D0: 30 34 37 00 E5 0E EF 0B 46 48 28 4A 29 B2 5A 3A |047.....FH(J).Z:| 000006E0: 56 B2 56 AA 31 00 F3 0E F1 0B 97 57 49 2C 56 3A |V.V.1......WI,V:| 000006F0: 9E 43 4C 00 12 0F F2 0B 4D 58 B2 B5 28 46 48 28 |.CL.....MX..(FH(| 00000700: 4A 29 AD 31 2E 35 29 3A 8B 4D 58 B3 35 A7 4D 58 |J).1.5):.MX.5.MX| 00000710: B2 35 00 2A 0F F3 0B 5A 24 B2 22 22 3A 8B 4D 58 |.5.*...Z$."":.MX| 00000720: B3 31 30 A7 5A 24 B2 22 20 22 00 66 0F F4 0B 99 |.10.Z$." ".f....| 00000730: 22 53 54 52 45 4E 47 54 48 22 5A 24 22 20 20 20 |"STRENGTH"Z$" | 00000740: 20 28 35 2D 22 3B CA 28 C4 28 4D 58 29 2C 32 2C | (5-";.(.(MX),2,| 00000750: 32 AB C3 28 5A 24 29 29 3B 22 29 2E 2E 2E 22 3B |2..(Z$));")...";| 00000760: 3A 9E 4E 55 2C 33 00 81 0F F5 0B 5A B2 C5 28 41 |:.NU,3.....Z..(A| 00000770: 24 29 3A 8B 5A B3 35 B0 5A B1 4D 58 A7 33 30 35 |$):.Z.5.Z.MX.305| 00000780: 37 00 93 0F F9 0B 46 53 28 4A 29 B2 5A 3A 56 B2 |7.....FS(J).Z:V.| 00000790: 56 AA 31 00 A1 0F FB 0B 97 57 49 2C 56 3A 9E 43 |V.1......WI,V:.C| 000007A0: 4C 00 C5 0F FE 0B 99 22 52 41 4E 47 45 20 46 49 |L......"RANGE FI| 000007B0: 52 45 20 20 20 28 30 2D 32 29 2E 2E 2E 22 3B 3A |RE (0-2)...";:| 000007C0: 9E 4E 55 2C 31 00 E7 0F FF 0B 5A B2 C5 28 41 24 |.NU,1.....Z..(A$| 000007D0: 29 3A 8B 28 5A B3 30 B0 5A B1 32 29 B0 41 24 B2 |):.(Z.0.Z.2).A$.| 000007E0: 22 22 A7 33 30 36 37 00 F9 0F 03 0C 46 52 28 4A |"".3067.....FR(J| 000007F0: 29 B2 5A 3A 56 B2 56 AA 31 00 07 10 05 0C 97 57 |).Z:V.V.1......W| 00000800: 49 2C 56 3A 9E 43 4C 00 2B 10 08 0C 99 22 41 52 |I,V:.CL.+...."AR| 00000810: 4D 4F 52 20 20 20 20 20 20 20 20 28 30 2D 33 29 |MOR (0-3)| 00000820: 2E 2E 2E 22 3B 3A 9E 4E 55 2C 31 00 4D 10 09 0C |...";:.NU,1.M...| 00000830: 5A B2 C5 28 41 24 29 3A 8B 28 5A B3 30 B0 5A B1 |Z..(A$):.(Z.0.Z.| 00000840: 33 29 B0 41 24 B2 22 22 A7 33 30 37 37 00 5F 10 |3).A$."".3077._.| 00000850: 0D 0C 46 41 28 4A 29 B2 5A 3A 56 B2 56 AA 31 00 |..FA(J).Z:V.V.1.| 00000860: 6D 10 0F 0C 97 57 49 2C 56 3A 9E 43 4C 00 91 10 |m....WI,V:.CL...| 00000870: 12 0C 99 22 4D 4F 56 45 4D 45 4E 54 20 20 20 20 |..."MOVEMENT | 00000880: 20 28 30 2D 33 29 2E 2E 2E 22 3B 3A 9E 4E 55 2C | (0-3)...";:.NU,| 00000890: 31 00 B3 10 13 0C 5A B2 C5 28 41 24 29 3A 8B 28 |1.....Z..(A$):.(| 000008A0: 5A B3 30 B0 5A B1 33 29 B0 41 24 B2 22 22 A7 33 |Z.0.Z.3).A$."".3| 000008B0: 30 38 37 00 C5 10 17 0C 46 4D 28 4A 29 B2 5A 3A |087.....FM(J).Z:| 000008C0: 56 B2 56 AA 31 00 D3 10 1A 0C 97 57 49 2C 56 3A |V.V.1......WI,V:| 000008D0: 9E 43 4C 00 DE 10 1C 0C 46 28 51 29 B2 30 00 0A |.CL.....F(Q).0..| 000008E0: 11 20 0C 46 56 28 4A 29 B2 46 48 28 4A 29 AA 46 |. .FV(J).FH(J).F| 000008F0: 53 28 4A 29 AC 32 AA B5 28 46 48 28 4A 29 AD 32 |S(J).2..(FH(J).2| 00000900: 30 29 AC 46 48 28 4A 29 AD 34 00 32 11 22 0C 46 |0).FH(J).4.2.".F| 00000910: 56 28 4A 29 B2 46 56 28 4A 29 AA 46 52 28 4A 29 |V(J).FV(J).FR(J)| 00000920: AC 28 28 46 53 28 4A 29 AA 46 48 28 4A 29 29 AD |.((FS(J).FH(J)).| 00000930: 32 29 00 60 11 24 0C 46 56 28 4A 29 B2 46 56 28 |2).`.$.FV(J).FV(| 00000940: 4A 29 AA 46 41 28 4A 29 AC 28 46 53 28 4A 29 AD |J).FA(J).(FS(J).| 00000950: 28 46 48 28 4A 29 AD 46 53 28 4A 29 29 AD 32 29 |(FH(J).FS(J)).2)| 00000960: 00 A2 11 26 0C 46 56 28 4A 29 B2 46 56 28 4A 29 |...&.FV(J).FV(J)| 00000970: AA 46 4D 28 4A 29 AC 28 28 46 48 28 4A 29 AA 46 |.FM(J).((FH(J).F| 00000980: 53 28 4A 29 29 AD 35 AA 46 52 28 4A 29 AC 46 53 |S(J)).5.FR(J).FS| 00000990: 28 4A 29 AD 34 AA 46 41 28 4A 29 AC 46 4D 28 4A |(J).4.FA(J).FM(J| 000009A0: 29 29 00 B9 11 28 0C 46 56 28 4A 29 B2 B5 28 46 |))...(.FV(J)..(F| 000009B0: 56 28 4A 29 29 AC 31 30 30 00 CB 11 2B 0C 81 49 |V(J)).100...+..I| 000009C0: B2 31 A4 31 35 30 30 3A 82 3A 99 00 E7 11 30 0C |.1.1500:.:....0.| 000009D0: 99 22 43 4F 53 54 20 3D 20 22 3B 46 56 28 4A 29 |."COST = ";FV(J)| 000009E0: 3A 97 31 39 38 2C 30 00 FE 11 38 0C 99 46 24 28 |:.198,0...8..F$(| 000009F0: 4A 29 3B 22 20 4F 4B 20 28 59 2F 4E 29 22 00 12 |J);" OK (Y/N)"..| 00000A00: 12 39 0C A1 41 24 3A 8B 41 24 B2 22 22 A7 33 31 |.9..A$:.A$."".31| 00000A10: 32 39 00 23 12 3A 0C 8B 41 24 B2 22 4E 22 A7 33 |29.#.:..A$."N".3| 00000A20: 30 30 30 00 35 12 3B 0C 8B 41 24 B3 B1 22 59 22 |000.5.;..A$.."Y"| 00000A30: A7 33 31 32 39 00 5D 12 3C 0C 56 B2 4A AA 33 3A |.3129.].<.V.J.3:| 00000A40: 8D 31 35 30 30 30 3A 5A 24 B2 22 22 3A 8B 46 53 |.15000:Z$."":.FS| 00000A50: 28 4A 29 B3 31 30 A7 5A 24 B2 22 20 22 00 7D 12 |(J).10.Z$." ".}.| 00000A60: 3D 0C 58 24 B2 22 20 22 3A 8B 46 56 28 4A 29 B3 |=.X$." ":.FV(J).| 00000A70: 31 30 30 30 30 A7 58 24 B2 22 20 20 22 00 AB 12 |10000.X$." "...| 00000A80: 3E 0C 5A 31 24 B2 22 22 3A 5A B2 31 31 AB C3 28 |>.Z1$."":Z.11..(| 00000A90: 46 24 28 4A 29 29 3A 81 49 B2 31 A4 5A 3A 5A 31 |F$(J)):.I.1.Z:Z1| 00000AA0: 24 B2 5A 31 24 AA 22 20 22 3A 82 00 EA 12 3F 0C |$.Z1$." ":....?.| 00000AB0: 99 4A 3B 22 20 22 3B 46 24 28 4A 29 3B 5A 31 24 |.J;" ";F$(J);Z1$| 00000AC0: 3B 46 48 28 4A 29 3B 5A 24 3B 46 53 28 4A 29 3B |;FH(J);Z$;FS(J);| 00000AD0: 46 52 28 4A 29 3B 46 41 28 4A 29 3B 46 4D 28 4A |FR(J);FA(J);FM(J| 00000AE0: 29 3B 58 24 3B 46 56 28 4A 29 00 FE 12 44 0C 8D |);X$;FV(J)...D..| 00000AF0: 35 30 30 3A 97 35 33 32 36 39 2C 30 3A 8E 00 0B |500:.53269,0:...| 00000B00: 13 10 27 41 44 B2 35 32 32 32 33 00 16 13 24 27 |..'AD.52223...$'| 00000B10: 81 49 B2 31 A4 35 00 22 13 2E 27 81 4A B2 31 A4 |.I.1.5."..'.J.1.| 00000B20: 31 30 00 42 13 33 27 8B 4A B1 C3 28 46 24 28 49 |10.B.3'.J..(F$(I| 00000B30: 29 29 A7 97 41 44 AA 4A 2C 31 33 3A 89 31 30 30 |))..AD.J,13:.100| 00000B40: 34 35 00 5C 13 38 27 97 41 44 AA 4A 2C C6 28 CA |45.\.8'.AD.J,.(.| 00000B50: 28 46 24 28 49 29 2C 4A 2C 31 29 29 00 62 13 3D |(F$(I),J,1)).b.=| 00000B60: 27 82 00 73 13 42 27 97 41 44 AA 31 31 2C 46 48 |'..s.B'.AD.11,FH| 00000B70: 28 49 29 00 84 13 4C 27 97 41 44 AA 31 32 2C 46 |(I)...L'.AD.12,F| 00000B80: 53 28 49 29 00 95 13 56 27 97 41 44 AA 31 33 2C |S(I)...V'.AD.13,| 00000B90: 46 51 28 49 29 00 A6 13 60 27 97 41 44 AA 31 34 |FQ(I)...`'.AD.14| 00000BA0: 2C 46 41 28 49 29 00 B7 13 6A 27 97 41 44 AA 31 |,FA(I)...j'.AD.1| 00000BB0: 35 2C 46 52 28 49 29 00 C8 13 74 27 97 41 44 AA |5,FR(I)...t'.AD.| 00000BC0: 31 36 2C 46 4D 28 49 29 00 DE 13 7E 27 58 31 B2 |16,FM(I)...~'X1.| 00000BD0: B5 28 46 56 28 49 29 AD 36 35 35 33 36 29 00 FD |.(FV(I).65536)..| 00000BE0: 13 88 27 58 32 B2 B5 28 28 46 56 28 49 29 AB 58 |..'X2..((FV(I).X| 00000BF0: 31 AC 36 35 35 33 36 29 AD 32 35 36 29 00 1C 14 |1.65536).256)...| 00000C00: 92 27 58 33 B2 46 56 28 49 29 AB 28 58 31 AC 36 |.'X3.FV(I).(X1.6| 00000C10: 35 35 33 36 AA 58 32 AC 32 35 36 29 00 2A 14 A6 |5536.X2.256).*..| 00000C20: 27 97 41 44 AA 31 37 2C 58 31 00 38 14 B0 27 97 |'.AD.17,X1.8..'.| 00000C30: 41 44 AA 31 38 2C 58 32 00 46 14 BA 27 97 41 44 |AD.18,X2.F..'.AD| 00000C40: AA 31 39 2C 58 33 00 53 14 C4 27 41 44 B2 41 44 |.19,X3.S..'AD.AD| 00000C50: AA 32 30 00 59 14 CE 27 82 00 6D 14 D8 27 81 4A |.20.Y..'..m..'.J| 00000C60: B2 31 A4 33 3A 87 58 24 28 4A 29 3A 82 00 87 14 |.1.3:.X$(J):....| 00000C70: DD 27 83 22 43 4D 22 2C 22 57 49 5A 41 52 44 22 |.'."CM","WIZARD"| 00000C80: 2C 22 4B 49 4E 47 22 00 92 14 E2 27 81 4A B2 31 |,"KING"....'.J.1| 00000C90: A4 32 00 AC 14 EC 27 97 41 44 AA 4A 2C C6 28 CA |.2....'.AD.J,.(.| 00000CA0: 28 58 24 28 31 29 2C 4A 2C 31 29 29 00 B2 14 F1 |(X$(1),J,1))....| 00000CB0: 27 82 00 BE 14 F4 27 41 44 B2 41 44 AA 32 00 C9 |'.....'AD.AD.2..| 00000CC0: 14 F6 27 81 4A B2 31 A4 36 00 E3 14 FB 27 97 41 |..'.J.1.6....'.A| 00000CD0: 44 AA 4A 2C C6 28 CA 28 58 24 28 32 29 2C 4A 2C |D.J,.(.(X$(2),J,| 00000CE0: 31 29 29 00 E9 14 00 28 82 00 F5 14 05 28 41 44 |1))....(.....(AD| 00000CF0: B2 41 44 AA 36 00 00 15 0A 28 81 4A B2 31 A4 34 |.AD.6....(.J.1.4| 00000D00: 00 1A 15 0F 28 97 41 44 AA 4A 2C C6 28 CA 28 58 |....(.AD.J,.(.(X| 00000D10: 24 28 33 29 2C 4A 2C 31 29 29 00 20 15 14 28 82 |$(3),J,1)). ..(.| 00000D20: 00 26 15 3C 28 8E 00 3A 15 98 3A 97 57 49 2C 56 |.&.<(..:..:.WI,V| 00000D30: 3A 97 57 49 AA 31 2C 56 AA 31 00 44 15 A2 3A 9E |:.WI.1,V.1.D..:.| 00000D40: 43 4C 3A 8E 00 66 15 40 9C 97 37 38 30 2C 31 35 |CL:..f.@..780,15| 00000D50: 3A 97 37 38 31 2C 38 3A 97 37 38 32 2C 31 35 3A |:.781,8:.782,15:| 00000D60: 9E 36 35 34 36 36 00 8B 15 86 9C 97 37 38 30 2C |.65466......780,| 00000D70: 46 49 28 31 29 3A 97 37 38 31 2C 46 49 28 32 29 |FI(1):.781,FI(2)| 00000D80: 3A 97 37 38 32 2C 46 49 28 33 29 00 B0 15 A4 9C |:.782,FI(3).....| 00000D90: 9E 36 35 34 36 39 3A 46 49 28 31 29 B2 C2 28 32 |.65469:FI(1)..(2| 00000DA0: 35 31 29 3A 46 49 28 32 29 B2 C2 28 32 35 32 29 |51):FI(2)..(252)| 00000DB0: 00 E9 15 B8 9C 97 32 35 31 2C 46 49 28 34 29 3A |......251,FI(4):| 00000DC0: 97 32 35 32 2C 46 49 28 35 29 3A 97 37 38 31 2C |.252,FI(5):.781,| 00000DD0: 46 49 28 36 29 3A 97 37 38 32 2C 46 49 28 37 29 |FI(6):.782,FI(7)| 00000DE0: 3A 97 37 38 30 2C 32 35 31 00 0A 16 F4 9C 9E 36 |:.780,251......6| 00000DF0: 35 34 39 36 3A 97 32 35 31 2C 46 49 28 31 29 3A |5496:.251,FI(1):| 00000E00: 97 32 35 32 2C 46 49 28 32 29 00 10 16 FE 9C 8E |.252,FI(2)......| 00000E10: 00 16 16 08 9D 80 00 00 00 |......... |
..-....:.56578,B(56578).3:.56576,B(56576 ).252.Y....53265,27:.53270,200:.53272,33 :.648,200.V....53280,12:.53281,0:."..".. ...CL.9.4096.15.256:CU.CL.11:WI.253:LS.2 51:RS.252.M....LS,0:.RS,40:.WI,0:.WI.1,2 5:.CL.....IN$.G(18):OF$.G(146):EN.40194: NU.40198:FL.165.:....51200.1016,48:.5327 7,1:.53271,1:.53248,248:.53249,164.G.... 53287,1.Z...H.11:V.10:.600......"CREATE NEW ARMY";:H.11:V.12:.600......IN$;" SET UP PROGRAM ";OF$;:.I.1.2000:..A...A$."A" ."":.2500.V....WI,0:.WI.1,25:....&..D.1. 1200:.:....X..782,H:.781,V:.CU:....D..CL ./.I.." PARTHIAN KINGS ARMY SETUP". C.N..IN$;" # NAME HP ST RG AR M V COST "...X.H.0:V.10:.600:."-------- --------------------------------"......J .1.5:.500:.3000:..H....WI,11:.CL......WI ,23:.CL:."ARMY OK (Y/N)";:.198,0......A$ :.A$."".2552......A$."Y".2600.<....CL:." CHANGE WHICH UNIT #";:.198,0.P....A$:.A$ ."".2561.J...J.E(A$):.J.1.J.5.2550.Y.... 500:.3000......2550...(..WI,20:.CL:."ENT ER ARMY FILENAME ";:.EN,9.G.*..CL:B$.A$. ".ARMY"...+...9)"INSERT SCENARIO DISK":. :..11)"PRESS <F 1> KEY".!.2..A$:X.F(A$.G (0)):.X..133.2610.L.6..CL:..10);IN$;" DO NOT INTERRUPT ";OF$.W.<..10000..F.L.C( B$):FI(1).L:FI(2).113:FI(3).204...H.FI(4 ).0:FI(5).204:FI(6).112:FI(7).204.T.I.NA .52337:.I.1.L:.NA.I.1,F(J(B$,I,1)):....K ..40000...Z..500:.CL:V.5:H.12:.600:."ARM Y COMPLETE";:.550.#.\.V.11:H.8:.600.].]. ."INSERT ";IN$;" PROGRAM ";OF$;" DISK":. 40464,1:.FL,1.Z.^..:..11)"PRESS <F 1> KE Y"..._..A$:X.F(A$.G(0)):.X..133.2655...` ..53277,0:.53271,0:.53269,0.X.A..CL:.404 64,3:.:."BOOT",8...I........WI,11:.CL:." UNIT TYPE # ";J;. ....781,J:.782,1:.828: .53269,1.?....WI,12:.CL:."NAME ";:.EN,9. `...F$(J).A$."":.C(F$(J)).1.3000......CL :.IN$;" ";F$(J);" ";OF$;.....V.14:.WI,V: .CL......"HIT POINTS (10-99)...";:.NU,3: Z.E(A$).S....Z.10.Z.99.3047.....FH(J).Z: V.V.1......WI,V:.CL.....MX..(FH(J).1.5): .MX.5.MX.5.*...Z$."":.MX.10.Z$." ".F.... "STRENGTH"Z$" (5-";J(D(MX),2,2.C(Z$)) ;")...";:.NU,3.....Z.E(A$):.Z.5.Z.MX.305 7.....FS(J).Z:V.V.1......WI,V:.CL.E...." RANGE FIRE (0-2)...";:.NU,1.....Z.E(A$ ):.(Z.0.Z.2).A$."".3067.....FR(J).Z:V.V. 1......WI,V:.CL.+...."ARMOR (0-3) ...";:.NU,1.M...Z.E(A$):.(Z.0.Z.3).A$."" .3077._...FA(J).Z:V.V.1.M....WI,V:.CL... ..."MOVEMENT (0-3)...";:.NU,1.....Z. E(A$):.(Z.0.Z.3).A$."".3087.E...FM(J).Z: V.V.1.S....WI,V:.CL.....F(Q).0... .FV(J) .FH(J).FS(J).2..(FH(J).20).FH(J).4.2.".F V(J).FV(J).FR(J).((FS(J).FH(J)).2).`.$.F V(J).FV(J).FA(J).(FS(J).(FH(J).FS(J)).2) ...&.FV(J).FV(J).FM(J).((FH(J).FS(J)).5. FR(J).FS(J).4.FA(J).FM(J))...(.FV(J)..(F V(J)).100.K.+..I.1.1500:.:....0.."COST = ";FV(J):.198,0...8..F$(J);" OK (Y/N)".. .9..A$:.A$."".3129.#.:..A$."N".3000.5.;. .A$.."Y".3129.].<.V.J.3:.15000:Z$."":.FS (J).10.Z$." ".}.=.X$." ":.FV(J).10000.X$ ." "...>.Z1$."":Z.11.C(F$(J)):.I.1.Z:Z1 $.Z1$." ":....?..J;" ";F$(J);Z1$;FH(J);Z $;FS(J);FR(J);FA(J);FM(J);X$;FV(J)...D.. 500:.53269,0:.....'AD.52223...$'.I.1.5." ..'.J.1.10.B.3'.J.C(F$(I))..AD.J,13:.100 45.\.8'.AD.J,F(J(F$(I),J,1)).B.='..S.B'. AD.11,FH(I)...L'.AD.12,FS(I)...V'.AD.13, FQ(I)...`'.AD.14,FA(I)...J'.AD.15,FR(I). H.T'.AD.16,FM(I)...~'X1..(FV(I).65536).. ..'X2..((FV(I).X1.65536).256)....'X3.FV( I).(X1.65536.X2.256).*..'.AD.17,X1.8..'. AD.18,X2.F..'.AD.19,X3.S.D'AD.AD.20.Y.N' ..M.X'.J.1.3:.X$(J):.....'."CM","WIZARD" ,"KING"....'.J.1.2....'.AD.J,F(J(X$(1),J ,1))....'.....'AD.AD.2.I..'.J.1.6....'.A D.J,F(J(X$(2),J,1))....(.....(AD.AD.6... .(.J.1.4....(.AD.J,F(J(X$(3),J,1)). ..(. .&.<(..:..:.WI,V:.WI.1,V.1.D..:.CL:..F.@ ..780,15:.781,8:.782,15:.65466......780, FI(1):.781,FI(2):.782,FI(3)......65469:F I(1).B(251):FI(2).B(252)......251,FI(4): .252,FI(5):.781,FI(6):.782,FI(7):.780,25 1......65496:.251,FI(1):.252,FI(2)...... .........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL