> 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 96 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 44 49 |,.:.56,70:.:."DI|
00000090: 52 22 2C 38 2C 31 00 BB 08 04 00 86 46 49 24 28 |R",8,1......FI$(|
000000A0: 31 39 29 3A 4A 54 B2 33 36 38 37 30 3A 42 4F B2 |19):JT.36870:BO.|
000000B0: 35 33 32 38 30 3A 89 39 30 30 30 00 D7 08 0A 00 |53280:.9000.....|
000000C0: 46 49 24 28 30 29 B2 22 56 49 4E 54 41 47 45 20 |FI$(0)."VINTAGE |
000000D0: 53 50 4F 52 54 53 22 00 EC 08 0B 00 46 49 24 28 |SPORTS".....FI$(|
000000E0: 31 29 B2 22 56 49 4E 54 41 47 45 22 00 00 09 0C |1)."VINTAGE"....|
000000F0: 00 46 49 24 28 32 29 B2 22 52 41 43 49 4E 47 22 |.FI$(2)."RACING"|
00000100: 00 1C 09 0D 00 46 49 24 28 33 29 B2 22 52 41 4C |.....FI$(3)."RAL|
00000110: 4C 59 20 26 20 52 41 43 49 4E 47 22 00 31 09 0E |LY & RACING".1..|
00000120: 00 46 49 24 28 34 29 B2 22 53 50 4F 52 54 53 31 |.FI$(4)."SPORTS1|
00000130: 22 00 46 09 0F 00 46 49 24 28 35 29 B2 22 53 50 |".F...FI$(5)."SP|
00000140: 4F 52 54 53 32 22 00 5C 09 10 00 46 49 24 28 36 |ORTS2".\...FI$(6|
00000150: 29 B2 22 41 4D 45 52 49 43 41 4E 22 00 71 09 11 |)."AMERICAN".q..|
00000160: 00 46 49 24 28 37 29 B2 22 48 4F 54 52 4F 44 53 |.FI$(7)."HOTRODS|
00000170: 22 00 77 09 1D 00 8E 00 7D 09 1E 00 8E 00 83 09 |".w.....}.......|
00000180: 50 00 8F 00 A9 09 51 00 8F 20 54 4F 20 44 49 53 |P.....Q.. TO DIS|
00000190: 50 4C 41 59 20 54 48 45 20 50 49 43 54 55 52 45 |PLAY THE PICTURE|
000001A0: 53 20 53 45 54 20 54 48 45 00 C6 09 52 00 8F 20 |S SET THE...R.. |
000001B0: 56 41 52 49 41 42 4C 45 53 20 41 53 20 46 4F 4C |VARIABLES AS FOL|
000001C0: 4C 4F 57 53 3A 2D 00 CC 09 53 00 8F 00 F1 09 54 |LOWS:-...S.....T|
000001D0: 00 8F 20 49 44 24 20 54 4F 20 54 48 45 20 4E 41 |.. ID$ TO THE NA|
000001E0: 4D 45 20 4F 46 20 54 48 45 20 50 49 43 54 55 52 |ME OF THE PICTUR|
000001F0: 45 00 F7 09 55 00 8F 00 1E 0A 56 00 8F 20 42 43 |E...U.....V.. BC|
00000200: 20 20 54 4F 20 54 48 45 20 42 4F 52 44 45 52 20 | TO THE BORDER |
00000210: 43 4F 4C 4F 52 2C 20 49 46 20 54 48 49 53 00 3F |COLOR, IF THIS.?|
00000220: 0A 57 00 8F 20 20 20 20 20 49 53 20 41 42 4F 56 |.W.. IS ABOV|
00000230: 45 20 31 35 20 54 48 45 20 42 4F 52 44 45 52 00 |E 15 THE BORDER.|
00000240: 5B 0A 58 00 8F 20 20 20 20 20 43 4F 4C 4F 52 53 |[.X.. COLORS|
00000250: 20 57 49 4C 4C 20 43 59 43 4C 45 00 61 0A 59 00 | WILL CYCLE.a.Y.|
00000260: 8F 00 87 0A 5A 00 8F 20 44 50 20 20 54 4F 20 54 |....Z.. DP TO T|
00000270: 48 45 20 23 20 4F 46 20 53 45 43 53 20 54 4F 20 |HE # OF SECS TO |
00000280: 44 49 53 50 4C 41 59 00 9E 0A 5B 00 8F 20 20 20 |DISPLAY...[.. |
00000290: 20 20 54 48 49 53 20 50 49 43 54 55 52 45 00 A4 | THIS PICTURE..|
000002A0: 0A 5C 00 8F 00 C6 0A 5D 00 8F 20 54 48 45 20 53 |.\.....].. THE S|
000002B0: 55 42 52 4F 55 54 49 4E 45 20 41 54 20 31 30 30 |UBROUTINE AT 100|
000002C0: 30 20 57 49 4C 4C 00 E4 0A 5E 00 8F 20 20 20 20 |0 WILL...^.. |
000002D0: 20 44 49 53 50 4C 41 59 20 54 48 45 20 50 49 43 | DISPLAY THE PIC|
000002E0: 54 55 52 45 00 EA 0A 63 00 8F 00 0B 0B 64 00 49 |TURE...c.....d.I|
000002F0: 44 24 B2 46 49 24 28 30 29 3A 42 43 B2 31 36 3A |D$.FI$(0):BC.16:|
00000300: 44 50 B2 31 30 3A 8D 31 30 30 30 00 2B 0B 6E 00 |DP.10:.1000.+.n.|
00000310: 49 44 24 B2 46 49 24 28 31 29 3A 42 43 B2 31 3A |ID$.FI$(1):BC.1:|
00000320: 44 50 B2 31 30 3A 8D 31 30 30 30 00 4B 0B 78 00 |DP.10:.1000.K.x.|
00000330: 49 44 24 B2 46 49 24 28 32 29 3A 42 43 B2 32 3A |ID$.FI$(2):BC.2:|
00000340: 44 50 B2 31 30 3A 8D 31 30 30 30 00 6B 0B 82 00 |DP.10:.1000.k...|
00000350: 49 44 24 B2 46 49 24 28 33 29 3A 42 43 B2 33 3A |ID$.FI$(3):BC.3:|
00000360: 44 50 B2 31 30 3A 8D 31 30 30 30 00 8B 0B 8C 00 |DP.10:.1000.....|
00000370: 49 44 24 B2 46 49 24 28 34 29 3A 42 43 B2 34 3A |ID$.FI$(4):BC.4:|
00000380: 44 50 B2 31 30 3A 8D 31 30 30 30 00 AB 0B 96 00 |DP.10:.1000.....|
00000390: 49 44 24 B2 46 49 24 28 35 29 3A 42 43 B2 35 3A |ID$.FI$(5):BC.5:|
000003A0: 44 50 B2 31 30 3A 8D 31 30 30 30 00 CB 0B A0 00 |DP.10:.1000.....|
000003B0: 49 44 24 B2 46 49 24 28 36 29 3A 42 43 B2 36 3A |ID$.FI$(6):BC.6:|
000003C0: 44 50 B2 31 30 3A 8D 31 30 30 30 00 EB 0B AA 00 |DP.10:.1000.....|
000003D0: 49 44 24 B2 46 49 24 28 37 29 3A 42 43 B2 37 3A |ID$.FI$(7):BC.7:|
000003E0: 44 50 B2 31 30 3A 8D 31 30 30 30 00 F4 0B E7 03 |DP.10:.1000.....|
000003F0: 89 31 30 30 00 18 0C E8 03 A0 31 3A 9F 31 2C 38 |.100......1:.1,8|
00000400: 2C 32 2C 49 44 24 3A A1 23 31 2C 41 24 3A 8B 41 |,2,ID$:.#1,A$:.A|
00000410: 24 B3 B1 22 50 22 A7 8E 00 29 0C F2 03 9E 4A 54 |$.."P"...)....JT|
00000420: AA 33 30 3A 97 42 4F 2C 31 00 59 0C FC 03 A1 23 |.30:.BO,1.Y....#|
00000430: 31 2C 41 24 3A 55 42 B2 C6 28 41 24 AA C7 28 30 |1,A$:UB..(A$..(0|
00000440: 29 29 3A 97 42 4F AA 31 2C 55 42 3A 9E 4A 54 3A |)):.BO.1,UB:.JT:|
00000450: A0 31 3A 55 B2 B8 28 30 29 00 81 0C 06 04 8B 42 |.1:U..(0)......B|
00000460: 43 B3 31 37 A7 81 49 B2 30 A4 44 50 3A 81 4A B2 |C.17..I.0.DP:.J.|
00000470: 30 A4 35 30 30 3A 82 4A 3A 82 49 3A 89 31 30 36 |0.500:.J:.I:.106|
00000480: 30 00 9D 0C 10 04 81 49 B2 30 A4 44 50 3A 81 4A |0......I.0.DP:.J|
00000490: B2 30 A4 32 34 38 3A 82 4A 3A 8D 33 30 00 B0 0C |.0.248:.J:.30...|
000004A0: 1A 04 81 4A B2 30 A4 32 34 38 3A 82 4A 3A 82 49 |...J.0.248:.J:.I|
000004B0: 00 C3 0C 24 04 A1 41 24 3A 8B 41 24 B3 B1 22 51 |...$..A$:.A$.."Q|
000004C0: 22 A7 8E 00 CD 0C 2E 04 9E 4A 54 AA 36 00 F6 0C |"........JT.6...|
000004D0: 28 23 9E 4A 54 AA 33 30 3A 97 35 33 32 37 32 2C |(#.JT.30:.53272,|
000004E0: 31 32 30 3A 97 35 33 32 36 35 2C C2 28 35 33 32 |120:.53265,.(532|
000004F0: 36 35 29 B0 33 32 00 0D 0D 32 23 97 35 33 32 37 |65).32...2#.5327|
00000500: 30 2C C2 28 35 33 32 37 30 29 B0 31 36 00 3B 0D |0,.(53270).16.;.|
00000510: 3C 23 97 35 36 35 37 38 2C C2 28 35 36 35 37 38 |<#.56578,.(56578|
00000520: 29 B0 33 3A 97 35 36 35 37 36 2C 28 C2 28 35 36 |).3:.56576,(.(56|
00000530: 35 37 36 29 AF 32 35 32 29 B0 32 00 48 0D 46 23 |576).252).2.H.F#|
00000540: 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:.:."DIR",8,1......FI$(
19):JT.36870:BO.53280:.9000.W...FI$(0)."
VINTAGE SPORTS".....FI$(1)."VINTAGE"....
.FI$(2)."RACING".....FI$(3)."RALLY & RAC
ING".1...FI$(4)."SPORTS1".F...FI$(5)."SP
ORTS2".\...FI$(6)."AMERICAN".Q...FI$(7).
"HOTRODS".W.....}.......P.....Q.. TO DIS
PLAY THE PICTURES SET THE.F.R.. VARIABLE
S AS FOLLOWS:-.L.S.....T.. ID$ TO THE NA
ME OF THE PICTURE...U.....V.. BC TO THE
BORDER COLOR, IF THIS.?.W.. IS ABOV
E 15 THE BORDER.[.X.. COLORS WILL CY
CLE.A.Y.....Z.. DP TO THE # OF SECS TO
DISPLAY...[.. THIS PICTURE...\...F.]
.. THE SUBROUTINE AT 1000 WILL...^..
DISPLAY THE PICTURE...C.....D.ID$.FI$(0
):BC.16:DP.10:.1000.+.N.ID$.FI$(1):BC.1:
DP.10:.1000.K.X.ID$.FI$(2):BC.2:DP.10:.1
000.K...ID$.FI$(3):BC.3:DP.10:.1000.....
ID$.FI$(4):BC.4:DP.10:.1000.....ID$.FI$(
5):BC.5:DP.10:.1000.K. .ID$.FI$(6):BC.6:
DP.10:.1000.....ID$.FI$(7):BC.7:DP.10:.1
000......100..... 1:.1,8,2,ID$:.#1,A$:.A
$.."P"...)....JT.30:.BO,1.Y....#1,A$:UB.
F(A$.G(0)):.BO.1,UB:.JT: 1:U..(0)......B
C.17..I.0.DP:.J.0.500:.J:.I:.1060......I
.0.DP:.J.0.248:.J:.30......J.0.248:.J:.I
.C.$..A$:.A$.."Q"...M....JT.6...(#.JT.30
:.53272,120:.53265,B(53265).32...2#.5327
0,B(53270).16.;.<#.56578,B(56578).3:.565
76,(B(56576).252).2.H.F#.10:.100...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL