> 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: 16 09 0E 00 46 49 24 28 33 29 B2 22 57 57 32 47 |....FI$(3)."WW2G|
00000110: 45 52 4D 41 4E 22 00 2F 09 0F 00 46 49 24 28 34 |ERMAN"./...FI$(4|
00000120: 29 B2 22 57 57 32 41 4D 45 52 49 43 41 4E 22 00 |)."WW2AMERICAN".|
00000130: 48 09 10 00 46 49 24 28 35 29 B2 22 57 57 32 4A |H...FI$(5)."WW2J|
00000140: 41 50 41 4E 45 53 45 22 00 5F 09 11 00 46 49 24 |APANESE"._...FI$|
00000150: 28 36 29 B2 22 57 57 31 41 4C 4C 49 45 44 22 00 |(6)."WW1ALLIED".|
00000160: 76 09 12 00 46 49 24 28 37 29 B2 22 57 57 31 47 |v...FI$(7)."WW1G|
00000170: 45 52 4D 41 4E 22 00 8F 09 13 00 46 49 24 28 38 |ERMAN".....FI$(8|
00000180: 29 B2 22 41 43 43 45 53 53 4F 52 49 45 53 22 00 |)."ACCESSORIES".|
00000190: A4 09 14 00 46 49 24 28 39 29 B2 22 43 4F 43 4B |....FI$(9)."COCK|
000001A0: 50 49 54 22 00 AA 09 1D 00 8E 00 C1 09 1E 00 97 |PIT"............|
000001B0: 42 4F 2C 28 C2 28 42 4F 29 AA 31 29 AF 31 35 3A |BO,(.(BO).1).15:|
000001C0: 8E 00 C7 09 50 00 8F 00 ED 09 51 00 8F 20 54 4F |....P.....Q.. TO|
000001D0: 20 44 49 53 50 4C 41 59 20 54 48 45 20 50 49 43 | DISPLAY THE PIC|
000001E0: 54 55 52 45 53 20 53 45 54 20 54 48 45 00 0A 0A |TURES SET THE...|
000001F0: 52 00 8F 20 56 41 52 49 41 42 4C 45 53 20 41 53 |R.. VARIABLES AS|
00000200: 20 46 4F 4C 4C 4F 57 53 3A 2D 00 10 0A 53 00 8F | FOLLOWS:-...S..|
00000210: 00 35 0A 54 00 8F 20 49 44 24 20 54 4F 20 54 48 |.5.T.. ID$ TO TH|
00000220: 45 20 4E 41 4D 45 20 4F 46 20 54 48 45 20 50 49 |E NAME OF THE PI|
00000230: 43 54 55 52 45 00 3B 0A 55 00 8F 00 62 0A 56 00 |CTURE.;.U...b.V.|
00000240: 8F 20 42 43 20 20 54 4F 20 54 48 45 20 42 4F 52 |. BC TO THE BOR|
00000250: 44 45 52 20 43 4F 4C 4F 52 2C 20 49 46 20 54 48 |DER COLOR, IF TH|
00000260: 49 53 00 83 0A 57 00 8F 20 20 20 20 20 49 53 20 |IS...W.. IS |
00000270: 41 42 4F 56 45 20 31 35 20 54 48 45 20 42 4F 52 |ABOVE 15 THE BOR|
00000280: 44 45 52 00 9F 0A 58 00 8F 20 20 20 20 20 43 4F |DER...X.. CO|
00000290: 4C 4F 52 53 20 57 49 4C 4C 20 43 59 43 4C 45 00 |LORS WILL CYCLE.|
000002A0: A5 0A 59 00 8F 00 CB 0A 5A 00 8F 20 44 50 20 20 |..Y.....Z.. DP |
000002B0: 54 4F 20 54 48 45 20 23 20 4F 46 20 53 45 43 53 |TO THE # OF SECS|
000002C0: 20 54 4F 20 44 49 53 50 4C 41 59 00 E2 0A 5B 00 | TO DISPLAY...[.|
000002D0: 8F 20 20 20 20 20 54 48 49 53 20 50 49 43 54 55 |. THIS PICTU|
000002E0: 52 45 00 E8 0A 5C 00 8F 00 0A 0B 5D 00 8F 20 54 |RE...\.....].. T|
000002F0: 48 45 20 53 55 42 52 4F 55 54 49 4E 45 20 41 54 |HE SUBROUTINE AT|
00000300: 20 31 30 30 30 20 57 49 4C 4C 00 28 0B 5E 00 8F | 1000 WILL.(.^..|
00000310: 20 20 20 20 20 44 49 53 50 4C 41 59 20 54 48 45 | DISPLAY THE|
00000320: 20 50 49 43 54 55 52 45 00 2E 0B 63 00 8F 00 4F | PICTURE...c...O|
00000330: 0B 64 00 49 44 24 B2 46 49 24 28 30 29 3A 42 43 |.d.ID$.FI$(0):BC|
00000340: B2 31 36 3A 44 50 B2 32 30 3A 8D 31 30 30 30 00 |.16:DP.20:.1000.|
00000350: 70 0B 6E 00 49 44 24 B2 46 49 24 28 31 29 3A 42 |p.n.ID$.FI$(1):B|
00000360: 43 B2 31 36 3A 44 50 B2 32 30 3A 8D 31 30 30 30 |C.16:DP.20:.1000|
00000370: 00 91 0B 78 00 49 44 24 B2 46 49 24 28 32 29 3A |...x.ID$.FI$(2):|
00000380: 42 43 B2 31 36 3A 44 50 B2 32 30 3A 8D 31 30 30 |BC.16:DP.20:.100|
00000390: 30 00 B2 0B 82 00 49 44 24 B2 46 49 24 28 33 29 |0.....ID$.FI$(3)|
000003A0: 3A 42 43 B2 31 36 3A 44 50 B2 32 30 3A 8D 31 30 |:BC.16:DP.20:.10|
000003B0: 30 30 00 D3 0B 8C 00 49 44 24 B2 46 49 24 28 34 |00.....ID$.FI$(4|
000003C0: 29 3A 42 43 B2 31 36 3A 44 50 B2 32 30 3A 8D 31 |):BC.16:DP.20:.1|
000003D0: 30 30 30 00 F4 0B 96 00 49 44 24 B2 46 49 24 28 |000.....ID$.FI$(|
000003E0: 35 29 3A 42 43 B2 31 36 3A 44 50 B2 32 30 3A 8D |5):BC.16:DP.20:.|
000003F0: 31 30 30 30 00 15 0C A0 00 49 44 24 B2 46 49 24 |1000.....ID$.FI$|
00000400: 28 36 29 3A 42 43 B2 31 36 3A 44 50 B2 32 30 3A |(6):BC.16:DP.20:|
00000410: 8D 31 30 30 30 00 36 0C AA 00 49 44 24 B2 46 49 |.1000.6...ID$.FI|
00000420: 24 28 37 29 3A 42 43 B2 31 36 3A 44 50 B2 32 30 |$(7):BC.16:DP.20|
00000430: 3A 8D 31 30 30 30 00 57 0C B4 00 49 44 24 B2 46 |:.1000.W...ID$.F|
00000440: 49 24 28 38 29 3A 42 43 B2 31 36 3A 44 50 B2 32 |I$(8):BC.16:DP.2|
00000450: 30 3A 8D 31 30 30 30 00 78 0C BE 00 49 44 24 B2 |0:.1000.x...ID$.|
00000460: 46 49 24 28 39 29 3A 42 43 B2 31 36 3A 44 50 B2 |FI$(9):BC.16:DP.|
00000470: 32 30 3A 8D 31 30 30 30 00 81 0C E7 03 89 31 30 |20:.1000......10|
00000480: 30 00 A5 0C E8 03 A0 31 3A 9F 31 2C 38 2C 32 2C |0......1:.1,8,2,|
00000490: 49 44 24 3A A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 |ID$:.#1,A$:.A$..|
000004A0: 22 50 22 A7 8E 00 BA 0C F2 03 9E 4A 54 AA 33 30 |"P"........JT.30|
000004B0: 3A 97 42 4F 2C 42 43 AF 31 35 00 EA 0C FC 03 A1 |:.BO,BC.15......|
000004C0: 23 31 2C 41 24 3A 55 42 B2 C6 28 41 24 AA C7 28 |#1,A$:UB..(A$..(|
000004D0: 30 29 29 3A 97 42 4F AA 31 2C 55 42 3A 9E 4A 54 |0)):.BO.1,UB:.JT|
000004E0: 3A A0 31 3A 55 B2 B8 28 30 29 00 12 0D 06 04 8B |:.1:U..(0)......|
000004F0: 42 43 B3 31 36 A7 81 49 B2 30 A4 44 50 3A 81 4A |BC.16..I.0.DP:.J|
00000500: B2 30 A4 35 30 30 3A 82 4A 3A 82 49 3A 89 31 30 |.0.500:.J:.I:.10|
00000510: 36 30 00 2E 0D 10 04 81 49 B2 30 A4 44 50 3A 81 |60......I.0.DP:.|
00000520: 4A B2 30 A4 32 34 38 3A 82 4A 3A 8D 33 30 00 41 |J.0.248:.J:.30.A|
00000530: 0D 1A 04 81 4A B2 30 A4 32 34 38 3A 82 4A 3A 82 |....J.0.248:.J:.|
00000540: 49 00 54 0D 24 04 A1 41 24 3A 8B 41 24 B3 B1 22 |I.T.$..A$:.A$.."|
00000550: 51 22 A7 8E 00 5E 0D 2E 04 9E 4A 54 AA 36 00 87 |Q"...^....JT.6..|
00000560: 0D 28 23 9E 4A 54 AA 33 30 3A 97 35 33 32 37 32 |.(#.JT.30:.53272|
00000570: 2C 31 32 30 3A 97 35 33 32 36 35 2C C2 28 35 33 |,120:.53265,.(53|
00000580: 32 36 35 29 B0 33 32 00 9E 0D 32 23 97 35 33 32 |265).32...2#.532|
00000590: 37 30 2C C2 28 35 33 32 37 30 29 B0 31 36 00 CC |70,.(53270).16..|
000005A0: 0D 3C 23 97 35 36 35 37 38 2C C2 28 35 36 35 37 |.<#.56578,.(5657|
000005B0: 38 29 B0 33 3A 97 35 36 35 37 36 2C 28 C2 28 35 |8).3:.56576,(.(5|
000005C0: 36 35 37 36 29 AF 32 35 32 29 B0 32 00 D9 0D 46 |6576).252).2...F|
000005D0: 23 8D 31 30 3A 89 31 30 30 00 00 00 |#.10:.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)."WW2GERMAN"./
...FI$(4)."WW2AMERICAN".H...FI$(5)."WW2J
APANESE"._...FI$(6)."WW1ALLIED".V...FI$(
7)."WW1GERMAN".....FI$(8)."ACCESSORIES".
....FI$(9)."COCKPIT".......A....BO,(B(BO
).1).15:..G.P.....Q.. TO DISPLAY THE PIC
TURES SET THE...R.. VARIABLES AS FOLLOWS
:-...S...5.T.. ID$ TO THE NAME OF THE PI
CTURE.;.U...B.V.. BC TO THE BORDER COLO
R, IF THIS...W.. IS ABOVE 15 THE BOR
DER...X.. COLORS WILL CYCLE...Y...K.
Z.. DP TO THE # OF SECS TO DISPLAY...[.
. THIS PICTURE...\.....].. THE SUBRO
UTINE AT 1000 WILL.(.^.. DISPLAY THE
PICTURE...C...O.D.ID$.FI$(0):BC.16:DP.2
0:.1000.P.N.ID$.FI$(1):BC.16:DP.20:.1000
...X.ID$.FI$(2):BC.16:DP.20:.1000.....ID
$.FI$(3):BC.16:DP.20:.1000.S...ID$.FI$(4
):BC.16:DP.20:.1000.....ID$.FI$(5):BC.16
:DP.20:.1000... .ID$.FI$(6):BC.16:DP.20:
.1000.6...ID$.FI$(7):BC.16:DP.20:.1000.W
...ID$.FI$(8):BC.16:DP.20:.1000.X...ID$.
FI$(9):BC.16:DP.20:.1000......100..... 1
:.1,8,2,ID$:.#1,A$:.A$.."P"........JT.30
:.BO,BC.15......#1,A$:UB.F(A$.G(0)):.BO.
1,UB:.JT: 1:U..(0)......BC.16..I.0.DP:.J
.0.500:.J:.I:.1060......I.0.DP:.J.0.248:
.J:.30.A....J.0.248:.J:.I.T.$..A$:.A$.."
Q"...^....JT.6...(#.JT.30:.53272,120:.53
265,B(53265).32...2#.53270,B(53270).16.L
.<#.56578,B(56578).3:.56576,(B(56576).25
2).2.Y.F#.10:.100...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL