> 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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL