History
- Group
- Online -- Germany, founded February 1988
The second numbered crack intro from Online, a German group founded in February 1988 with the tagline "Quality is our slogan." Doc Snyder's page documents this intro with code by Paradroid and ripped music by Fred Gray -- the same team behind several other Online productions. Demozoo catalogues the release under the title "Online Intro (2)," classifying it as both a cracktro and an 8K intro, indicating the entire production fits within eight kilobytes. CSDb lists numerous Online releases under group ID 2837, confirming the group maintained a substantial catalogue of intros, tools, and utilities. The scrolltext preserved on Doc Snyder's page contains placeholder text (lorem ipsum), suggesting the original scrolltext was either lost or never archived. Online has four other ranked entries in this collection: #437 online-01, #379 online-03, online-04, and online-05. The group operated during the peak period of German C64 cracking in the late 1980s.
Sources: Demozoo · Doc Snyder's Page · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:22 // 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: $1000 (4096) // IRQ handler: $1100 (irq_1100) // IRQ handler: $ea31 (irq_ea31) // // Code: 4097 bytes, Data: 59391 bytes // Labels: 566, Subroutines: 22 // // Cross-references: all OK // ============================================ // --- Region $1000-$102c --- .pc = $1000 "main_1000" main_1000: sei lda #$7f sta $dc0d lda #$01 sta $d01a lda #$00 sta $0314 lda #$11 sta $0315 lda #$1b sta $d011 lda #$35 sta $d012 jsr sub_10c0 cli jsr sub_1040 jsr sub_14ce jmp loc_1080 dat_102c: .byte $00 // . // --- Region $1040-$10f6 --- .pc = $1040 "sub_1040" // Referenced by: jsr from $1023, $f761 sub_1040: ldx #$00 loc_1042: lda #$09 sta $0400,x sta $04b8,x sta $d800,x sta $d8b8,x lda #$00 sta $d9b8,x sta $dab8,x sta $dae8,x lda #$20 sta $05b8,x sta $06b8,x sta $06e8,x inx bne loc_1042 ldx #$4f lda #$0e loc_106d: sta $dad0,x dex bpl loc_106d ldx #$15 loc_1075: lda txt_17e0,x sta $0751,x dex bpl loc_1075 rts dat_107f: .byte $00 // . loc_1080: lda $03ff beq loc_1080 dec $03ff jsr sub_189c jsr sub_189c jsr sub_189c jsr sub_189c bit sub_189c jsr sub_1b00 jsr sub_1480 jmp loc_1080 loc_10a0: inc $15 ldx $15 cpx #$c0 bne loc_10ac ldx #$00 stx $15 loc_10ac: ldy #$1e loc_10ae: lda $1380,y sta $1381,y dey bpl loc_10ae lda $1a00,x sta $1380 rts dat_10be: .byte $00,$00 // .. // Referenced by: jsr from $101f, $f75d sub_10c0: lda #$01 sta $14 lda #$00 sta $12 nop sta $23 sta $24 sta $12 sta $1e sta $033b lda #$ff sta $033c lda #$01 sta $0348 sta $0349 sta $034a sta $034b sta $0338 lda #$02 sta $05 lda #$1c sta $1f lda #$00