History
- Group
- 2000 A.D. — CSDb group ID #261
This is the highest-ranked intro from 2000 A.D., sitting at #195 on intros.c64.org. The group is extensively catalogued on CSDb with at least fourteen crack intros under group ID #261, including numbered entries from Intro 01 through Intro 09, a joint release with Jewels, and a party intro. The "2000 A.D. Needs" entry suggests the group actively recruited new members through their intros. No individual credits for code or music are available for this specific release. Comments on intros.c64.org from Bug Guts, Twoflower, Dr.j of The Force, Style of ONS, and Detonator 400 between 2004 and 2013 indicate considerable community interest. The other ranked 2000 A.D. entries are #587 2000 A.D. Intro #2 and #778 2000 A.D. Intro #3. The breadth of their CSDb catalogue underscores 2000 A.D.'s sustained presence in the cracking scene.
Sources: CSDb Group · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:14 // https://restore64.dev by datucker / Rabenauge // // Load address: $0801 End: $0c52 (1106 bytes) // Entry point: $0811 (via BASIC SYS 2065) // IRQ handler: $0983 (irq_0983) // // Code: 571 bytes, Data: 535 bytes // Labels: 41, Subroutines: 0 // // Cross-references: all OK // ============================================ // --- Region $0811-$0996 --- .pc = $0811 "main_0811" main_0811: jsr $ff84 jsr $ff5b jsr $ff8a sei lda #$c1 sta $0318 lda #$05 sta $d022 lda #$0d sta $d023 lda #$80 sta $d020 sta $d021 sta $0286 sta $0291 jsr $e544 ldx #$0f lda #$00 loc_083f: sta $40,x dex bpl loc_083f lda #$30 sta $01 ldy #$00 sty $46 sty $48 lda #$20 sta $47 lda #$f8 sta $49 ldx #$05 loc_0858: lda ($46),y sta ($48),y lda #$ff sta ($46),y lda #$00 sta $2000,y iny bne loc_0858 inc $47 inc $49 dex bne loc_0858 lda #$37 sta $01 ldx #$07 loc_0875: lda #$00 sta $2100,x lda $0ad1,x sta $2108,x dex bpl loc_0875 ldx #$0f loc_0885: lda $0ad9,x sta $0420,x dex bne loc_0885 ldx #$00 ldy #$00 loc_0892: lda $0ae9,x sta $46 loc_0897: asl $46 bcc loc_08a5 lda #$21 sta $04c8,y lda #$09 sta $d8c8,y loc_08a5: iny tya and #$07 bne loc_0897 inx cpx #$19 bne loc_0892 ldx #$18 loc_08b2: lda txt_0b02,x sta $060f,x lda #$01 sta $da0f,x dex bpl loc_08b2 ldx #$77 loc_08c2: txa clc adc #$22 sta $06d0,x dex bpl loc_08c2 ldx #$1b ldy #$0b stx $42 sty $43 sei lda #$7f sta $dc0d and $d011 sta $d011 lda #$01 sta $d019 sta $d01a lda #$00 sta $d012 ldx #$83 ldy #$09 stx $0314 sty $0315 cli loc_08f8: jsr $ffe4