← #384 Top 1024 #386 →
#385

Scouse Cracking Group [SCG] 01

Scouse Cracking Group [SCG]

2.446 lines of code

RasterbarsRSTRScrollerSCRL
Disassemble Download .asm Download .prg intros.c64.org

History

Released
16 September 1988
Code
Chunk
Group
Scouse Cracking Group — United Kingdom, founded July 1986

Chunk coded this intro for the Scouse Cracking Group, released on 16 September 1988. No music or graphics credits are listed on CSDb, indicating a straightforward code-only production. SCG was founded in Liverpool in July 1986, and the group name — derived from "Scouse," the dialect and identity of Liverpudlians — made their geographic origin unmistakable. Chunk also coded #178 SCG-05, the group's other ranked intro from July 1987, confirming his role as SCG's primary programmer. The group does not appear on Doc Snyder's page, Demozoo, or in the major scene press archives, leaving CSDb and intros.c64.org as the primary sources. SCG's regional pride in their name was distinctive for a British group; most UK outfits of the era adopted generic or aggressive names rather than geographic identifiers. The two-year gap between SCG-05 (1987) and this intro (1988) shows continued activity during the group's peak period.

Sources: CSDb · intros.c64.org

scg-01.asm 2.446 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:43
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $0812 (via BASIC SYS 2066)
// Entry point:  $0334 (820)
// IRQ handler:  $1084 (irq_1084)
// IRQ handler:  $1200 (irq_1200)
// IRQ handler:  $1083 (nmi_1083)
// IRQ handler:  $12a1 (loc_12a1)
// IRQ handler:  $12cb (loc_12cb)
//
// Code: 1801 bytes, Data: 61687 bytes
// Labels: 295, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $09e9-$09e9 ---
.pc = $09e9 "loc_09e9"

loc_09e9:
        brk

// --- Region $09f9-$0a0f ---
.pc = $09f9 "loc_09f9"

loc_09f9:
        jsr sub_8040
        sty $78f8
        bpl loc_0a01

loc_0a01:
        brk

dat_0a02:
        .byte $ff,$aa,$aa,$55,$00,$00,$80           // ...U...

loc_0a09:
        cpy #$c0
        cpy #$c0
        rts

dat_0a0e:
        .byte $60                                   // `

loc_0a0f:
        rts

// --- Region $0a19-$0a29 ---
.pc = $0a19 "loc_0a19"

loc_0a19:
        cpy #$60
        bmi loc_0a4d
        bmi loc_0a0f
        beq loc_0a21

loc_0a21:
        cpy #$60
        rts

dat_0a24:
        .byte $30,$30,$30                           // 000

loc_0a27:
        bmi loc_09e9
        rts

// --- Region $0a4d-$0a4d ---
.pc = $0a4d "loc_0a4d"

loc_0a4d:
        brk

// --- Region $0a5f-$0a5f ---
.pc = $0a5f "loc_0a5f"

loc_0a5f:
        brk

// --- Region $0a73-$0ace ---
.pc = $0a73 "loc_0a73"

loc_0a73:
        bmi loc_0aa5
        bmi loc_0aa7
        bmi loc_09f9
        cpy #$60
        bmi loc_0aad
        bmi loc_0aaf
        bmi loc_0a01
        cpy #$60
        bmi loc_0ab5
        bmi loc_0ab7
        bvs loc_0a09
        cpy #$60
        bmi loc_0abd
        bmi loc_0abf
        bmi loc_0a91

loc_0a91:
        cpy #$60
        bmi loc_0ac5
        bmi loc_0ac7
        bvs loc_0a19
        cpy #$60
        bmi loc_0acd
        beq loc_0a5f
        rts

dat_0aa0:
        .byte $e0,$30,$30,$30,$f0                   // .000.

loc_0aa5:
        beq loc_0a27

loc_0aa7:
        .byte $80,$c0                               // nop #$c0 // ILLEGAL
        rts

dat_0aaa:
        .byte $60,$60,$60                           // ```

loc_0aad:
        rts

dat_0aae:
        .byte $60                                   // `

loc_0aaf:
        rts

dat_0ab0:
        .byte $e0                                   // .

loc_0ab1:
        bmi loc_0ae3
        bmi loc_0ae5

loc_0ab5:
        bmi loc_0b27

loc_0ab7: