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

NEGETR

FILE INFORMATION

FILENAME(S): NEGETR

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-10-20 14:31:07

APPEARS ON: 1 disk(s)

FILE HASH

622c5df5c42273b8c2da015032deddcc8c7ca2ec3db93143161ce7f68befe2c2

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PLAIN PIC SHOW NEGETR PRG Treasure Chest - Klaus Der Suhler 34 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 07 08 00 00 3A 00  58 08 01 00 8F 20 28 43  |......:.X.... (C|
00000010: 29 20 31 39 38 34 20 4B  49 57 49 53 4F 46 54 20  |) 1984 KIWISOFT |
00000020: 50 52 4F 47 52 41 4D 53  20 2A 2A 2A 2A 2A 2A 2A  |PROGRAMS *******|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A  00 6B 08 02 00 8B C2 28  |********.k.....(|
00000060: 35 36 29 B2 37 30 A7 9C  3A 89 34 00 9A 08 03 00  |56).70..:.4.....|
00000070: 97 35 31 2C 2E 3A 97 35  32 2C 37 30 3A 97 35 35  |.51,.:.52,70:.55|
00000080: 2C 2E 3A 97 35 36 2C 37  30 3A 9C 3A 93 22 3F 49  |,.:.56,70:.:."?I|
00000090: 53 50 14 14 14 22 2C 38  2C 31 00 BF 08 04 00 86  |SP...",8,1......|
000000A0: 46 49 24 28 31 39 29 3A  4A 54 B2 33 36 38 37 30  |FI$(19):JT.36870|
000000B0: 3A 42 4F B2 35 33 32 38  30 3A 89 39 30 30 30 00  |:BO.53280:.9000.|
000000C0: D5 08 0A 00 46 49 24 28  30 29 B2 22 41 4D 45 52  |....FI$(0)."AMER|
000000D0: 49 43 41 4E 22 00 E9 08  0B 00 46 49 24 28 31 29  |ICAN".....FI$(1)|
000000E0: B2 22 53 4F 56 49 45 54  22 00 FF 08 0C 00 46 49  |."SOVIET".....FI|
000000F0: 24 28 32 29 B2 22 45 55  52 4F 50 45 41 4E 22 00  |$(2)."EUROPEAN".|
00000100: 17 09 0D 00 46 49 24 28  33 29 B2 22 57 57 32 42  |....FI$(3)."WW2B|
00000110: 52 49 54 49 53 48 22 00  2E 09 0E 00 46 49 24 28  |RITISH".....FI$(|
00000120: 34 29 B2 22 57 57 32 47  45 52 4D 41 4E 22 00 47  |4)."WW2GERMAN".G|
00000130: 09 0F 00 46 49 24 28 35  29 B2 22 57 57 32 41 4D  |...FI$(5)."WW2AM|
00000140: 45 52 49 43 41 4E 22 00  60 09 10 00 46 49 24 28  |ERICAN".`...FI$(|
00000150: 36 29 B2 22 57 57 32 4A  41 50 41 4E 45 53 45 22  |6)."WW2JAPANESE"|
00000160: 00 77 09 11 00 46 49 24  28 37 29 B2 22 57 57 31  |.w...FI$(7)."WW1|
00000170: 41 4C 4C 49 45 44 22 00  8E 09 12 00 46 49 24 28  |ALLIED".....FI$(|
00000180: 38 29 B2 22 57 57 31 47  45 52 4D 41 4E 22 00 A7  |8)."WW1GERMAN"..|
00000190: 09 13 00 46 49 24 28 39  29 B2 22 41 43 43 45 53  |...FI$(9)."ACCES|
000001A0: 53 4F 52 49 45 53 22 00  BD 09 14 00 46 49 24 28  |SORIES".....FI$(|
000001B0: 31 30 29 B2 22 43 4F 43  4B 50 49 54 22 00 C3 09  |10)."COCKPIT"...|
000001C0: 1D 00 8E 00 DA 09 1E 00  97 42 4F 2C 28 C2 28 42  |.........BO,(.(B|
000001D0: 4F 29 AA 31 29 AF 31 35  3A 8E 00 E0 09 50 00 8F  |O).1).15:....P..|
000001E0: 00 06 0A 51 00 8F 20 54  4F 20 44 49 53 50 4C 41  |...Q.. TO DISPLA|
000001F0: 59 20 54 48 45 20 50 49  43 54 55 52 45 53 20 53  |Y THE PICTURES S|
00000200: 45 54 20 54 48 45 00 23  0A 52 00 8F 20 56 41 52  |ET THE.#.R.. VAR|
00000210: 49 41 42 4C 45 53 20 41  53 20 46 4F 4C 4C 4F 57  |IABLES AS FOLLOW|
00000220: 53 3A 2D 00 29 0A 53 00  8F 00 4E 0A 54 00 8F 20  |S:-.).S...N.T.. |
00000230: 49 44 24 20 54 4F 20 54  48 45 20 4E 41 4D 45 20  |ID$ TO THE NAME |
00000240: 4F 46 20 54 48 45 20 50  49 43 54 55 52 45 00 54  |OF THE PICTURE.T|
00000250: 0A 55 00 8F 00 7B 0A 56  00 8F 20 42 43 20 20 54  |.U...{.V.. BC  T|
00000260: 4F 20 54 48 45 20 42 4F  52 44 45 52 20 43 4F 4C  |O THE BORDER COL|
00000270: 4F 52 2C 20 49 46 20 54  48 49 53 00 9C 0A 57 00  |OR, IF THIS...W.|
00000280: 8F 20 20 20 20 20 49 53  20 41 42 4F 56 45 20 31  |.     IS ABOVE 1|
00000290: 35 20 54 48 45 20 42 4F  52 44 45 52 00 B8 0A 58  |5 THE BORDER...X|
000002A0: 00 8F 20 20 20 20 20 43  4F 4C 4F 52 53 20 57 49  |..     COLORS WI|
000002B0: 4C 4C 20 43 59 43 4C 45  00 BE 0A 59 00 8F 00 E4  |LL CYCLE...Y....|
000002C0: 0A 5A 00 8F 20 44 50 20  20 54 4F 20 54 48 45 20  |.Z.. DP  TO THE |
000002D0: 23 20 4F 46 20 53 45 43  53 20 54 4F 20 44 49 53  |# OF SECS TO DIS|
000002E0: 50 4C 41 59 00 FB 0A 5B  00 8F 20 20 20 20 20 54  |PLAY...[..     T|
000002F0: 48 49 53 20 50 49 43 54  55 52 45 00 01 0B 5C 00  |HIS PICTURE...\.|
00000300: 8F 00 23 0B 5D 00 8F 20  54 48 45 20 53 55 42 52  |..#.].. THE SUBR|
00000310: 4F 55 54 49 4E 45 20 41  54 20 31 30 30 30 20 57  |OUTINE AT 1000 W|
00000320: 49 4C 4C 00 41 0B 5E 00  8F 20 20 20 20 20 44 49  |ILL.A.^..     DI|
00000330: 53 50 4C 41 59 20 54 48  45 20 50 49 43 54 55 52  |SPLAY THE PICTUR|
00000340: 45 00 47 0B 63 00 8F 00  68 0B 64 00 49 44 24 B2  |E.G.c...h.d.ID$.|
00000350: 46 49 24 28 30 29 3A 42  43 B2 31 36 3A 44 50 B2  |FI$(0):BC.16:DP.|
00000360: 32 30 3A 8D 31 30 30 30  00 88 0B 6E 00 49 44 24  |20:.1000...n.ID$|
00000370: B2 46 49 24 28 31 29 3A  42 43 B2 31 3A 44 50 B2  |.FI$(1):BC.1:DP.|
00000380: 32 30 3A 8D 31 30 30 30  00 A8 0B 78 00 49 44 24  |20:.1000...x.ID$|
00000390: B2 46 49 24 28 32 29 3A  42 43 B2 32 3A 44 50 B2  |.FI$(2):BC.2:DP.|
000003A0: 32 30 3A 8D 31 30 30 30  00 C8 0B 82 00 49 44 24  |20:.1000.....ID$|
000003B0: B2 46 49 24 28 33 29 3A  42 43 B2 33 3A 44 50 B2  |.FI$(3):BC.3:DP.|
000003C0: 32 30 3A 8D 31 30 30 30  00 E8 0B 8C 00 49 44 24  |20:.1000.....ID$|
000003D0: B2 46 49 24 28 34 29 3A  42 43 B2 34 3A 44 50 B2  |.FI$(4):BC.4:DP.|
000003E0: 32 30 3A 8D 31 30 30 30  00 08 0C 96 00 49 44 24  |20:.1000.....ID$|
000003F0: B2 46 49 24 28 35 29 3A  42 43 B2 35 3A 44 50 B2  |.FI$(5):BC.5:DP.|
00000400: 32 30 3A 8D 31 30 30 30  00 28 0C A0 00 49 44 24  |20:.1000.(...ID$|
00000410: B2 46 49 24 28 36 29 3A  42 43 B2 36 3A 44 50 B2  |.FI$(6):BC.6:DP.|
00000420: 32 30 3A 8D 31 30 30 30  00 48 0C AA 00 49 44 24  |20:.1000.H...ID$|
00000430: B2 46 49 24 28 37 29 3A  42 43 B2 37 3A 44 50 B2  |.FI$(7):BC.7:DP.|
00000440: 32 30 3A 8D 31 30 30 30  00 68 0C B4 00 49 44 24  |20:.1000.h...ID$|
00000450: B2 46 49 24 28 38 29 3A  42 43 B2 38 3A 44 50 B2  |.FI$(8):BC.8:DP.|
00000460: 32 30 3A 8D 31 30 30 30  00 88 0C BE 00 49 44 24  |20:.1000.....ID$|
00000470: B2 46 49 24 28 39 29 3A  42 43 B2 39 3A 44 50 B2  |.FI$(9):BC.9:DP.|
00000480: 32 30 3A 8D 31 30 30 30  00 AA 0C C8 00 49 44 24  |20:.1000.....ID$|
00000490: B2 46 49 24 28 31 30 29  3A 42 43 B2 31 36 3A 44  |.FI$(10):BC.16:D|
000004A0: 50 B2 32 30 3A 8D 31 30  30 30 00 B3 0C E7 03 89  |P.20:.1000......|
000004B0: 31 30 30 00 D7 0C E8 03  A0 31 3A 9F 31 2C 38 2C  |100......1:.1,8,|
000004C0: 32 2C 49 44 24 3A A1 23  31 2C 41 24 3A 8B 41 24  |2,ID$:.#1,A$:.A$|
000004D0: B3 B1 22 50 22 A7 8E 00  FF 0C 06 04 8B 42 43 B3  |.."P"........BC.|
000004E0: 31 36 A7 81 49 B2 30 A4  44 50 3A 81 4A B2 30 A4  |16..I.0.DP:.J.0.|
000004F0: 35 30 30 3A 82 4A 3A 82  49 3A 89 31 30 36 30 00  |500:.J:.I:.1060.|
00000500: 1B 0D 10 04 81 49 B2 30  A4 44 50 3A 81 4A B2 30  |.....I.0.DP:.J.0|
00000510: A4 32 34 38 3A 82 4A 3A  8D 33 30 00 2E 0D 1A 04  |.248:.J:.30.....|
00000520: 81 4A B2 30 A4 32 34 38  3A 82 4A 3A 82 49 00 41  |.J.0.248:.J:.I.A|
00000530: 0D 24 04 A1 41 24 3A 8B  41 24 B3 B1 22 51 22 A7  |.$..A$:.A$.."Q".|
00000540: 8E 00 58 0D 32 23 97 35  33 32 37 30 2C C2 28 35  |..X.2#.53270,.(5|
00000550: 33 32 37 30 29 B0 31 36  00 86 0D 3C 23 97 35 36  |3270).16...<#.56|
00000560: 35 37 38 2C C2 28 35 36  35 37 38 29 B0 33 3A 97  |578,.(56578).3:.|
00000570: 35 36 35 37 36 2C 28 C2  28 35 36 35 37 36 29 AF  |56576,(.(56576).|
00000580: 32 35 32 29 B0 32 00 93  0D 46 23 8D 31 30 3A 89  |252).2...F#.10:.|
00000590: 31 30 30 00 00 00                                 |100...          |
......:.X.... (C) 1984 KIWISOFT PROGRAMS
 ***************************************
********.K....B(56).70..:.4......51,.:.5
2,70:.55,.:.56,70:.:."?ISP...",8,1......
FI$(19):JT.36870:BO.53280:.9000.U...FI$(
0)."AMERICAN".....FI$(1)."SOVIET".....FI
$(2)."EUROPEAN".....FI$(3)."WW2BRITISH".
....FI$(4)."WW2GERMAN".G...FI$(5)."WW2AM
ERICAN".`...FI$(6)."WW2JAPANESE".W...FI$
(7)."WW1ALLIED".....FI$(8)."WW1GERMAN"..
...FI$(9)."ACCESSORIES".....FI$(10)."COC
KPIT".C.....Z....BO,(B(BO).1).15:....P..
...Q.. TO DISPLAY THE PICTURES SET THE.#
.R.. VARIABLES AS FOLLOWS:-.).S...N.T.. 
ID$ TO THE NAME OF THE PICTURE.T.U...{.V
.. BC  TO THE BORDER COLOR, IF THIS...W.
.     IS ABOVE 15 THE BORDER...X..     C
OLORS WILL CYCLE...Y.....Z.. DP  TO THE 
# OF SECS TO DISPLAY...[..     THIS PICT
URE...\...#.].. THE SUBROUTINE AT 1000 W
ILL.A.^..     DISPLAY THE PICTURE.G.C...
H.D.ID$.FI$(0):BC.16:DP.20:.1000...N.ID$
.FI$(1):BC.1:DP.20:.1000...X.ID$.FI$(2):
BC.2:DP.20:.1000.H...ID$.FI$(3):BC.3:DP.
20:.1000.....ID$.FI$(4):BC.4:DP.20:.1000
.....ID$.FI$(5):BC.5:DP.20:.1000.(. .ID$
.FI$(6):BC.6:DP.20:.1000.H...ID$.FI$(7):
BC.7:DP.20:.1000.H...ID$.FI$(8):BC.8:DP.
20:.1000.....ID$.FI$(9):BC.9:DP.20:.1000
...H.ID$.FI$(10):BC.16:DP.20:.1000......
100.W... 1:.1,8,2,ID$:.#1,A$:.A$.."P"...
.....BC.16..I.0.DP:.J.0.500:.J:.I:.1060.
.....I.0.DP:.J.0.248:.J:.30......J.0.248
:.J:.I.A.$..A$:.A$.."Q"...X.2#.53270,B(5
3270).16...<#.56578,B(56578).3:.56576,(B
(56576).252).2...F#.10:.100...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL