Le jeu Guiness des records
(c) 1984, Guiness Superlatives
(c) 1984, Numˇro 1 et Ediciel

Disk structure
This is a standard double-sided 16-sec Pascal diskette.
It can be copied. The game (please boot side B) does not start.

Protection type
There is a desync after the header prolog where a #$60 is hidden.
The return value is #$FF is the disk is original, and #$00 with a copy

How to find the protection
With Pascal disks, protection makers tend to consider slot 6 as a standard and use $C0EC and not $C08C.
If we search AD EC C0 with Disk Fixer v4 set on the Pascal disk type, we find the string in T22/SA and T22/SB.
The disassembly will explain the protection check.

How to crack
Read T22/SA
At offset $F0: 4C -> 4A
We exit at $13B instead of $13D. Therefore, we exit with TRUE (#$FF) and not FALSE ($00)

Reboot, and... enjoy,

LoGo
9/2026

Protection check disassembly

00D4:68             PLA	; entry point
00D5:85 00          STA   $00
00D7:68             PLA
00D8:85 01          STA   $01
00DA:68             PLA
00DB:68             PLA
00DC:68             PLA
00DD:68             PLA
00DE:2C E9 C0       BIT   $C0E9	; start drive
00E1:A9 51          LDA   #$51	; set retry counter
00E3:85 04          STA   $04
00E5:C6 06          DEC   $06
00E7:D0 1A          BNE   $0103
00E9:C6 04          DEC   $04
00EB:D0 16          BNE   $0103
00ED:A9 00          LDA   #$00	; exit with error
00EF:F0 4C          BEQ   $013D
00F1:AD EC C0       LDA   $C0EC	; read D5AA96
00F4:10 FB          BPL   $00F1
00F6:C9 D5          CMP   #$D5
00F8:D0 EB          BNE   $00E5
00FA:AD EC C0       LDA   $C0EC
00FD:10 FB          BPL   $00FA
00FF:C9 AA          CMP   #$AA
0101:D0 E2          BNE   $00E5
0103:AD EC C0       LDA   $C0EC
0106:10 FB          BPL   $0103
0108:C9 96          CMP   #$96
010A:D0 D9          BNE   $00E5
010C:A0 0A          LDY   #$0A
010E:AD EC C0       LDA   $C0EC	; read FF
0111:10 FB          BPL   $010E
0113:C9 FF          CMP   #$FF
0115:D0 CE          BNE   $00E5
0117:48             PHA	; lose time
0118:68             PLA
0119:AD EC C0       LDA   $C0EC	; and desync
011C:C9 08          CMP   #$08
011E:B0 C5          BCS   $00E5
0120:AD EC C0       LDA   $C0EC	; read 10 nibbles
0123:10 FB          BPL   $0120
0125:85 02          STA   $02	; save each value
0127:88             DEY
0128:F0 0B          BEQ   $0135
012A:AD EC C0       LDA   $C0EC
012D:10 FB          BPL   $012A
012F:45 02          EOR   $02
0131:D0 F2          BNE   $0125
0133:F0 F0          BEQ   $0125
0135:A5 02          LDA   $02	; last one is #$60
0137:49 60          EOR   #$60
0139:D0 AA          BNE   $00E5	; if not, loop
013B:A9 FF          LDA   #$FF	; it is, exit with success
013D:2C E8 C0       BIT   $C0E8
0140:48             PHA
0141:48             PHA
0142:A5 01          LDA   $01
0144:48             PHA
0145:A5 00          LDA   $00
0147:48             PHA
0148:60             RTS

T22/S0A/F0: 4C -> 4A