QUERY DISK.PAL
FILE INFORMATION
FILENAME(S): QUERY DISK.PAL
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 21:12:48
APPEARS ON: 1 disk(s)
FILE HASH
d60aed202038aeccd55dc03e170d7b3381900e75f7a27d6e7916c7098c7288dd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TRANSACTOR DISK | QUERY DISK.PAL | PRG | DuncanTwain | 30 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0B 04 64 00 9E 20 37 30 30 00 30 04 6E 00 |....d.. 700.0.n.| 00000010: 3B 20 20 20 20 20 22 49 53 20 54 48 45 20 44 49 |; "IS THE DI| 00000020: 53 4B 20 44 52 49 56 45 20 54 48 45 52 45 3F 22 |SK DRIVE THERE?"| 00000030: 00 56 04 78 00 3B 20 20 20 55 BF 47 20 54 48 45 |.V.x.; U.G THE| 00000040: 20 53 59 4D 41 53 53 20 33 2E 31 33 20 41 53 53 | SYMASS 3.13 ASS| 00000050: 45 4D 42 4C 45 52 00 64 04 82 00 AC 20 B2 20 24 |EMBLER.d.... . $| 00000060: 30 38 30 31 00 86 04 8C 00 2E 42 59 54 45 20 24 |0801......BYTE $| 00000070: 30 41 2C 24 30 38 2C 24 30 30 2C 24 30 30 2C 24 |0A,$08,$00,$00,$| 00000080: 39 45 2C 24 33 32 00 A8 04 96 00 2E 42 59 54 45 |9E,$32......BYTE| 00000090: 20 24 33 30 2C 24 33 36 2C 24 33 31 2C 24 30 30 | $30,$36,$31,$00| 000000A0: 2C 24 30 30 2C 24 30 30 00 AE 04 A0 00 3B 00 CF |,$00,$00.....;..| 000000B0: 04 AA 00 4C 44 41 20 23 31 35 20 20 20 20 20 20 |...LDA #15 | 000000C0: 20 20 3B 20 46 49 4C 45 20 4E 55 4D 42 45 52 00 | ; FILE NUMBER.| 000000D0: F2 04 B4 00 4C 44 58 20 44 52 56 4E 52 20 20 20 |....LDX DRVNR | 000000E0: 20 20 20 3B 20 44 45 56 49 43 45 20 4E 55 4D 42 | ; DEVICE NUMB| 000000F0: 45 52 00 18 05 BE 00 4C 44 59 20 23 31 35 20 20 |ER.....LDY #15 | 00000100: 20 20 20 20 20 20 3B 20 53 45 43 91 44 41 52 59 | ; SEC.DARY| 00000110: 20 41 44 44 52 45 53 53 00 3C 05 C8 00 4A 53 52 | ADDRESS.<...JSR| 00000120: 20 24 46 46 42 41 20 20 20 20 20 20 3B 20 53 45 | $FFBA ; SE| 00000130: 54 20 50 41 52 41 4D 45 54 45 52 53 00 42 05 D2 |T PARAMETERS.B..| 00000140: 00 3B 00 66 05 DC 00 4C 44 41 20 23 33 20 20 20 |.;.f...LDA #3 | 00000150: 20 20 20 20 20 20 3B 20 C3 47 54 48 20 4F 46 20 | ; .GTH OF | 00000160: 46 49 C3 41 4D 45 00 83 05 E6 00 4C 44 58 20 23 |FI.AME.....LDX #| 00000170: B3 49 4E 49 54 A5 20 20 20 3B 20 4C 4F 57 20 42 |.INIT. ; LOW B| 00000180: 59 54 45 00 A1 05 F0 00 4C 44 59 20 23 B1 49 4E |YTE.....LDY #.IN| 00000190: 49 54 A5 20 20 20 3B 20 48 49 47 48 20 42 59 54 |IT. ; HIGH BYT| 000001A0: 45 00 C1 05 FA 00 4A 53 52 20 24 46 46 42 44 20 |E.....JSR $FFBD | 000001B0: 20 20 20 20 20 3B 20 53 45 54 20 46 49 C3 41 4D | ; SET FI.AM| 000001C0: 45 00 DD 05 04 01 4A 53 52 20 24 46 46 43 30 20 |E.....JSR $FFC0 | 000001D0: 20 20 20 20 20 3B 20 9F 20 46 49 4C 45 00 00 06 | ; . FILE...| 000001E0: 0E 01 42 43 43 20 46 49 4E 49 20 20 20 20 20 20 |..BCC FINI | 000001F0: 20 3B 20 8B 20 43 41 52 52 59 20 43 4C 45 41 52 | ; . CARRY CLEAR| 00000200: 00 27 06 18 01 3B 20 20 20 20 20 20 20 20 20 20 |.'...; | 00000210: 20 20 20 20 20 20 45 56 45 52 59 54 48 49 4E 47 | EVERYTHING| 00000220: 20 57 41 53 20 4F 4B 00 4E 06 22 01 4C 44 59 20 | WAS OK.N.".LDY | 00000230: 23 31 31 20 20 20 20 20 20 20 20 3B 20 45 4C 45 |#11 ; ELE| 00000240: 56 45 4E 20 43 48 41 52 41 43 54 45 52 53 00 59 |VEN CHARACTERS.Y| 00000250: 06 2C 01 99 31 20 B2 20 AC 00 78 06 36 01 4C 44 |.,..1 . ..x.6.LD| 00000260: 41 20 45 52 52 54 58 54 2C 59 20 20 20 3B 20 A1 |A ERRTXT,Y ; .| 00000270: 20 91 45 20 43 48 41 52 00 9C 06 40 01 4A 53 52 | .E CHAR...@.JSR| 00000280: 20 24 46 46 44 32 20 20 20 20 20 20 3B 20 53 80 | $FFD2 ; S.| 00000290: 20 49 54 20 A4 20 53 43 52 45 45 4E 00 A4 06 4A | IT . SCREEN...J| 000002A0: 01 44 45 59 00 C4 06 54 01 42 50 4C 20 99 31 20 |.DEY...T.BPL .1 | 000002B0: 20 20 20 20 3B 20 4C 4F 4F 50 20 55 4E 54 49 4C | ; LOOP UNTIL| 000002C0: 20 44 91 45 00 D2 06 5E 01 4C 44 41 20 44 52 56 | D.E...^.LDA DRV| 000002D0: 4E 52 00 F3 06 68 01 B0 41 20 23 24 33 30 20 20 |NR...h..A #$30 | 000002E0: 20 20 20 20 20 3B 20 43 91 56 45 52 54 20 A4 20 | ; C.VERT . | 000002F0: C6 49 49 00 18 07 72 01 4A 53 52 20 24 46 46 44 |.II...r.JSR $FFD| 00000300: 32 20 20 20 20 20 20 3B 20 4F 55 54 50 55 54 20 |2 ; OUTPUT | 00000310: A4 20 53 43 52 45 45 4E 00 1E 07 7C 01 3B 00 2B |. SCREEN...|.;.+| 00000320: 07 86 01 46 49 4E 49 20 B2 20 AC 00 4F 07 90 01 |...FINI . ..O...| 00000330: 4C 44 58 20 23 31 35 20 20 20 20 20 20 20 20 3B |LDX #15 ;| 00000340: 20 46 49 4C 45 20 4E 55 4D 42 45 52 20 31 35 00 | FILE NUMBER 15.| 00000350: 6B 07 9A 01 4A 53 52 20 24 46 46 43 43 20 20 20 |k...JSR $FFCC | 00000360: 20 20 20 3B 20 A0 20 46 49 4C 45 00 85 07 A4 01 | ; . FILE.....| 00000370: 4A 4D 50 20 24 45 33 37 42 20 20 20 20 20 20 3B |JMP $E37B ;| 00000380: 20 99 20 87 59 00 8B 07 AE 01 3B 00 99 07 B8 01 | . .Y.....;.....| 00000390: 44 52 56 4E 52 20 B2 20 AC 00 C1 07 C2 01 2E 42 |DRVNR . .......B| 000003A0: 59 54 45 20 38 20 20 20 20 20 20 20 20 3B 20 44 |YTE 8 ; D| 000003B0: 52 49 56 45 20 45 49 47 48 54 20 B0 20 4E 49 4E |RIVE EIGHT . NIN| 000003C0: 45 00 CF 07 CC 01 49 4E 49 54 A5 20 B2 20 AC 00 |E.....INIT. . ..| 000003D0: EB 07 D6 01 2E C6 20 22 49 30 3A 22 20 20 20 20 |...... "I0:" | 000003E0: 20 3B 20 46 49 C3 41 4D 45 20 A4 00 13 08 E0 01 | ; FI.AME ......| 000003F0: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |; | 00000400: 20 49 4E 49 54 49 41 4C 49 5A 45 20 44 52 49 56 | INITIALIZE DRIV| 00000410: 45 20 30 00 22 08 EA 01 45 52 52 54 58 54 20 B2 |E 0."...ERRTXT .| 00000420: 20 AC 00 38 08 F4 01 2E C6 20 22 20 45 56 49 52 | ..8..... " EVIR| 00000430: 44 20 4B 43 45 48 43 22 00 3F 08 FE 01 2E 80 00 |D KCEHC".?......| 00000440: 00 00 |.. |
....D.. 700.0.N.; "IS THE DISK DRIVE
THERE?".V.X.; U.G THE SYMASS 3.13 ASS
EMBLER.D.... . $0801......BYTE $0A,$08,$
00,$00,$9E,$32......BYTE $30,$36,$31,$00
,$00,$00... .;.O...LDA #15 ; FILE
NUMBER.....LDX DRVNR ; DEVICE NUMB
ER.....LDY #15 ; SEC.DARY ADDRESS
.<.H.JSR $FFBA ; SET PARAMETERS.B.R
.;.F...LDA #3 ; CGTH OF FICAME..
...LDX #.INIT. ; LOW BYTE.....LDY #.IN
IT. ; HIGH BYTE.A...JSR $FFBD ; S
ET FICAME.....JSR $FFC0 ; . FILE...
..BCC FINI ; . CARRY CLEAR.'...;
EVERYTHING WAS OK.N.".LDY
#11 ; ELEVEN CHARACTERS.Y.,..1 .
..X.6.LDA ERRTXT,Y ; . .E CHAR...@.JSR
$FFD2 ; S. IT . SCREEN...J.DEY.D.T
.BPL .1 ; LOOP UNTIL D.E.R.^.LDA DRV
NR...H..A #$30 ; C.VERT . FII...R.
JSR $FFD2 ; OUTPUT . SCREEN...|.;.+
...FINI . ..O...LDX #15 ; FILE NU
MBER 15.K...JSR $FFCC ; FILE.....
JMP $E37B ; . .Y.....;.....DRVNR .
..A.B..BYTE 8 ; DRIVE EIGHT . NIN
E.O.L.INIT. . ....V..F "I0:" ; FICAM
E ......; INITIALIZE DRIV
E 0."...ERRTXT . ..8....F " EVIRD KCEHC"
.?........
> CLICK IMAGE PREVIEW FOR FULL MODAL