#717

Bert 01

Bert

525 lines of code

RasterbarsRSTRSpritesSPRT

History

Group
Bert

The sole indexed intro from Bert — an entity whose CSDb release match points to a collection rather than a traditional crack intro. Despite its catalogue association, disassembly of the actual binary reveals no SID register writes — the intro runs silent. The CSDb entry lists no coding credit, and the scener profile associated with the release returned no additional handle or country data. It remains unclear whether "Bert" refers to a group or an individual scener releasing under their own name — the simple first-name handle is somewhat unusual in scene catalogues where most entries carry elaborate group titles. The visual presentation stands on its own as a minimal text-based production typical of smaller operations. Without coding, graphics, or other verifiable credits, Bert remains one of the more obscure entries in the crack intro archives. The entry attracted a single comment from Rough in 2007 on intros.c64.org.

Sources: CSDb · intros.c64.org

bert-01.asm 525 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:11
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $0cbf  (1215 bytes)
// Entry point:  $0900 (via BASIC SYS 2304)
//
// Code: 517 bytes, Data: 698 bytes
// Labels: 45, Subroutines: 1
//
// Cross-references: all OK
// ============================================


// --- Region $082b-$0869 ---
.pc = $082b "loc_082b"

loc_082b:
        lda #$07
        sta $d027
        lda #$02
        sta $d028
        lda #$06
        sta $d029
        lda #$08
        sta $d02a
        nop
        ldx #$0c
        ldy #$05
        clc
        jsr $fff0
        ldx #$00
        ldy #$00

loc_084c:
        lda $0870,y
        jsr $ffd2
        jsr sub_099f
        iny
        cpy #$90
        bne loc_084c

loc_085a:
        inc $d020
        jsr $ffe4
        beq loc_085a
        lda #$00
        sta $d015
        jmp loc_0a80

// --- Region $0900-$0aca ---
.pc = $0900 "main_0900"

main_0900:
        lda #$00
        sta $d020
        sta $d021
        lda #$93
        jsr $ffd2
        lda #$07
        sta $d027
        lda #$02
        sta $d028
        lda #$06
        sta $d029
        lda #$08
        sta $d02a
        lda #$00
        sta $05
        sta $03
        lda #$0f
        sta $d015

loc_092c:
        lda #$2c
        sta $07f8
        lda #$2d
        sta $07f9
        lda #$2e
        sta $07fa
        lda #$2f
        sta $07fb
        lda #$0f
        sta $d01d
        sta $d017

loc_0948:
        lda #$50
        sta $d000
        lda #$80
        sta $d002
        lda #$b0
        sta $d004
        lda #$e0
        sta $d006

loc_095c:
        inc $d000
        inc $d000
        inc $d000
        inc $d002
        dec $d006
        dec $d006
        dec $d006
        dec $d004
        jsr sub_099f
        lda $d000
        cmp #$e0
        bne loc_095c
        lda $07f8
        cmp #$2f
        bne loc_0988
        jmp loc_0a4f

loc_0988:
        lda #$2f
        sta $07f8
        lda #$32
        sta $07f9
        lda #$31
        sta $07fa
        lda #$30
        sta $07fb
        jmp loc_0a38
// Referenced by: jsr from $0852, $0974, $09e6, $09fc

sub_099f:
        ldx #$0b
        lda #$00
        sta $02

loc_09a5:
        inc $02
        lda $02
        cmp #$ff
        bne loc_09a5
        dex
        cpx #$00
        bne loc_09a5

smc_09b2:
        nop                                         // !SMC: modified by $09dd
        lda $d001
        cmp #$d0
        bne loc_09bd
        jmp loc_09ca