History
- Released
- 2 May 1989
- Code
- Anthrax
- Music
- JCH (Jens-Christian Huus) — "Ending"
- Group
- Crazy — Switzerland, founded 6 December 1988
Released on 2 May 1989, this Crazy intro was coded by Anthrax and features music by JCH (Jens-Christian Huus) — specifically his tune "Ending," preserved in the HVSC. The CSDb lists a graphics credit but with no specific handle attached. Crazy was a Swiss group founded on 6 December 1988, placing this release less than five months after the group's formation. JCH was one of the most sought-after SID composers in the scene, and his appearance here demonstrates that even groups from smaller national scenes could attract top-tier musical talent. Another Crazy intro appears in the rankings at #101 Crazy-01, coded by Magic Man — indicating the group had multiple capable coders. Switzerland's C64 scene was modest compared to neighbouring Germany's, but Crazy's presence in the rankings confirms that quality work emerged from across Europe's smaller scenes. The group's catalogue reached at least six numbered entries in its first few months of activity.
Sources: CSDb
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:14 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $ffff (63488 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $2800 (10240) // IRQ handler: $2900 (irq_2900) // IRQ handler: $ea31 (irq_ea31) // // Code: 3904 bytes, Data: 59584 bytes // Labels: 477, Subroutines: 5 // // Verification: 6 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $0a00-$0aa2 --- .pc = $0a00 "sub_0a00" // Referenced by: jsr from $29ed, $fff7 sub_0a00: inc $40 ldy $40 cpy #$b5 bne loc_0a0c ldy #$00 sty $40 loc_0a0c: lda dat_0b00,y sta smc_292c // SMC: modifies $292c inc $41 ldy $41 cpy #$b5 bne loc_0a1e ldy #$00 sty $41 loc_0a1e: lda dat_0b00,y clc adc #$50 sta $d001 sta $d003 sta $d005 sta $d007 sta $d009 sta $d00b lda smc_292c cmp #$36 bne loc_0a42 lda #$00 sta $d01b loc_0a42: cmp #$01 bne loc_0a4b dat_0a46: .byte $a9,$3f,$8d,$1b,$d0 // .?... loc_0a4b: inc $42 ldy $42 cpy #$59 bne loc_0a57 ldy #$00 sty $42 loc_0a57: lda $0d60,y sta smc_2996 // SMC: modifies $2996 inc $13 ldy $13 cpy #$1f bne loc_0a69 ldy #$00 sty $13 loc_0a69: lda $0de0,y sta smc_0c8b // SMC: modifies $0c8b dec $14 beq loc_0a76 jmp loc_0aa0 loc_0a76: ldx #$00 ldy $0d32 loc_0a7b: lda $0d33,x sta $0d32,x inx cpx #$07 bne loc_0a7b sty $0d39 lda #$04 sta $14 ldy $0d29 ldx #$06 loc_0a92: lda $0d22,x sta $0d23,x dex cpx #$ff bne loc_0a92 sty $0d22 loc_0aa0: jmp loc_0c00 // --- Region $0c00-$0cc4 --- .pc = $0c00 "loc_0c00" loc_0c00: dec $43 beq loc_0c0a jsr sub_0c11 jmp loc_0c00 loc_0c0a: .label smc_0c0b = * + 1 lda #$03 // !SMC: modified by $0c4e, $0c5a, $0c66, $0c72 sta $43 jmp loc_0c80 // Referenced by: jsr from $0c04, $e8eb sub_0c11: dec $44 lda $44 cmp #$bf bne loc_0c44 ldx #$00 loc_0c1b: lda $0591,x sta $0590,x inx cpx #$27 bne loc_0c1b ldy #$00