History
- Released
- 5 March 1989
- Code
- Ironfist
- Music
- Mike (Michael Hendriks) — "A Little Sample"
- Charset
- Tob
- Group
- A Touch of Class — United States, founded September 1987
Ironfist coded for an American group — unusual given his predominantly British affiliations with Zenith and Public Enemy No. 1. Michael Hendriks (Mike) contributed "A Little Sample," preserved in the HVSC. Tob provided the charset. A Touch of Class was an American group founded in September 1987, one of several US operations that maintained activity into early 1989. Released on 5 March 1989, this represents one of the final moments of competitive American C64 cracking. Ironfist's involvement with ATC alongside his British work demonstrates the international freelance coder market — skilled programmers serving multiple groups across different countries simultaneously. Hendriks' compositions appear across numerous groups of this era, making him one of the most widely-distributed Dutch musicians in the scene.
Sources: CSDb
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:16 // 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: $2947 (irq_2947) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $2830 (irq_2830) // IRQ handler: $0b03 (irq_0b03) // IRQ handler: $2930 (irq_2930) // IRQ handler: $2900 (irq_2900) // // Code: 4328 bytes, Data: 59160 bytes // Labels: 470, Subroutines: 31 // // Cross-references: all OK // ============================================ // --- Region $0803-$0803 --- .pc = $0803 "sub_0803" // Referenced by: jsr from $ffaf sub_0803: brk // --- Region $0810-$082f --- .pc = $0810 "sub_0810" // Referenced by: jsr from $feec sub_0810: .byte $ff,$ff,$03 // isc $03ff,x // ILLEGAL .label sub_0814 = * + 1 .byte $fc,$81,$8c // nop $8c81,x // ILLEGAL sta ($ff,x) .byte $ff,$ff,$c0 // isc $c0ff,x // ILLEGAL .byte $8f,$8f,$8f // sax $8f8f // ILLEGAL cpy #$ff .byte $ff,$ff,$01 // isc $01ff,x // ILLEGAL .byte $fc,$8c,$8c // nop $8c8c,x // ILLEGAL sta ($ff,x) .byte $ff,$ff,$00 // isc $00ff,x // ILLEGAL .byte $ff,$80,$8f // isc $8f80,x // ILLEGAL dat_082e: .byte $80,$ff // .. // --- Region $0a08-$0a9a --- .pc = $0a08 "sub_0a08" // Referenced by: jsr from $2903 sub_0a08: nop nop nop nop nop nop nop nop nop nop nop nop nop nop lda #$ff sta $d015 lda #$00 sta $d01b sta $d01c sta $d010 sta $d01d lda $2b40 .label loc_0a2d = * + 1 sta $d001 lda $2b48 sta $d003 lda $2b50 sta $d005 lda $2b58 sta $d007 lda $2b60 sta $d009 lda $2b68 sta $d00b lda $2b70 sta $d00d lda $2b78 sta $d00f lda $2b90 sta $d000 lda $2b98 sta $d002 lda $2ba0 sta $d004 lda $2ba8 sta $d006 lda $2bb0 sta $d008 lda $2bb8 sta $d00a lda $2bc0 sta $d00c lda $2bc8 sta $d00e ldx #$00 loc_0a8b: lda #$0f sta $07f8,x lda #$01 sta $d027,x inx cpx #$08 bne loc_0a8b rts // --- Region $0ab0-$0ad6 --- .pc = $0ab0 "sub_0ab0" // Referenced by: jsr from $2be6, $fe1f sub_0ab0: ldx #$00 ldy $2b40 loc_0ab5: lda $2b41,x sta $2b40,x inx cpx #$4a bne loc_0ab5 sty $2b89 ldx #$48 ldy $2bd9 loc_0ac8: lda $2b90,x sta $2b91,x dex cpx #$ff bne loc_0ac8 sty $2b90 rts