History
- Released
- c. 1986
- Group
- Radwar Enterprises 1941 — Germany, founded November 1985
The third crack intro from Radwar Enterprises 1941 — a German cracking and demo group whose motto was "Pleasure Is Our Business." According to CSDb (group ID 633), Radwar was founded on 20 November 1985 by MWS, AVH, BKA, Flash, and Duke, and remains one of the longest-surviving C64 scene groups with releases spanning 1985 to 2025. Commenters on intros.c64.org praised this intro's logo as "awesome for its time" and "looks pro," calling Radwar "a legendary group." The group produced over 423 documented releases on CSDb, encompassing cracks, demos, tools, and 4K intros. Radwar also organized numerous Radwar Party events from 1988 onward and was affiliated with The Light Circle collective. Key members included coders AVH, MWS, Duke, Crisp, and Crazy, with Flash and BKA contributing cracking and graphics work. A companion Radwar intro appears at #807 RWE-05.
Sources: CSDb — Group · intros.c64.org
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:10 // https://restore64.dev by datucker / Rabenauge // // Load address: $0801 End: $ffff (63487 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $c660 (50784) // IRQ handler: $c63e (irq_c63e) // // Code: 1036 bytes, Data: 62451 bytes // Labels: 115, Subroutines: 3 // // Verification: 5 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $0a18-$0a1d --- .pc = $0a18 "Program $0a18" .byte $4f,$4e,$54 // sre $544e // ILLEGAL eor #$45 .byte $52 // jam // ILLEGAL // --- Region $2020-$2020 --- .pc = $2020 "sub_2020" // Referenced by: jsr from $f5d0, $f5d3, $f5d6, $f5d9, $f5dc, $f5df, $f5e2, $f5e5 sub_2020: brk // --- Region $8dd0-$8dd0 --- .pc = $8dd0 "Segment $8dd0" brk // --- Region $c32a-$c3db --- .pc = $c32a "loc_c32a" loc_c32a: lda #$34 sta $01 ldx #$00 loc_c330: clc rol $d1c2,x rol $d1c1,x rol $d1c0,x rol $d182,x rol $d181,x rol spr_d180,x rol $d142,x rol $d141,x rol spr_d140,x rol $d102,x rol $d101,x rol spr_d100,x rol $d0c2,x rol $d0c1,x rol spr_d0c0,x rol $d082,x rol $d081,x rol spr_d080,x rol $d042,x rol $d041,x rol spr_d040,x rol $d002,x rol $d001,x rol spr_d000,x inx inx inx cpx #$18 bne loc_c330 inc $02 lda $02 cmp #$08 beq loc_c38b jmp loc_c3d5 loc_c38b: lda #$00 sta $02 loc_c38f: ldy #$00 lda ($10),y cmp #$ff beq loc_c3b7 clc asl asl asl tax bcs loc_c3c2 ldy #$00 loc_c3a0: lda dat_c400,x sta $d1c0,y inx iny iny iny cpy #$18 bne loc_c3a0 loc_c3ae: inc $10 bne loc_c3b4 inc $11 loc_c3b4: jmp loc_c3d5 loc_c3b7: lda #$00 sta $10 lda #$c0 sta $11 jmp loc_c38f loc_c3c2: ldy #$00 loc_c3c4: lda $c500,x sta $d1c0,y inx iny iny iny cpy #$18 bne loc_c3c4 jmp loc_c3ae loc_c3d5: lda #$37 sta $01 jmp loc_ea31 // --- Region $c600-$c66d --- .pc = $c600 "loc_c600" loc_c600: lda #$00