#816

Street Children [SCHN] 01

Street Children [SCHN]

2.323 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
June 1994
Code
Skyhawk
Music
PRI (Volker Meitz)
Graphics
Coyote
Charset
Bizzmo
Group
Street Children — Poland

This June 1994 intro from Street Children features code by Skyhawk, music by PRI (Volker Meitz), graphics by Coyote, and a charset by Bizzmo. The SID tune is "Weird Techno," preserved in the HVSC. Street Children operated under the abbreviation SCHN and was based in Poland, though their founding date is unrecorded. PRI — a German musician whose real name was Volker Meitz — composed prolifically for various groups, and his appearance here reflects the international exchange of SID tunes that characterized the early 1990s scene. The June 1994 release date places this intro well into the C64's post-commercial era, when the platform's creative communities were sustained primarily by enthusiasm rather than market forces. Poland's scene remained particularly active during this period, producing new groups and releases when many other national communities had moved on to the Amiga or PC.

Sources: CSDb

schn-01.asm 2.323 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: $3841  (12354 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0803 (2051)
// IRQ handler:  $085e (irq_085e)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 2201 bytes, Data: 10153 bytes
// Labels: 229, Subroutines: 14
//
// Cross-references: all OK
// ============================================


// --- Region $0803-$09fd ---
.pc = $0803 "main_0803"

main_0803:
        jsr $e544
        jsr sub_0966
        jsr sub_09d8
        sei
        lda #$00
        tax
        tay
        jsr sub_1000
        lda #$12
        sta $d022
        ldy #$00

loc_081b:
        lda #$0d
        sta $d800,y
        sta $d900,y
        sta $da00,y
        lda #$0b
        sta $db00,y
        iny
        bne loc_081b
        ldy #$00

loc_0830:
        lda #$0b
        sta $da58,y
        iny
        bne loc_0830
        lda #$03
        sta $d023
        ldy #$01
        sty $d01a
        dey
        lda #$7f
        sty $dc0e
        sta $dc0d
        lda #$5e
        sta $0314
        lda #$08
        sta $0315
        lda #$00
        sta $d012
        cli

loc_085b:
        jmp loc_085b
irq_085e: {
        inc $d019
        lda #$a8
        sta $d018
        lda #$d8
        sta $d016
        jsr sub_1003
        jsr sub_0909
        lda #$4b
loop1:
        cmp $d012
        bne loop1
        ldy #$03
loop2:
        dey
        bne loop2
        lda #$01
        sta $d020
        sta $d021
        ldy #$0a
loop3:
        dey
        bne loop3
        lda #$00
        sta $d020
        sta $d021
        jsr sub_097b
        lda #$af
loop4:
        cmp $d012
        bne loop4
        ldy #$0b
loop5:
        dey
        bne loop5
        lda #$01
        sta $d020
        sta $d021
        ldy #$0a
loop6:
        dey
        bne loop6
        lda #$0b
        sta $d020
        sta $d021
        lda $095c
        sta $d016
        lda #$1c
        sta $d018
        lda #$01
        sta $d021
        jsr sub_09ed
        lda #$d2
loop7:
        cmp $d012
        bne loop7
        ldy #$0a
loop8:
        dey
        bne loop8
        lda $09ce
        sta $d016
        jsr sub_0a16
        lda #$ff
loop9:
        cmp $d012
        bne loop9
        ldy #$0a
loop10:
        dey
        bne loop10
        lda #$01
        sta $d020
        ldy #$0c
loop11:
        dey
        bne loop11
        lda #$0c
        sta $d020