D&P T&S
FILE INFORMATION
FILENAME(S): D&P T&S
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-12-02 00:02:02
APPEARS ON: 1 disk(s)
FILE HASH
3df3c3c125777b9f51944b4e8a004465778ba5fa7da6a9dfbe1965ca15de084c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | D&P T&S | PRG | earthshaker | 31 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 8C 00 97 35 35 2C 30 3A 97 35 36 2C |.......55,0:.56,|
00000010: 31 31 32 3A 99 C7 28 31 34 32 29 3A 9C 00 29 08 |112:..(142):..).|
00000020: AA 00 41 B2 32 38 36 37 32 00 3B 08 B4 00 87 42 |..A.28672.;....B|
00000030: 3A 8B 42 B2 39 39 39 A7 32 37 30 00 4F 08 BE 00 |:.B.999.270.O...|
00000040: 97 41 2C 42 3A 41 B2 41 AA 31 3A 89 31 38 30 00 |.A,B:A.A.1:.180.|
00000050: 72 08 0E 01 99 22 93 11 11 1D 1D 1D 1D 1D A4 A4 |r...."..........|
00000060: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000070: A4 22 00 9C 08 18 01 99 22 20 20 20 20 20 12 20 |."......" . |
00000080: 44 49 53 50 4C 41 59 20 54 52 41 43 4B 20 41 4E |DISPLAY TRACK AN|
00000090: 44 20 53 45 43 54 4F 52 20 11 11 22 00 C6 08 4A |D SECTOR .."...J|
000000A0: 01 99 22 11 11 44 49 53 50 4C 41 59 20 4F 4E 20 |.."..DISPLAY ON |
000000B0: 12 53 92 43 52 45 45 4E 20 4F 52 20 12 50 92 52 |.S.CREEN OR .P.R|
000000C0: 49 4E 54 45 52 22 00 DA 08 54 01 A1 20 4A 24 3A |INTER"...T.. J$:|
000000D0: 8B 4A 24 B2 22 22 A7 33 34 30 00 F0 08 5E 01 8B |.J$."".340...^..|
000000E0: 4A 24 B2 22 53 22 A7 9F 34 2C 33 3A 89 34 30 30 |J$."S"..4,3:.400|
000000F0: 00 06 09 68 01 8B 4A 24 B2 22 50 22 A7 9F 34 2C |...h..J$."P"..4,|
00000100: 34 3A 89 34 30 30 00 10 09 72 01 89 54 33 34 30 |4:.400...r..T340|
00000110: 00 2E 09 86 01 8F 20 20 2A 20 4F 50 45 4E 20 46 |...... * OPEN F|
00000120: 49 4C 45 53 20 54 4F 20 44 49 53 4B 20 2A 00 40 |ILES TO DISK *.@|
00000130: 09 90 01 9F 31 35 2C 38 2C 31 35 3A 8D 37 37 30 |....15,8,15:.770|
00000140: 00 58 09 9A 01 9F 32 2C 38 2C 32 2C 22 23 22 AA |.X....2,8,2,"#".|
00000150: 22 30 22 3A 8D 37 37 30 00 77 09 AE 01 8F 20 2A |"0":.770.w.... *|
00000160: 20 47 45 54 20 54 52 41 43 4B 20 41 4E 44 20 53 | GET TRACK AND S|
00000170: 45 43 54 4F 52 20 2A 00 AD 09 B8 01 97 31 39 38 |ECTOR *......198|
00000180: 2C 30 3A 99 22 11 45 20 54 4F 20 45 58 49 54 21 |,0:.".E TO EXIT!|
00000190: 21 22 3A 99 22 11 54 52 41 43 4B 20 3A 20 22 3B |!":.".TRACK : ";|
000001A0: 3A 8D 38 31 30 3A 54 B2 C5 28 58 24 29 00 D3 09 |:.810:T..(X$)...|
000001B0: D6 01 8B 54 B2 30 B0 54 B1 33 35 B0 58 24 B2 22 |...T.0.T.35.X$."|
000001C0: 58 22 A7 A0 32 3A A0 34 3A A0 31 35 3A 99 22 93 |X"..2:.4:.15:.".|
000001D0: 22 3A 80 00 F9 09 E0 01 99 2C 2C 22 93 53 45 43 |":.......,,".SEC|
000001E0: 54 4F 52 20 3A 20 22 3B 3A 8D 38 31 30 3A 8B 58 |TOR : ";:.810:.X|
000001F0: 24 B2 22 58 22 A7 34 34 30 00 05 0A EA 01 53 B2 |$."X".440.....S.|
00000200: C5 28 58 24 29 00 27 0A F4 01 8B 4A 24 B2 22 53 |.(X$).'....J$."S|
00000210: 22 A7 99 22 54 52 41 43 4B 22 54 22 53 45 43 54 |".."TRACK"T"SECT|
00000220: 4F 52 22 53 22 11 22 00 48 0A FE 01 8B 4A 24 B2 |OR"S".".H....J$.|
00000230: 22 50 22 A7 98 34 2C 22 54 52 41 43 4B 22 54 22 |"P"..4,"TRACK"T"|
00000240: 53 45 43 54 4F 52 22 53 00 68 0A 12 02 8F 20 2A |SECTOR"S.h.... *|
00000250: 20 47 45 54 20 42 4C 4F 42 7C FF FF 75 FF FF FF | GET BLOB|..u...|
00000260: FF FF 74 70 79 FF FF 8C FF FF 0A 1C 02 98 11 35 |..tpy..........5|
00000270: 2C FF FF FF FF FF FF FF FF C0 5C DA 5C E4 58 FF |,.........\.\.X.|
00000280: 4E 4E C8 81 FF 10 09 01 FF C4 CE 86 08 A0 1F D0 |NN..............|
00000290: 50 40 86 C4 08 81 1C 10 C8 01 FF C4 CE 86 08 B6 |P@..............|
000002A0: 1F E0 08 6E FF C0 FF 6E FF 44 FF 88 68 10 58 01 |...n...n.D..h.X.|
000002B0: 84 04 C4 CE 8F 94 8A 58 94 8B 48 94 8B 18 6E FF |.......X..H...n.|
000002C0: C0 FF 81 78 18 99 01 FF 44 C0 4E 40 C0 8F 6A FF |...x....D.N@..j.|
000002D0: 94 8A FF 51 FF 40 FF 4A 4E 48 88 0D 1C FF 08 FF |...Q.@.JNH......|
000002E0: 80 10 88 99 FF EC D8 9F 9C FF 88 A8 9F AF AC B4 |................|
000002F0: 88 AF BA 88 EC AC E8 9D 9D BB 20 4F 52 20 50 52 |.......... OR PR|
00000300: 49 4E 54 45 52 20 2A 00 15 0B 62 02 9D 34 3A 9E |INTER *...b..4:.|
00000310: 32 38 36 39 31 00 25 0B 6C 02 8B 4A 24 B2 22 50 |28691.%.l..J$."P|
00000320: 22 A7 36 34 30 00 38 0B 76 02 A1 5A 24 3A 8B 5A |".640.8.v..Z$:.Z|
00000330: 24 B2 22 22 A7 36 33 30 00 46 0B 80 02 9E 32 38 |$."".630.F....28|
00000340: 36 39 39 3A 98 34 00 6A 0B 94 02 8F 20 2A 20 47 |699:.4.j.... * G|
00000350: 45 54 20 4E 45 58 54 20 54 52 41 43 4B 20 41 4E |ET NEXT TRACK AN|
00000360: 44 20 53 45 43 54 4F 52 20 2A 00 86 0B 9E 02 54 |D SECTOR *.....T|
00000370: 31 B2 C2 28 33 30 37 32 30 29 3A 53 31 B2 C2 28 |1..(30720):S1..(|
00000380: 33 30 37 32 31 29 00 A7 0B A8 02 8B 54 31 B2 30 |30721)......T1.0|
00000390: A7 99 22 11 11 20 45 4E 44 20 4F 46 20 46 49 4C |..".. END OF FIL|
000003A0: 45 22 3A 89 34 34 30 00 CB 0B B2 02 99 22 11 4E |E":.440......".N|
000003B0: 45 58 54 20 54 52 41 43 4B 2C 20 53 45 43 54 4F |EXT TRACK, SECTO|
000003C0: 52 20 3A 20 22 3B 54 31 2C 53 31 00 FA 0B BC 02 |R : ";T1,S1.....|
000003D0: 99 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 48 |."DO YOU WANT TH|
000003E0: 45 20 4E 45 58 54 20 54 52 41 43 4B 20 41 4E 44 |E NEXT TRACK AND|
000003F0: 20 53 45 43 54 4F 52 3F 20 22 00 0D 0C C6 02 A1 | SECTOR? "......|
00000400: 5A 24 3A 8B 5A 24 B2 22 22 A7 37 31 30 00 30 0C |Z$:.Z$."".710.0.|
00000410: D0 02 8B 5A 24 B2 22 59 22 B0 20 5A 24 B2 22 20 |...Z$."Y". Z$." |
00000420: 22 A7 54 B2 54 31 3A 53 B2 53 31 3A 89 35 30 30 |".T.T1:S.S1:.500|
00000430: 00 40 0C DA 02 8B 5A 24 B2 22 4E 22 A7 34 34 30 |.@....Z$."N".440|
00000440: 00 49 0C E4 02 89 37 31 30 00 6C 0C F8 02 8F 20 |.I....710.l.... |
00000450: 2A 20 43 48 45 43 4B 20 44 49 53 4B 20 45 52 52 |* CHECK DISK ERR|
00000460: 4F 52 20 43 48 41 4E 4E 45 4C 20 2A 00 89 0C 02 |OR CHANNEL *....|
00000470: 03 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 |..15,EN,EM$,ET,E|
00000480: 53 3A 8B 45 4E B2 30 A7 8E 00 B5 0C 0C 03 99 22 |S:.EN.0........"|
00000490: 12 44 49 53 4B 20 45 52 52 4F 52 92 22 45 4E 2C |.DISK ERROR."EN,|
000004A0: 45 4D 24 2C 45 54 2C 45 53 3A A0 32 3A A0 34 3A |EM$,ET,ES:.2:.4:|
000004B0: A0 31 35 3A 80 00 D2 0C 20 03 8F 20 2A 20 42 4F |.15:.... .. * BO|
000004C0: 4D 42 20 50 52 4F 4F 46 20 52 4F 55 54 49 4E 45 |MB PROOF ROUTINE|
000004D0: 20 2A 00 E8 0C 2A 03 9F 39 2C 30 3A 84 39 2C 58 | *...*..9,0:.9,X|
000004E0: 24 3A A0 39 3A 99 3A 8E 00 04 0D 3E 03 8F 20 2A |$:.9:.:....>.. *|
000004F0: 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 44 41 | MACHINE CODE DA|
00000500: 54 41 20 2A 00 42 0D 48 03 83 20 31 36 32 2C 32 |TA *.B.H.. 162,2|
00000510: 2C 33 32 2C 31 39 38 2C 32 35 35 2C 31 36 30 2C |,32,198,255,160,|
00000520: 31 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 35 33 |1,32,207,255,153|
00000530: 2C 30 2C 31 32 30 2C 32 30 30 2C 32 30 38 2C 32 |,0,120,200,208,2|
00000540: 34 37 00 83 0D 52 03 83 37 36 2C 32 30 34 2C 32 |47...R..76,204,2|
00000550: 35 35 2C 31 36 39 2C 31 32 30 2C 31 33 33 2C 31 |55,169,120,133,1|
00000560: 38 31 2C 31 36 39 2C 30 2C 31 33 33 2C 31 38 30 |81,169,0,133,180|
00000570: 2C 31 36 35 2C 31 38 30 2C 33 32 2C 31 32 36 2C |,165,180,32,126,|
00000580: 31 31 32 00 C2 0D 5C 03 83 31 36 39 2C 33 32 2C |112...\..169,32,|
00000590: 33 32 2C 32 31 30 2C 32 35 35 2C 31 36 39 2C 35 |32,210,255,169,5|
000005A0: 38 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 36 39 |8,32,210,255,169|
000005B0: 2C 33 32 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 |,32,32,210,255,1|
000005C0: 36 30 00 00 0E 66 03 83 30 2C 31 37 37 2C 31 38 |60...f..0,177,18|
000005D0: 30 2C 33 32 2C 31 32 36 2C 31 31 32 2C 31 36 39 |0,32,126,112,169|
000005E0: 2C 33 32 2C 33 32 2C 32 31 30 2C 32 35 35 2C 32 |,32,32,210,255,2|
000005F0: 30 30 2C 31 39 32 2C 38 2C 32 30 38 2C 32 34 31 |00,192,8,208,241|
00000600: 00 3E 0E 70 03 83 31 36 30 2C 30 2C 31 36 39 2C |.>.p..160,0,169,|
00000610: 35 38 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 36 |58,32,210,255,16|
00000620: 39 2C 33 32 2C 33 32 2C 32 31 30 2C 32 35 35 2C |9,32,32,210,255,|
00000630: 31 37 37 2C 31 38 30 2C 32 30 31 2C 33 32 00 7B |177,180,201,32.{|
00000640: 0E 7A 03 83 31 34 34 2C 31 32 2C 32 30 31 2C 39 |.z..144,12,201,9|
00000650: 36 2C 31 34 34 2C 31 30 2C 32 30 31 2C 31 36 30 |6,144,10,201,160|
00000660: 2C 31 34 34 2C 34 2C 32 30 31 2C 32 32 34 2C 31 |,144,4,201,224,1|
00000670: 34 34 2C 32 2C 31 36 39 2C 33 32 00 BA 0E 84 03 |44,2,169,32.....|
00000680: 83 33 32 2C 32 31 30 2C 32 35 35 2C 32 30 30 2C |.32,210,255,200,|
00000690: 31 39 32 2C 38 2C 32 30 38 2C FF FF FF FF FF FF |192,8,208,......|
000006A0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000006B0: FF FF FF FF FF FF FF FF FF FF FF 0E FF FF FF FF |................|
000006C0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000006D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000006E0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000006F0: FF FF 2C 37 34 00 31 0F 98 03 83 37 34 2C 37 34 |..,74.1....74,74|
00000700: 2C 37 34 2C 33 32 2C 31 35 30 2C 31 31 32 2C 31 |,74,32,150,112,1|
00000710: 37 30 2C 31 30 34 2C 34 31 2C 31 35 2C 33 32 2C |70,104,41,15,32,|
00000720: 31 35 30 2C 31 31 32 2C 37 32 2C 31 33 38 2C 33 |150,112,72,138,3|
00000730: 32 00 72 0F A2 03 83 32 31 30 2C 32 35 35 2C 31 |2.r....210,255,1|
00000740: 30 34 2C 37 36 2C 32 31 30 2C 32 35 35 2C 32 34 |04,76,210,255,24|
00000750: 2C 31 30 35 2C 32 34 36 2C 31 34 34 2C FF FF FF |,105,246,144,...|
00000760: C0 CE 86 4A 86 C4 C0 CE 86 CE FF 86 FF 4A 86 FF |...J.........J..|
00000770: FF FF 88 88 88 80 6F 80 |......o. |
.......55,0:.56,112:.G(142):..)...A.2867
2.;....B:.B.999.270.O....A,B:A.A.1:.180.
R...."..........................."......
" . DISPLAY TRACK AND SECTOR ..".F.J
.."..DISPLAY ON .S.CREEN OR .P.RINTER".Z
.T.. J$:.J$."".340...^..J$."S"..4,3:.400
...H..J$."P"..4,4:.400...R..T340......
* OPEN FILES TO DISK *.@....15,8,15:.770
.X....2,8,2,"#"."0":.770.W.... * GET TRA
CK AND SECTOR *......198,0:.".E TO EXIT!
!":.".TRACK : ";:.810:T.E(X$).S.V..T.0.T
.35.X$."X". 2: 4: 15:.".":.......,,".SEC
TOR : ";:.810:.X$."X".440.....S.E(X$).'.
...J$."S".."TRACK"T"SECTOR"S".".H....J$.
"P"..4,"TRACK"T"SECTOR"S.H.... * GET BLO
B|..U.....TPY..........5,.........\Z\.X.
NNH......DN.. .PP@.D....H..DN......N...N
.D..H.X...DN...X..H...N....X....D.N@..J.
...Q.@.JNH............X.................
.. OR PRINTER *...B..4:.28691.%.L..J$."P
".640.8.V..Z$:.Z$."".630.F....28699:.4.J
.... * GET NEXT TRACK AND SECTOR *.....T
1.B(30720):S1.B(30721)......T1.0..".. EN
D OF FILE":.440.K....".NEXT TRACK, SECTO
R : ";T1,S1......"DO YOU WANT THE NEXT T
RACK AND SECTOR? "...F..Z$:.Z$."".710.0.
P..Z$."Y". Z$." ".T.T1:S.S1:.500.@.Z..Z$
."N".440.I....710.L.... * CHECK DISK ERR
OR CHANNEL *......15,EN,EM$,ET,ES:.EN.0.
.......".DISK ERROR."EN,EM$,ET,ES: 2: 4:
15:..R. .. * BOMB PROOF ROUTINE *...*..
9,0:.9,X$: 9:.:....>.. * MACHINE CODE DA
TA *.B.H.. 162,2,32,198,255,160,1,32,207
,255,153,0,120,200,208,247...R..76,204,2
55,169,120,133,181,169,0,133,180,165,180
,32,126,112.B.\..169,32,32,210,255,169,5
8,32,210,255,169,32,32,210,255,160...F..
0,177,180,32,126,112,169,32,32,210,255,2
00,192,8,208,241.>.P..160,0,169,58,32,21
0,255,169,32,32,210,255,177,180,201,32.{
.Z..144,12,201,96,144,10,201,160,144,4,2
01,224,144,2,169,32......32,210,255,200,
192,8,208,..............................
........................................
..................,74.1....74,74,74,32,1
50,112,170,104,41,15,32,150,112,72,138,3
2.R....210,255,104,76,210,255,24,105,246
,144,....N.J.D.N.N...J........O.
> CLICK IMAGE PREVIEW FOR FULL MODAL