> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 8F 20 43 4F 4D 50 55 54 45 52 |....... COMPUTER|
00000010: 20 49 4E 56 45 4E 54 4F 52 59 00 44 08 14 00 43 | INVENTORY.D...C|
00000020: 24 28 31 29 B2 22 43 4F 4D 4D 4F 44 4F 52 45 22 |$(1)."COMMODORE"|
00000030: 3A 43 24 28 32 29 B2 22 52 41 44 49 4F 20 53 48 |:C$(2)."RADIO SH|
00000040: 41 43 4B 22 00 62 08 1E 00 43 24 28 33 29 B2 22 |ACK".b...C$(3)."|
00000050: 54 45 58 41 53 20 49 4E 53 54 52 55 4D 45 4E 54 |TEXAS INSTRUMENT|
00000060: 53 22 00 9D 08 28 00 44 24 28 31 29 B2 22 43 4F |S"...(.D$(1)."CO|
00000070: 4D 50 55 54 45 52 53 22 3A 44 24 28 32 29 B2 22 |MPUTERS":D$(2)."|
00000080: 50 45 52 49 50 48 45 52 41 4C 53 22 3A 44 24 28 |PERIPHERALS":D$(|
00000090: 33 29 B2 22 53 4F 46 54 57 41 52 45 22 00 A7 08 |3)."SOFTWARE"...|
000000A0: 32 00 99 20 22 93 22 00 C3 08 3C 00 99 20 A3 31 |2.. "."...<.. .1|
000000B0: 32 29 22 2A 2A 20 49 4E 56 45 4E 54 4F 52 59 20 |2)"** INVENTORY |
000000C0: 2A 2A 22 00 D6 08 46 00 99 20 22 11 11 43 48 4F |**"...F.. "..CHO|
000000D0: 4F 53 45 3A 11 22 00 F3 08 50 00 81 20 49 B2 31 |OSE:."...P.. I.1|
000000E0: 20 A4 20 33 3A 99 20 A3 34 29 49 3B 43 24 28 49 | . 3:. .4)I;C$(I|
000000F0: 29 3A 82 00 0B 09 5A 00 99 20 A3 35 29 22 30 20 |):....Z.. .5)"0 |
00000100: 45 56 45 52 59 54 48 49 4E 47 22 00 2C 09 64 00 |EVERYTHING".,.d.|
00000110: A1 20 41 24 3A 8B 20 41 24 B3 22 30 22 20 B0 20 |. A$:. A$."0" . |
00000120: 41 24 B1 22 33 22 20 A7 20 31 30 30 00 39 09 6E |A$."3" . 100.9.n|
00000130: 00 43 43 B2 C5 28 41 24 29 00 4C 09 78 00 99 20 |.CC..(A$).L.x.. |
00000140: 22 11 11 43 48 4F 4F 53 45 3A 11 22 00 69 09 82 |"..CHOOSE:.".i..|
00000150: 00 81 20 49 B2 31 20 A4 20 33 3A 99 20 A3 34 29 |.. I.1 . 3:. .4)|
00000160: 49 3B 44 24 28 49 29 3A 82 00 89 09 8C 00 99 20 |I;D$(I):....... |
00000170: A3 35 29 22 30 20 45 56 45 52 59 54 48 49 4E 47 |.5)"0 EVERYTHING|
00000180: 22 3A 97 20 31 39 38 2C 30 00 AA 09 96 00 A1 20 |":. 198,0...... |
00000190: 41 24 3A 8B 20 41 24 B3 22 30 22 20 B0 20 41 24 |A$:. A$."0" . A$|
000001A0: B1 22 33 22 20 A7 20 31 35 30 00 B7 09 A0 00 44 |."3" . 150.....D|
000001B0: 44 B2 C5 28 41 24 29 00 C1 09 AA 00 99 20 22 93 |D..(A$)...... ".|
000001C0: 22 00 CA 09 B4 00 54 54 B2 30 00 E2 09 BE 00 99 |".....TT.0......|
000001D0: 20 43 24 28 43 43 29 2C 44 24 28 44 44 29 3B 22 | C$(CC),D$(DD);"|
000001E0: 11 22 00 E8 09 C8 00 8C 00 06 0A D2 00 87 20 43 |."............ C|
000001F0: 2C 44 2C 49 54 45 4D 24 2C 53 4E 24 2C 44 41 54 |,D,ITEM$,SN$,DAT|
00000200: 45 24 2C 43 53 54 00 17 0A DC 00 8B 20 43 B2 31 |E$,CST...... C.1|
00000210: 30 20 A7 20 33 31 30 00 28 0A E6 00 8B 20 43 43 |0 . 310.(.... CC|
00000220: B2 30 20 A7 20 32 35 30 00 3A 0A F0 00 8B 20 43 |.0 . 250.:.... C|
00000230: 43 B3 B1 43 20 A7 20 32 31 30 00 4B 0A FA 00 8B |C..C . 210.K....|
00000240: 20 44 44 B2 30 20 A7 20 32 37 30 00 5D 0A 04 01 | DD.0 . 270.]...|
00000250: 8B 20 44 44 B3 B1 44 20 A7 20 32 31 30 00 6B 0A |. DD..D . 210.k.|
00000260: 0E 01 43 24 B2 C4 28 43 53 54 29 00 99 0A 18 01 |..C$..(CST).....|
00000270: 99 20 49 54 45 4D 24 3B A3 31 37 29 3B 53 4E 24 |. ITEM$;.17);SN$|
00000280: 3B A3 32 37 29 3B 44 41 54 45 24 3B A3 33 39 AB |;.27);DATE$;.39.|
00000290: C3 28 43 24 29 29 3B 43 24 00 A7 0A 22 01 54 54 |.(C$));C$...".TT|
000002A0: B2 54 54 AA 43 53 54 00 B1 0A 2C 01 89 20 32 31 |.TT.CST...,.. 21|
000002B0: 30 00 BE 0A 36 01 54 24 B2 C4 28 54 54 29 00 DB |0...6.T$..(TT)..|
000002C0: 0A 40 01 99 20 22 11 54 4F 54 41 4C 22 3B A3 33 |.@.. ".TOTAL";.3|
000002D0: 39 AB C3 28 54 24 29 29 3B 54 24 00 FF 0A 4A 01 |9..(T$));T$...J.|
000002E0: 99 20 22 11 44 49 46 46 45 52 45 4E 54 20 43 41 |. ".DIFFERENT CA|
000002F0: 54 45 47 4F 52 59 3F 20 28 59 2F 4E 29 22 3B 00 |TEGORY? (Y/N)";.|
00000300: 16 0B 54 01 A1 20 41 24 3A 8B 20 41 24 B2 22 59 |..T.. A$:. A$."Y|
00000310: 22 20 A7 20 35 30 00 29 0B 5E 01 8B 20 41 24 B2 |" . 50.).^.. A$.|
00000320: 22 4E 22 20 A7 20 35 35 30 00 33 0B 68 01 89 20 |"N" . 550.3.h.. |
00000330: 33 34 30 00 49 0B 72 01 8F 20 49 4E 56 45 4E 54 |340.I.r.. INVENT|
00000340: 4F 52 59 20 49 54 45 4D 53 00 6B 0B 7C 01 83 20 |ORY ITEMS.k.|.. |
00000350: 31 2C 31 2C 56 49 43 2D 32 30 2C 56 30 32 39 39 |1,1,VIC-20,V0299|
00000360: 37 32 2C 31 39 38 32 2C 32 32 35 00 8E 0B 86 01 |72,1982,225.....|
00000370: 83 20 31 2C 32 2C 44 41 54 41 53 45 54 54 45 2C |. 1,2,DATASETTE,|
00000380: 32 38 32 37 35 34 2C 31 39 38 32 2C 37 30 00 A8 |282754,1982,70..|
00000390: 0B 90 01 83 20 31 2C 33 2C 56 49 43 4D 4F 4E 2C |.... 1,3,VICMON,|
000003A0: 2C 31 39 38 32 2C 36 30 00 D2 0B 9A 01 83 20 31 |,1982,60...... 1|
000003B0: 2C 31 2C 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 2C |,1,COMMODORE 64,|
000003C0: 50 30 30 31 34 34 36 30 37 2C 31 39 38 33 2C 33 |P00144607,1983,3|
000003D0: 34 35 00 FE 0B A4 01 83 20 31 2C 32 2C 31 35 34 |45...... 1,2,154|
000003E0: 31 20 44 49 53 4B 20 44 52 49 56 45 2C 4B 30 31 |1 DISK DRIVE,K01|
000003F0: 37 37 39 35 38 2C 31 39 38 34 2C 32 35 30 00 26 |77958,1984,250.&|
00000400: 0C AE 01 83 20 31 2C 32 2C 31 35 32 35 20 50 52 |.... 1,2,1525 PR|
00000410: 49 4E 54 45 52 2C 35 30 31 36 32 32 33 2C 31 39 |INTER,5016223,19|
00000420: 38 34 2C 32 35 30 00 48 0C B8 01 83 20 31 2C 33 |84,250.H.... 1,3|
00000430: 2C 52 41 44 41 52 20 52 41 54 20 52 41 43 45 2C |,RADAR RAT RACE,|
00000440: 2C 31 39 38 33 2C 33 30 00 6D 0C C2 01 83 20 32 |,1983,30.m.... 2|
00000450: 2C 31 2C 31 36 4B 20 43 4F 4C 4F 52 2C 30 30 32 |,1,16K COLOR,002|
00000460: 34 30 32 33 2C 31 39 38 32 2C 36 32 30 00 91 0C |4023,1982,620...|
00000470: CC 01 83 20 32 2C 32 2C 43 54 52 2D 38 30 41 20 |... 2,2,CTR-80A |
00000480: 52 45 43 4F 52 44 45 52 2C 2C 31 39 38 32 2C 35 |RECORDER,,1982,5|
00000490: 36 00 AF 0C D6 01 83 20 32 2C 33 2C 43 4F 4C 4F |6...... 2,3,COLO|
000004A0: 52 20 4C 4F 47 4F 2C 2C 31 39 38 33 2C 35 35 00 |R LOGO,,1983,55.|
000004B0: CB 0C E0 01 83 20 32 2C 33 2C 56 49 44 45 4F 54 |..... 2,3,VIDEOT|
000004C0: 45 58 2C 2C 31 39 38 33 2C 34 30 00 EB 0C EA 01 |EX,,1983,40.....|
000004D0: 83 20 33 2C 31 2C 54 49 2D 39 2F 34 2C 36 31 32 |. 3,1,TI-9/4,612|
000004E0: 30 35 2C 31 39 38 30 2C 36 33 35 00 10 0D F4 01 |05,1980,635.....|
000004F0: 83 20 33 2C 31 2C 54 49 2D 39 39 2F 34 41 2C 34 |. 3,1,TI-99/4A,4|
00000500: 30 31 30 32 35 34 35 2C 31 39 38 32 2C 34 32 35 |0102545,1982,425|
00000510: 00 35 0D FE 01 83 20 33 2C 32 2C 54 49 20 52 45 |.5.... 3,2,TI RE|
00000520: 43 4F 52 44 45 52 2C 30 32 35 34 32 36 2C 31 39 |CORDER,025426,19|
00000530: 38 33 2C 36 30 00 56 0D 08 02 83 20 33 2C 33 2C |83,60.V.... 3,3,|
00000540: 41 54 54 41 43 4B 2C 35 31 35 39 39 39 32 2C 31 |ATTACK,5159992,1|
00000550: 39 38 33 2C 33 35 00 79 0D 12 02 83 20 33 2C 33 |983,35.y.... 3,3|
00000560: 2C 4D 55 4E 43 48 4D 41 4E 2C 39 39 37 36 32 37 |,MUNCHMAN,997627|
00000570: 33 2C 31 39 38 32 2C 33 35 00 89 0D 1C 02 83 20 |3,1982,35...... |
00000580: 31 30 2C 30 2C 2C 2C 2C 30 00 8F 0D 26 02 80 00 |10,0,,,,0...&...|
00000590: 00 00 |.. |
....... COMPUTER INVENTORY.D...C$(1)."CO
MMODORE":C$(2)."RADIO SHACK".B...C$(3)."
TEXAS INSTRUMENTS"...(.D$(1)."COMPUTERS"
:D$(2)."PERIPHERALS":D$(3)."SOFTWARE"...
2.. ".".C.<.. .12)"** INVENTORY **".V.F.
. "..CHOOSE:."...P.. I.1 . 3:. .4)I;C$(I
):....Z.. .5)"0 EVERYTHING".,.D.. A$:. A
$."0" . A$."3" . 100.9.N.CC.E(A$).L.X..
"..CHOOSE:.".I.... I.1 . 3:. .4)I;D$(I):
....... .5)"0 EVERYTHING":. 198,0......
A$:. A$."0" . A$."3" . 150... .DD.E(A$).
A.... ".".J...TT.0...... C$(CC),D$(DD);"
."...H.....R.. C,D,ITEM$,SN$,DATE$,CST..
.... C.10 . 310.(.... CC.0 . 250.:.... C
C..C . 210.K.... DD.0 . 270.].... DD..D
. 210.K...C$.D(CST)...... ITEM$;.17);SN$
;.27);DATE$;.39.C(C$));C$...".TT.TT.CST.
..,.. 210...6.T$.D(TT)...@.. ".TOTAL";.3
9.C(T$));T$...J.. ".DIFFERENT CATEGORY?
(Y/N)";...T.. A$:. A$."Y" . 50.).^.. A$.
"N" . 550.3.H.. 340.I.R.. INVENTORY ITEM
S.K.|.. 1,1,VIC-20,V029972,1982,225.....
. 1,2,DATASETTE,282754,1982,70...... 1,3
,VICMON,,1982,60.R.... 1,1,COMMODORE 64,
P00144607,1983,345...... 1,2,1541 DISK D
RIVE,K0177958,1984,250.&.... 1,2,1525 PR
INTER,5016223,1984,250.H.... 1,3,RADAR R
AT RACE,,1983,30.M.B.. 2,1,16K COLOR,002
4023,1982,620...L.. 2,2,CTR-80A RECORDER
,,1982,56...V.. 2,3,COLOR LOGO,,1983,55.
K.... 2,3,VIDEOTEX,,1983,40...... 3,1,TI
-9/4,61205,1980,635...... 3,1,TI-99/4A,4
0102545,1982,425.5.... 3,2,TI RECORDER,0
25426,1983,60.V.... 3,3,ATTACK,5159992,1
983,35.Y.... 3,3,MUNCHMAN,9976273,1982,3
5...... 10,0,,,,0...&.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL