History
- Released
- 30 November 1989
- Code
- Stormbringer
- Group
- Exodus — United States, founded June 1988
Released on 30 November 1989, this Exodus intro — described on CSDb as having "plain looks" — was coded by Stormbringer, one of the group's key technical members. Exodus was an American cracking group founded in June 1988, operating under the tagline "the future is ours." Stormbringer coded multiple intros for the group, including productions documented on Doc Snyder's page alongside fellow members Grim Reaper and Warewolf. The intro's deliberately minimalist visual approach sets it apart from more elaborate productions of the era, relying on a simple charset with no credited music. Exodus maintained strong connections to both the American and European scenes, with scrolltexts across their intros referencing NATO, Fairlight, Hotline, and INC among their allies. This is one of several Exodus entries in the collection, alongside #40 exodus-03 and #96 exodus-08. The group's BBS numbers — spanning Michigan, Washington, and Florida — reveal a geographically dispersed operation typical of American cracking crews.
Sources: CSDb · docsnyderspage
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:22 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $e7ff (57344 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $1000 (4096) // IRQ handler: $114c (irq_114c) // IRQ handler: $ea86 (nmi_ea86) // IRQ handler: $10c0 (irq_10c0) // // Code: 935 bytes, Data: 56409 bytes // Labels: 125, Subroutines: 11 // // Cross-references: all OK // ============================================ // --- Region $1000-$1002 --- .pc = $1000 "main_1000" main_1000: jmp loc_1240 // --- Region $1026-$1312 --- .pc = $1026 "sub_1026" // Referenced by: jsr from $1240 sub_1026: { sei lda #$0b sta $d011 jsr $e544 lda #$fa sta $d012 lda #$4c ldx #$11 sta $0314 stx $0315 lda #$86 ldx #$ea sta $0318 stx $0319 lda $d011 and #$7f sta $d011 lda #$7f sta $dc0e ldy #$00 lda #$01 loop1: sta $d9b8,y iny cpy #$f0 bne loop1 lda #$01 sta $d019 sta $d01a lda #$00 sta $d020 sta $d021 sta $1004 lda #$02 sta $1008 sta $1021 sta $1009 ldy #$00 tya loop2: sta $e000,y sta $e100,y sta $e200,y sta $e300,y sta $e400,y sta $e500,y sta $e600,y sta $e700,y iny bne loop2 jsr sub_12b6 jsr sub_1237 ldy #$00 lda #$20 loop3: sta $3c00,y sta $3d00,y iny cpy #$f0 bne loop3 lda $0c00 sta dat_1003 jsr sub_11cb jsr sub_13c1 cli rts } irq_10c0: ldy dat_1003 ldx $d012 pha pla lda #$c8 sta $d016 loc_10cd: cpx $d012 beq loc_10cd inx dey bpl loc_10cd lda #$1f ldx $d012 loc_10db: cpx $d012 beq loc_10db sta $d018 inx lda dat_1003 and #$07 ora #$10 sta $d011 txa ldx #$13 adc #$08 loc_10f3: cmp $d012 bne loc_10f3 stx $d018 lda $d012 ldy dat_1003 cpy #$2f bcs loc_1111 clc adc #$2f sec sbc dat_1003 loc_110c: cmp $d012 bne loc_110c loc_1111: lda #$1f