23M.PAL
FILE INFORMATION
FILENAME(S): 23M.PAL
FILE TYPE(S): PRG
FILE SIZE: 969b
FIRST SEEN: 2025-11-30 18:12:37
APPEARS ON: 1 disk(s)
FILE HASH
53a86c602953fc8655176609d06b257910797c9482cf3261f29bb9822f2ee579
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 1541 DEVELOPMENT | 23M.PAL | PRG | Sailor, Ganheden | 25 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0F 04 64 00 8F 20 32 33 4D 2E 50 41 4C 00 |....d.. 23M.PAL.| 00000010: 15 04 6E 00 8F 00 2F 04 78 00 9F 32 2C 38 2C 32 |..n.../.x..2,8,2| 00000020: 2C 22 40 30 3A 32 33 4D 2E 42 2C 50 2C 57 22 00 |,"@0:23M.B,P,W".| 00000030: 35 04 82 00 8F 00 40 04 8C 00 9E 34 30 39 36 30 |5.....@....40960| 00000040: 00 46 04 96 00 3B 00 54 04 A0 00 2E 4F 50 54 20 |.F...;.T....OPT | 00000050: 50 2C 4F 32 00 5A 04 AA 00 3B 00 67 04 B4 00 AC |P,O2.Z...;.g....| 00000060: B2 20 24 30 35 30 30 00 6D 04 BE 00 3B 00 7A 04 |. $0500.m...;.z.| 00000070: C8 00 4C 44 41 20 23 24 30 34 00 86 04 D2 00 53 |..LDA #$04.....S| 00000080: 54 41 20 24 33 31 00 8C 04 DC 00 3B 00 98 04 E6 |TA $31.....;....| 00000090: 00 4C 44 41 20 24 33 41 00 A0 04 F0 00 54 41 58 |.LDA $3A.....TAX| 000000A0: 00 CC 04 FA 00 49 4E 58 20 20 20 20 20 20 20 20 |.....INX | 000000B0: 20 20 20 20 20 20 20 20 20 20 3B 20 49 4E 43 8F | ; INC.| 000000C0: 45 4E 54 20 43 48 45 43 4B 53 55 4D 00 D4 04 04 |ENT CHECKSUM....| 000000D0: 01 54 58 41 00 E0 04 0E 01 53 54 41 20 24 33 41 |.TXA.....STA $3A| 000000E0: 00 E6 04 18 01 3B 00 0E 05 22 01 4A 53 52 20 24 |.....;...".JSR $| 000000F0: 46 37 38 46 20 20 20 20 20 20 20 20 20 20 20 20 |F78F | 00000100: 3B 20 43 91 56 45 52 54 20 A4 20 47 43 52 00 30 |; C.VERT . GCR.0| 00000110: 05 2C 01 4A 53 52 20 24 46 35 31 30 20 20 20 20 |.,.JSR $F510 | 00000120: 20 20 20 20 20 20 20 20 3B 20 46 49 4E 44 20 D0 | ; FIND .| 00000130: 00 36 05 36 01 3B 00 43 05 40 01 4C 44 58 20 23 |.6.6.;.C.@.LDX #| 00000140: 24 30 38 00 62 05 4A 01 92 47 41 50 20 42 56 43 |$08.b.J..GAP BVC| 00000150: 20 92 47 41 50 20 20 3B 20 92 20 4F 55 54 20 47 | .GAP ; . OUT G| 00000160: 41 50 00 6A 05 54 01 43 4C 56 00 72 05 5E 01 44 |AP.j.T.CLV.r.^.D| 00000170: 45 58 00 7F 05 68 01 42 4E 45 20 92 47 41 50 00 |EX...h.BNE .GAP.| 00000180: 85 05 72 01 3B 00 AD 05 7C 01 4C 44 41 20 23 24 |..r.;...|.LDA #$| 00000190: 46 46 20 20 20 20 20 20 20 20 20 20 20 20 20 3B |FF ;| 000001A0: 20 45 4E 41 42 4C 45 20 57 52 49 54 45 00 BB 05 | ENABLE WRITE...| 000001B0: 86 01 53 54 41 20 24 31 43 30 33 00 C9 05 90 01 |..STA $1C03.....| 000001C0: 4C 44 41 20 24 31 43 30 43 00 D4 05 9A 01 AF 20 |LDA $1C0C...... | 000001D0: 23 24 31 46 00 E0 05 A4 01 B0 41 20 23 24 43 30 |#$1F......A #$C0| 000001E0: 00 EE 05 AE 01 53 54 41 20 24 31 43 30 43 00 FB |.....STA $1C0C..| 000001F0: 05 B8 01 4C 44 41 20 23 24 46 46 00 08 06 C2 01 |...LDA #$FF.....| 00000200: 4C 44 58 20 23 24 30 35 00 16 06 CC 01 53 54 41 |LDX #$05.....STA| 00000210: 20 24 31 43 30 31 00 1E 06 D6 01 43 4C 56 00 3A | $1C01.....CLV.:| 00000220: 06 E0 01 57 52 49 54 45 53 59 4E 43 20 42 56 43 |...WRITESYNC BVC| 00000230: 20 57 52 49 54 45 53 59 4E 43 00 42 06 EA 01 43 | WRITESYNC.B...C| 00000240: 4C 56 00 4A 06 F4 01 44 45 58 00 5C 06 FE 01 42 |LV.J...DEX.\...B| 00000250: 4E 45 20 57 52 49 54 45 53 59 4E 43 00 62 06 08 |NE WRITESYNC.b..| 00000260: 02 3B 00 6F 06 12 02 4C 44 59 20 23 24 42 42 00 |.;.o...LDY #$BB.| 00000270: A4 06 1C 02 4F 56 45 52 46 4C 4F 57 20 4C 44 41 |....OVERFLOW LDA| 00000280: 20 24 30 31 30 30 2C 59 20 3B 20 57 52 49 54 45 | $0100,Y ; WRITE| 00000290: 20 4F 55 54 20 4F 56 45 52 46 4C 4F 57 20 42 55 | OUT OVERFLOW BU| 000002A0: 46 46 45 52 00 B2 06 26 02 92 31 20 42 56 43 20 |FFER...&..1 BVC | 000002B0: 92 31 00 BA 06 30 02 43 4C 56 00 C8 06 3A 02 53 |.1...0.CLV...:.S| 000002C0: 54 41 20 24 31 43 30 31 00 D0 06 44 02 49 4E 59 |TA $1C01...D.INY| 000002D0: 00 E1 06 4E 02 42 4E 45 20 4F 56 45 52 46 4C 4F |...N.BNE OVERFLO| 000002E0: 57 00 0D 07 58 02 42 55 46 46 45 52 20 4C 44 41 |W...X.BUFFER LDA| 000002F0: 20 24 30 34 30 30 2C 59 20 20 20 3B 20 57 52 49 | $0400,Y ; WRI| 00000300: 54 45 20 4F 55 54 20 42 55 46 46 45 52 00 1B 07 |TE OUT BUFFER...| 00000310: 62 02 92 32 20 42 56 43 20 92 32 00 23 07 6C 02 |b..2 BVC .2.#.l.| 00000320: 43 4C 56 00 31 07 76 02 53 54 41 20 24 31 43 30 |CLV.1.v.STA $1C0| 00000330: 31 00 39 07 80 02 49 4E 59 00 48 07 8A 02 42 4E |1.9...INY.H...BN| 00000340: 45 20 42 55 46 46 45 52 00 56 07 94 02 92 33 20 |E BUFFER.V....3 | 00000350: 42 56 43 20 92 33 00 5C 07 9E 02 3B 00 80 07 A8 |BVC .3.\...;....| 00000360: 02 4A 53 52 20 24 46 45 30 30 20 20 20 20 20 20 |.JSR $FE00 | 00000370: 20 20 20 20 20 20 3B 20 45 4E 41 42 4C 45 20 87 | ; ENABLE .| 00000380: 00 86 07 B2 02 3B 00 93 07 BC 02 4C 44 41 20 23 |.....;.....LDA #| 00000390: 24 30 35 00 9F 07 C6 02 53 54 41 20 24 33 31 00 |$05.....STA $31.| 000003A0: AC 07 D0 02 4C 44 41 20 23 24 30 31 00 B8 07 DA |....LDA #$01....| 000003B0: 02 53 54 41 20 24 30 32 00 C6 07 E4 02 4A 4D 50 |.STA $02.....JMP| 000003C0: 20 24 46 39 37 35 00 00 00 | $F975... |
....D.. 23M.PAL...N.../.X..2,8,2,"@0:23M
.B,P,W".5.....@....40960.F...;.T. ..OPT
P,O2.Z...;.G..... $0500.M...;.Z.H.LDA #$
04...R.STA $31.....;.....LDA $3A. ...TAX
.L...INX ; INC.ENT CHEC
KSUM.T...TXA.....STA $3A.....;...".JSR $
F78F ; C.VERT . GCR.0.,.JSR $
F510 ; FIND P.6.6.;.C.@.LDX #
$08.B.J..GAP BVC .GAP ; . OUT GAP.J.T.C
LV.R.^.DEX..H.BNE .GAP...R.;...|.LDA #$
FF ; ENABLE WRITE.....STA $1
C03.I...LDA $1C0C.T.... #$1F......A #$C0
.....STA $1C0C.....LDA #$FF...B.LDX #$05
...L.STA $1C01...V.CLV.:...WRITESYNC BVC
WRITESYNC.B...CLV.J...DEX.\...BNE WRITE
SYNC.B...;.O...LDY #$BB.....OVERFLOW LDA
$0100,Y ; WRITE OUT OVERFLOW BUFFER...&
..1 BVC .1...0.CLV.H.:.STA $1C01.P.D.INY
...N.BNE OVERFLOW...X.BUFFER LDA $0400,Y
; WRITE OUT BUFFER...B..2 BVC .2.#.L.
CLV.1.V.STA $1C01.9...INY.H...BNE BUFFER
.V....3 BVC .3.\...;.....JSR $FE00
; ENABLE ......;.....LDA #$05...F.
STA $31...P.LDA #$01...Z.STA $02.F...JMP
$F975...
> CLICK IMAGE PREVIEW FOR FULL MODAL