Multiple names: ARTILLERY TRAP , ARTILLERY TRAP, ARTELLERI SPIL
FILE INFORMATION
FILENAME(S):
• ARTILLERY TRAP  <br>• ARTILLERY TRAP<br>• ARTELLERI SPIL
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-02 22:11:33
APPEARS ON: 4 disk(s)
FILE HASH
6c902c399cc6e205bf5a24b5bc9f862c809595796dd7b1f0f38723f320b1a62f
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLIC DOMAIN | ARTILLERY TRAP | PRG | Treasure Chest - ToGuMi | 5 | 2 | DOWNLOAD FILE |
| FREESOFT DISK NR | ARTILLERY TRAP | PRG | Treasure Chest - Wolfgang Rauprich | 8 | 1 | DOWNLOAD FILE |
| S PIELE | ARTILLERY TRAP | PRG | Treasure Chest - Wolfgang Rauprich | 8 | 1 | DOWNLOAD FILE |
| LA MIX 1 | ARTELLERI SPIL | PRG | Curtcool, Brian | 32 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 0A 00 8F 20 20 41 52 54 49 4C 4C 45 |....... ARTILLE| 00000010: 52 59 20 50 52 41 43 54 49 43 45 00 3B 08 14 00 |RY PRACTICE.;...| 00000020: 8F 20 20 46 52 4F 4D 20 4B 49 4C 4F 42 41 55 44 |. FROM KILOBAUD| 00000030: 20 23 36 2C 20 50 33 34 2D 33 36 00 44 08 5A 00 | #6, P34-36.D.Z.| 00000040: 99 22 93 22 00 6A 08 64 00 99 20 22 54 48 49 53 |.".".j.d.. "THIS| 00000050: 20 49 53 20 41 20 54 41 52 47 45 54 20 50 52 41 | IS A TARGET PRA| 00000060: 43 54 49 43 45 20 47 41 4D 45 00 86 08 6E 00 85 |CTICE GAME...n..| 00000070: 22 57 41 4E 54 20 49 4E 53 54 52 55 43 54 49 4F |"WANT INSTRUCTIO| 00000080: 4E 53 22 3B 51 24 00 9E 08 78 00 8B 20 C8 28 51 |NS";Q$...x.. .(Q| 00000090: 24 2C 31 29 B2 22 59 22 20 A7 20 31 34 30 00 A7 |$,1)."Y" . 140..| 000000A0: 08 82 00 99 22 93 22 00 B1 08 87 00 89 20 34 39 |...."."...... 49| 000000B0: 30 00 CB 08 8C 00 8F 20 49 4E 53 54 52 55 43 54 |0...... INSTRUCT| 000000C0: 49 4F 4E 53 20 50 41 47 45 20 31 00 D4 08 91 00 |IONS PAGE 1.....| 000000D0: 99 22 93 22 00 F8 08 96 00 99 22 54 48 45 20 45 |."."......"THE E| 000000E0: 4C 45 56 41 54 49 4F 4E 20 4C 4F 4F 4B 53 20 4C |LEVATION LOOKS L| 000000F0: 49 4B 45 20 54 48 49 53 00 FE 08 A0 00 99 00 16 |IKE THIS........| 00000100: 09 AA 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." | 00000110: 2A 20 20 20 20 2A 00 30 09 B4 00 99 22 20 20 20 |* *.0...." | 00000120: 20 20 20 20 20 20 2A 20 20 20 20 20 20 20 20 2A | * *| 00000130: 00 4C 09 BE 00 99 22 20 20 20 20 20 20 20 2A 20 |.L...." * | 00000140: 20 20 20 20 20 20 20 20 20 20 20 2A 00 6A 09 C8 | *.j..| 00000150: 00 99 22 59 4F 55 20 2F 20 20 20 20 20 20 20 20 |.."YOU / | 00000160: 20 20 20 20 20 20 20 20 20 2B 00 8C 09 D2 00 99 | +......| 00000170: 22 20 20 20 20 20 20 45 4C 45 56 41 54 49 4F 4E |" ELEVATION| 00000180: 20 20 20 20 20 20 54 41 52 47 45 54 00 92 09 DC | TARGET....| 00000190: 00 99 00 B7 09 E6 00 99 22 41 4E 20 45 4C 45 56 |........"AN ELEV| 000001A0: 41 54 49 4F 4E 20 46 52 4F 4D 20 30 20 54 4F 20 |ATION FROM 0 TO | 000001B0: 34 35 20 57 49 4C 4C 00 D8 09 F0 00 99 22 49 4E |45 WILL......"IN| 000001C0: 43 52 45 41 53 45 20 54 48 45 20 44 49 53 54 41 |CREASE THE DISTA| 000001D0: 4E 43 45 2C 20 42 55 54 00 FE 09 FA 00 99 22 42 |NCE, BUT......"B| 000001E0: 45 59 4F 4E 44 20 34 35 20 54 48 45 20 44 49 53 |EYOND 45 THE DIS| 000001F0: 54 41 4E 43 45 20 57 49 4C 4C 20 47 45 54 00 23 |TANCE WILL GET.#| 00000200: 0A 04 01 99 22 53 48 4F 52 54 45 52 20 55 50 20 |...."SHORTER UP | 00000210: 54 4F 20 39 30 2C 20 57 48 45 4E 20 49 54 20 57 |TO 90, WHEN IT W| 00000220: 49 4C 4C 00 49 0A 0E 01 99 22 47 4F 20 53 54 52 |ILL.I...."GO STR| 00000230: 41 49 47 48 54 20 55 50 20 41 4E 44 20 20 42 41 |AIGHT UP AND BA| 00000240: 43 4B 20 4F 4E 20 59 4F 55 00 54 0A 18 01 8D 20 |CK ON YOU.T.... | 00000250: 32 31 30 30 00 6E 0A 1C 01 8F 20 49 4E 53 54 52 |2100.n.... INSTR| 00000260: 55 43 54 49 4F 4E 53 20 50 41 47 45 20 32 00 77 |UCTIONS PAGE 2.w| 00000270: 0A 1D 01 99 22 93 22 00 97 0A 22 01 99 22 41 52 |...."."...".."AR| 00000280: 54 49 4C 4C 45 52 59 20 52 41 4E 47 45 20 44 49 |TILLERY RANGE DI| 00000290: 52 45 43 54 49 4F 4E 00 9D 0A 2C 01 99 00 B3 0A |RECTION...,.....| 000002A0: 36 01 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |6.." | 000002B0: 20 39 30 00 C8 0A 40 01 99 22 20 20 20 20 20 20 | 90...@.." | 000002C0: 20 20 20 20 20 20 20 3A 00 DE 0A 4A 01 99 22 20 | :...J.." | 000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 59 00 F3 | :Y..| 000002E0: 0A 54 01 99 22 20 20 20 20 20 20 20 20 20 20 20 |.T.." | 000002F0: 20 20 3A 00 15 0B 5E 01 99 22 31 38 30 2D 58 20 | :...^.."180-X | 00000300: 20 20 20 20 20 20 20 3A 20 20 20 20 20 20 20 20 | : | 00000310: 20 58 20 20 30 00 37 0B 68 01 99 22 2D 2D 2D 2D | X 0.7.h.."----| 00000320: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000330: 2D 2D 2D 2D 2D 2D 2D 00 3E 0B 72 01 99 22 00 63 |-------.>.r..".c| 00000340: 0B 7C 01 99 22 44 49 52 45 43 54 49 4F 4E 20 43 |.|.."DIRECTION C| 00000350: 41 4E 20 42 45 20 46 52 4F 4D 20 30 20 54 4F 20 |AN BE FROM 0 TO | 00000360: 31 38 30 00 86 0B 86 01 99 22 57 49 54 48 20 30 |180......"WITH 0| 00000370: 20 41 54 20 52 49 47 48 54 2C 20 31 38 30 20 54 | AT RIGHT, 180 T| 00000380: 4F 20 4C 45 46 54 00 A2 0B 90 01 99 22 41 4E 44 |O LEFT......"AND| 00000390: 20 39 30 20 53 54 52 41 49 47 48 54 20 41 48 45 | 90 STRAIGHT AHE| 000003A0: 41 44 00 C8 0B 95 01 99 22 4E 4F 54 45 2E 20 58 |AD......"NOTE. X| 000003B0: 20 49 53 20 4D 49 4E 55 53 20 46 52 4F 4D 20 39 | IS MINUS FROM 9| 000003C0: 30 20 54 4F 20 31 38 30 00 D2 0B 9A 01 8D 32 31 |0 TO 180......21| 000003D0: 30 30 00 EC 0B A3 01 8F 20 49 4E 53 54 52 55 43 |00...... INSTRUC| 000003E0: 54 49 4F 4E 53 20 50 41 47 45 20 33 00 F5 0B A4 |TIONS PAGE 3....| 000003F0: 01 99 22 93 22 00 17 0C AE 01 99 22 59 4F 55 20 |.."."......"YOU | 00000400: 41 52 45 20 54 4F 20 46 49 52 45 20 41 54 20 41 |ARE TO FIRE AT A| 00000410: 20 54 41 52 47 45 54 00 38 0C B3 01 99 22 41 54 | TARGET.8...."AT| 00000420: 20 54 48 45 20 58 20 41 4E 44 20 59 20 43 4F 4F | THE X AND Y COO| 00000430: 52 44 49 4E 41 54 45 53 00 5C 0C B8 01 99 22 4C |RDINATES.\...."L| 00000440: 49 53 54 45 44 2E 20 59 4F 55 20 57 49 4C 4C 20 |ISTED. YOU WILL | 00000450: 42 45 20 47 49 56 45 4E 20 54 48 45 00 7F 0C BD |BE GIVEN THE....| 00000460: 01 99 22 44 49 53 54 41 4E 43 45 20 46 52 4F 4D |.."DISTANCE FROM| 00000470: 20 54 41 52 47 45 54 20 41 4E 44 20 54 48 45 00 | TARGET AND THE.| 00000480: A4 0C C2 01 99 22 43 4F 4F 52 44 49 4E 41 54 45 |....."COORDINATE| 00000490: 53 20 4F 46 20 45 41 43 48 20 4F 46 20 33 20 53 |S OF EACH OF 3 S| 000004A0: 48 4F 54 53 00 C7 0C C7 01 99 22 46 49 52 45 44 |HOTS......"FIRED| 000004B0: 2E 20 41 20 46 49 4E 41 4C 20 53 43 4F 52 45 20 |. A FINAL SCORE | 000004C0: 57 49 4C 4C 20 42 45 00 EB 0C CC 01 99 22 4C 49 |WILL BE......"LI| 000004D0: 53 54 45 44 20 41 46 54 45 52 20 45 56 45 52 59 |STED AFTER EVERY| 000004E0: 4F 4E 45 20 49 53 20 44 4F 4E 45 00 F1 0C D1 01 |ONE IS DONE.....| 000004F0: 99 00 16 0D D6 01 99 22 4C 49 53 54 20 59 4F 55 |......."LIST YOU| 00000500: 52 20 4E 41 4D 45 53 20 49 4E 20 4F 52 44 45 52 |R NAMES IN ORDER| 00000510: 2C 20 57 48 45 4E 00 2D 0D DB 01 99 22 41 53 4B |, WHEN.-...."ASK| 00000520: 45 44 2E 20 47 4F 4F 44 20 4C 55 43 4B 00 47 0D |ED. GOOD LUCK.G.| 00000530: E9 01 8F 20 47 45 54 20 4C 49 53 54 20 4F 46 20 |... GET LIST OF | 00000540: 50 4C 41 59 45 52 53 00 61 0D EA 01 85 22 48 4F |PLAYERS.a...."HO| 00000550: 57 20 4D 41 4E 59 20 50 4C 41 59 45 52 53 22 3B |W MANY PLAYERS";| 00000560: 50 00 6E 0D F4 01 44 49 47 49 54 53 B2 30 00 76 |P.n...DIGITS.0.v| 00000570: 0D F9 01 99 22 22 00 84 0D FE 01 81 20 49 B2 31 |....""...... I.1| 00000580: 20 A4 20 50 00 9C 0D 08 02 99 22 50 4C 41 59 45 | . P......"PLAYE| 00000590: 52 22 3B 49 3B 22 4E 41 4D 45 22 3B 00 A8 0D 12 |R";I;"NAME";....| 000005A0: 02 85 20 50 24 28 49 29 00 B0 0D 1C 02 82 20 49 |.. P$(I)...... I| 000005B0: 00 C8 0D 93 02 8F 20 4D 45 41 53 55 52 45 20 54 |...... MEASURE T| 000005C0: 4F 2E 31 20 46 4F 4F 54 00 D5 0D 94 02 44 49 47 |O.1 FOOT.....DIG| 000005D0: 49 54 53 B2 31 00 E3 0D 9E 02 81 20 49 B2 31 20 |ITS.1...... I.1 | 000005E0: A4 20 50 00 FA 0D A7 02 8F 20 43 41 4C 43 55 4C |. P...... CALCUL| 000005F0: 41 54 45 20 54 41 52 47 45 54 00 16 0E A8 02 58 |ATE TARGET.....X| 00000600: B2 B5 28 32 36 30 30 30 AC BB 28 31 29 AA 35 30 |..(26000..(1).50| 00000610: 30 30 29 AD 31 30 00 31 0E B2 02 59 B2 B5 28 32 |00).10.1...Y..(2| 00000620: 36 30 30 30 AC BB 28 31 29 AA 35 30 30 29 AD 31 |6000..(1).500).1| 00000630: 30 00 46 0E BC 02 8B 20 BB 28 31 29 B1 2E 35 20 |0.F.... .(1)..5 | 00000640: A7 20 58 B2 AB 58 00 62 0E C5 02 8F 20 53 54 41 |. X..X.b.... STA| 00000650: 52 54 20 50 4C 41 59 20 2D 20 4E 45 57 20 50 41 |RT PLAY - NEW PA| 00000660: 47 45 00 6B 0E C6 02 99 22 22 3B 00 83 0E CB 02 |GE.k...."";.....| 00000670: 99 50 24 28 49 29 3B 22 2C 20 59 4F 55 52 20 54 |.P$(I);", YOUR T| 00000680: 55 52 4E 00 A1 0E D0 02 99 22 54 41 52 47 45 54 |URN......"TARGET| 00000690: 20 41 54 20 58 2C 59 20 22 3B 58 3B 22 2C 22 3B | AT X,Y ";X;",";| 000006A0: 59 00 AF 0E DA 02 81 20 4A B2 31 20 A4 20 33 00 |Y...... J.1 . 3.| 000006B0: B5 0E DF 02 99 00 C9 0E E4 02 85 22 45 4C 2E 2C |..........."EL.,| 000006C0: 44 49 52 2E 22 3B 42 2C 43 00 E5 0E ED 02 8F 20 |DIR.";B,C...... | 000006D0: 4B 45 45 50 20 53 48 4F 54 4F 4E 20 54 48 45 20 |KEEP SHOTON THE | 000006E0: 52 41 4E 47 45 00 FE 0E EE 02 8B 20 42 B3 39 30 |RANGE...... B.90| 000006F0: 20 A7 20 8B 20 42 B1 30 20 89 20 37 36 30 00 08 | . . B.0 . 760..| 00000700: 0F F3 02 89 32 30 30 30 00 22 0F F8 02 8B 20 43 |....2000.".... C| 00000710: B3 31 38 30 20 A7 20 8B 20 43 B1 30 20 89 20 37 |.180 . . C.0 . 7| 00000720: 37 30 00 2D 0F FD 02 89 20 32 30 32 30 00 40 0F |70.-.... 2020.@.| 00000730: 01 03 8F 20 47 45 54 20 53 50 4F 54 20 48 49 54 |... GET SPOT HIT| 00000740: 00 4C 0F 02 03 41 B2 FF AD 31 38 30 00 68 0F 0C |.L...A...180.h..| 00000750: 03 44 B2 B6 28 39 33 30 30 AC BF 28 42 AC 41 29 |.D..(9300..(B.A)| 00000760: AC BE 28 42 AC 41 29 29 00 81 0F 16 03 58 31 B2 |..(B.A)).....X1.| 00000770: B5 28 31 30 AC 44 AC BE 28 43 AC 41 29 29 AD 31 |.(10.D..(C.A)).1| 00000780: 30 00 9A 0F 20 03 59 31 B2 B5 28 31 30 AC 44 AC |0... .Y1..(10.D.| 00000790: BF 28 43 AC 41 29 29 AD 31 30 00 C9 0F 2A 03 44 |.(C.A)).10...*.D| 000007A0: 31 B2 B5 28 31 30 AC BA 28 28 58 AB 58 31 29 AC |1..(10..((X.X1).| 000007B0: 28 58 AB 58 31 29 AA 28 59 AB 59 31 29 AC 28 59 |(X.X1).(Y.Y1).(Y| 000007C0: AB 59 31 29 29 29 AD 31 30 00 DE 0F 33 03 8F 20 |.Y1))).10...3.. | 000007D0: 4B 45 45 50 20 42 45 53 54 20 53 48 4F 54 00 F2 |KEEP BEST SHOT..| 000007E0: 0F 34 03 8B 20 4A B2 31 20 A7 20 44 28 49 29 B2 |.4.. J.1 . D(I).| 000007F0: 44 31 00 0A 10 3E 03 8B 20 44 28 49 29 B1 44 31 |D1...>.. D(I).D1| 00000800: 20 A7 20 44 28 49 29 B2 44 31 00 27 10 48 03 99 | . D(I).D1.'.H..| 00000810: 44 31 3B 22 46 54 20 41 57 41 59 20 22 3B 58 31 |D1;"FT AWAY ";X1| 00000820: 3B 22 2C 22 3B 59 31 00 2F 10 52 03 82 20 4A 00 |;",";Y1./.R.. J.| 00000830: 3A 10 5C 03 8D 20 32 31 30 30 00 42 10 66 03 82 |:.\.. 2100.B.f..| 00000840: 20 49 00 61 10 79 03 8F 20 4E 45 57 20 50 41 47 | I.a.y.. NEW PAG| 00000850: 45 20 2D 20 46 49 4E 41 4C 20 52 45 53 55 4C 54 |E - FINAL RESULT| 00000860: 53 00 6A 10 7A 03 99 22 22 3B 00 83 10 84 03 99 |S.j.z.."";......| 00000870: 22 50 4C 41 59 45 52 22 2C 22 42 45 53 54 20 53 |"PLAYER","BEST S| 00000880: 48 4F 54 00 89 10 89 03 99 00 97 10 8E 03 81 20 |HOT............ | 00000890: 49 B2 31 20 A4 20 50 00 AD 10 98 03 99 50 24 28 |I.1 . P......P$(| 000008A0: 49 29 2C 44 28 49 29 3B 22 46 45 45 54 00 C0 10 |I),D(I);"FEET...| 000008B0: A2 03 8B 20 49 B2 31 20 A7 20 57 B2 44 28 49 29 |... I.1 . W.D(I)| 000008C0: 00 D6 10 AC 03 8B 20 57 B1 44 28 49 29 20 A7 20 |...... W.D(I) . | 000008D0: 57 B2 44 28 49 29 00 DE 10 B6 03 82 20 49 00 E4 |W.D(I)...... I..| 000008E0: 10 BB 03 99 00 F2 10 C0 03 81 20 49 B2 31 20 A4 |.......... I.1 .| 000008F0: 20 50 00 1A 11 CA 03 8B 20 57 B2 44 28 49 29 20 | P...... W.D(I) | 00000900: A7 20 99 22 2A 2A 2A 57 49 4E 4E 45 52 20 49 53 |. ."***WINNER IS| 00000910: 2A 2A 2A 22 3B 50 24 28 49 29 00 22 11 CF 03 82 |***";P$(I)."....| 00000920: 20 49 00 39 11 D4 03 85 22 41 4E 4F 54 48 45 52 | I.9...."ANOTHER| 00000930: 20 47 41 4D 45 22 3B 51 24 00 52 11 DE 03 8B 20 | GAME";Q$.R.... | 00000940: C8 28 51 24 2C 31 29 B2 22 59 22 20 A7 20 31 30 |.(Q$,1)."Y" . 10| 00000950: 31 30 00 5C 11 E8 03 89 31 38 30 30 00 73 11 F2 |10.\....1800.s..| 00000960: 03 85 22 53 41 4D 45 20 50 4C 41 59 45 52 53 22 |.."SAME PLAYERS"| 00000970: 3B 51 24 00 8B 11 FC 03 8B 20 C8 28 51 24 2C 31 |;Q$...... .(Q$,1| 00000980: 29 B2 22 59 22 20 A7 20 36 35 39 00 95 11 06 04 |)."Y" . 659.....| 00000990: 89 20 34 39 30 00 9E 11 10 04 89 36 36 30 00 C0 |. 490......660..| 000009A0: 11 08 07 99 22 48 4F 50 45 20 59 4F 55 20 4C 49 |...."HOPE YOU LI| 000009B0: 4B 45 20 54 48 45 20 41 52 54 49 4C 4C 45 52 59 |KE THE ARTILLERY| 000009C0: 00 D8 11 12 07 99 22 52 41 4E 47 45 2E 20 43 4F |......"RANGE. CO| 000009D0: 4D 45 20 41 47 41 49 4E 00 DE 11 6C 07 80 00 F4 |ME AGAIN...l....| 000009E0: 11 D0 07 99 22 57 52 4F 4E 47 20 45 4C 45 56 41 |...."WRONG ELEVA| 000009F0: 54 49 4F 4E 00 FE 11 DA 07 89 20 37 34 30 00 14 |TION...... 740..| 00000A00: 12 E4 07 99 22 57 52 4F 4E 47 20 44 49 52 45 43 |...."WRONG DIREC| 00000A10: 54 49 4F 4E 00 1E 12 EE 07 89 20 37 34 30 00 24 |TION...... 740.$| 00000A20: 12 34 08 99 00 40 12 3E 08 85 22 52 45 41 44 59 |.4...@.>.."READY| 00000A30: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3B 51 24 | TO CONTINUE";Q$| 00000A40: 00 56 12 48 08 8B 20 C8 28 51 24 2C 31 29 B2 22 |.V.H.. .(Q$,1)."| 00000A50: 59 22 20 A7 20 8E 00 60 12 52 08 89 32 31 30 30 |Y" . ..`.R..2100| 00000A60: 00 66 12 D4 08 80 00 00 00 24 |.f.......$ |
....... ARTILLERY PRACTICE.;.... FROM
KILOBAUD #6, P34-36.D.Z..".".J.D.. "THIS
IS A TARGET PRACTICE GAME...N.."WANT IN
STRUCTIONS";Q$...X.. H(Q$,1)."Y" . 140..
...."."...... 490.K.... INSTRUCTIONS PAG
E 1.T...."."......"THE ELEVATION LOOKS L
IKE THIS... ........" * *.0
...." * *.L...." *
*.J.H.."YOU /
+...R.." ELEVATION TARGET....
........"AN ELEVATION FROM 0 TO 45 WILL.
X...."INCREASE THE DISTANCE, BUT......"B
EYOND 45 THE DISTANCE WILL GET.#...."SHO
RTER UP TO 90, WHEN IT WILL.I...."GO STR
AIGHT UP AND BACK ON YOU.T.... 2100.N..
.. INSTRUCTIONS PAGE 2.W...."."...".."AR
TILLERY RANGE DIRECTION...,.....6.."
90.H.@.." :...J.."
:Y...T.." :...^.
."180-X : X 0.7.H.."----
-----------------------.>.R..".C.|.."DIR
ECTION CAN BE FROM 0 TO 180......"WITH 0
AT RIGHT, 180 TO LEFT......"AND 90 STRA
IGHT AHEAD.H...."NOTE. X IS MINUS FROM 9
0 TO 180.R....2100...... INSTRUCTIONS PA
GE 3......"."......"YOU ARE TO FIRE AT A
TARGET.8...."AT THE X AND Y COORDINATES
.\...."LISTED. YOU WILL BE GIVEN THE...
.."DISTANCE FROM TARGET AND THE...B.."CO
ORDINATES OF EACH OF 3 SHOTS.G.G.."FIRED
. A FINAL SCORE WILL BE...L.."LISTED AFT
ER EVERYONE IS DONE...Q.....V.."LIST YOU
R NAMES IN ORDER, WHEN.-...."ASKED. GOOD
LUCK.G.... GET LIST OF PLAYERS.A...."HO
W MANY PLAYERS";P.N...DIGITS.0.V....""..
.... I.1 . P......"PLAYER";I;"NAME";....
.. P$(I)...... I.H.... MEASURE TO.1 FOOT
.U...DIGITS.1...... I.1 . P...... CALCUL
ATE TARGET.....X..(26000..(1).5000).10.1
...Y..(26000..(1).500).10.F.... .(1)..5
. X..X.B.E.. START PLAY - NEW PAGE.K.F..
"";...K..P$(I);", YOUR TURN...P.."TARGET
AT X,Y ";X;",";Y...Z.. J.1 . 3.......I.
..."EL.,DIR.";B,C...... KEEP SHOTON THE
RANGE...... B.90 . . B.0 . 760......2000
.".... C.180 . . C.0 . 770.-.... 2020.@.
... GET SPOT HIT.L...A...180.H...D..(930
0..(B.A)..(B.A)).....X1..(10.D..(C.A)).1
0... .Y1..(10.D..(C.A)).10.I.*.D1..(10..
((X.X1).(X.X1).(Y.Y1).(Y.Y1))).10...3..
KEEP BEST SHOT...4.. J.1 . D(I).D1...>..
D(I).D1 . D(I).D1.'.H..D1;"FT AWAY ";X1
;",";Y1./.R.. J.:.\.. 2100.B.F.. I.A.Y..
NEW PAGE - FINAL RESULTS.J.Z.."";......
"PLAYER","BEST SHOT............ I.1 . P.
.....P$(I),D(I);"FEET...... I.1 . W.D(I)
.V.... W.D(I) . W.D(I)...... I..........
.. I.1 . P...J.. W.D(I) . ."***WINNER IS
***";P$(I).".O.. I.9.T.."ANOTHER GAME";Q
$.R.... H(Q$,1)."Y" . 1010.\....1800.S..
.."SAME PLAYERS";Q$...... H(Q$,1)."Y" .
659...... 490......660......"HOPE YOU LI
KE THE ARTILLERY.X...."RANGE. COME AGAIN
...L.....P.."WRONG ELEVATION...Z.. 740..
...."WRONG DIRECTION...... 740.$.4...@.>
.."READY TO CONTINUE";Q$.V.H.. H(Q$,1)."
Y" . ..`.R..2100.F.T.....$
> CLICK IMAGE PREVIEW FOR FULL MODAL