; da65 V2.19 - Git f166ca8
; Created:    2026-02-12 11:34:57
; Input file: D:\DEV\CardGamesC64\CARD_Games_C64\Dev\Poker4-it\prg-a-poker-4.prg
; Page:       1


        .setcpu "6502"

        brk
        rti

        ldx     #$00
        ldy     #$60
        stx     $FB
        sty     $FC
        ldx     #$00
        ldy     #$E0
        stx     $FD
        sty     $FE
        ldx     #$20
L4014:  ldy     #$00
L4016:  lda     ($FB),y
        sta     ($FD),y
        iny
        bne     L4016
        inc     $FC
        inc     $FE
        dex
        bne     L4014
        ldx     #$40
        ldy     #$7F
        stx     $FB
        sty     $FC
        ldx     #$00
        ldy     #$C8
        stx     $FD
        sty     $FE
        ldx     #$04
L4036:  ldy     #$00
L4038:  lda     ($FB),y
        sta     ($FD),y
        iny
        bne     L4038
        inc     $FC
        inc     $FE
        dex
        bne     L4036
        ldx     #$28
        ldy     #$83
        stx     $FB
        sty     $FC
        ldx     #$00
        ldy     #$CC
        stx     $FD
        sty     $FE
        ldx     #$04
L4058:  ldy     #$00
L405A:  lda     ($FB),y
        sta     ($FD),y
        iny
        bne     L405A
        inc     $FC
        inc     $FE
        dex
        bne     L4058
        lda     $8710
        sta     $CFFF
        rts

