#913

Hotline [HTL] 13

Hotline [HTL]

698 lines of code

RasterbarsRSTR

History

Released
10 September 1987
Code
Softhunter
Group
Hotline — Netherlands, founded August 1986

Released on 10 September 1987, this is an early production from Hotline — the prolific Dutch cracking group founded in August 1986 under the tagline "Where cracking is an Art." Softhunter coded the intro, and Doc Snyder's page confirms his involvement in multiple Hotline productions. No musician or graphic artist is credited on CSDb, and no SID files are associated with the release. Hotline is one of the most represented groups in the rankings, with entries including #10 HTL-03 and #23 HTL-28. By September 1987, Hotline was already over a year old and had built a reputation through consistent output. The absence of a SID tune was common for 1987-era intros, when many groups prioritized fast loading over musical accompaniment. Hotline's Netherlands base placed them at the heart of one of Europe's most active C64 scene nations, with access to a deep pool of talented musicians including Jeroen Tel and Charles Deenen for later productions.

Sources: CSDb · docsnyderspage

htl-13.asm 698 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:47
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $14ff  (3328 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1018 (4120)
// IRQ handler:  $10e2 (irq_10e2)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 618 bytes, Data: 2710 bytes
// Labels: 72, Subroutines: 2
//
// Cross-references: all OK
// ============================================


// --- Region $1018-$1213 ---
.pc = $1018 "main_1018"

main_1018:
        lda #$00
        sta $0286
        jsr $e544
        sei
        ldy #$00

loc_1023:
        lda $1282,y
        sta $d000,y
        iny
        cpy #$2f
        bne loc_1023
        ldy #$00
        lda #$36

loc_1032:
        clc
        adc #$01
        sta $07f8,y
        iny
        cpy #$08
        bne loc_1032
        ldy #$00
        sty $ff
        sty $fc

loc_1043:
        lda $0d00,y
        sta $04a0,y
        lda #$08
        sta $d800,y
        sta $d8a0,y
        iny
        cpy #$a0
        bne loc_1043
        ldy #$00

loc_1058:
        lda dat_126c,y
        sta $05c2,y
        iny
        cpy #$16
        bne loc_1058
        ldy #$00

loc_1065:
        lda txt_12b1,y
        sta $0636,y
        iny
        cpy #$1e
        bne loc_1065
        lda #$01
        sta $d01a
        sta $dc0d
        lda #$20
        sta $d012
        lda #$e2
        ldy #$10
        sta $0314
        sty $0315
        lda #$a0
        sta $fd
        lda #$15
        sta $fe
        lda #$1b
        sta $d011
        lda #$01
        sta $d019
        cli

loc_109a:
        lda $dc01
        cmp #$ef
        bne loc_109a
        sei
        lda #$f0
        sta $d01a
        lda #$31
        ldy #$ea
        sta $0314
        sty $0315
        cli
        jsr $fda3
        jsr $e518
        lda #$00
        sta $d020
        sta $d021
        jsr $e544
        sei
        inc $01
        ldy #$00

loc_10c8:
        lda loc_119a,y
        sta $0400,y
        iny
        cpy #$18
        bne loc_10c8
        lda #$b9
        ldy #$b9
        sta $2d
        sta $ae
        sty $2e
        sty $af
        jmp $0400

irq_10e2:
        ldx $d012
        inx
        inx
        lda $fe
        sta smc_10f2                                // SMC: modifies $10f2
        lda $fd
        sta smc_10f5                                // SMC: modifies $10f5

loc_10f1:
.label smc_10f2 = * + 1
        lda dat_1000                                // !SMC: modified by $10e9, $110e
.label smc_10f5 = * + 1
        ldy $0da0                                   // !SMC: modified by $10ee, $111d

loc_10f7:
        cpx $d012
        beq loc_10f7
        sta $d022