#753

Hotline [HTL] 34

Hotline [HTL]

516 lines of code

RasterbarsRSTRBitmapBMAP

History

Released
November 1990
Group
Hotline — Netherlands, founded August 1986

A Hotline intro from November 1990, catalogued on CSDb but without specific credits for code, graphics, or music. Hotline was a prolific Dutch cracking group founded in August 1986 under the tagline "Where cracking is an Art." Doc Snyder's page documents a rotating roster of coders — The Silver Surfer, BOD, Coco, The Mercenary Cracker, and Softhunter — alongside musicians like Jeroen Tel, Holly, EVS, Charles Deenen, and Marc Buttery. The group is one of the most represented in the rankings, with entries including #5 HTL-03, #60 HTL-28, and #66 HTL-02 among many others. By November 1990, Hotline had been active for over four years — a substantial run during the C64's peak cracking era. The Netherlands produced several strong groups during this period, and Hotline's ability to draw on top Dutch and international SID composers was central to the quality of their intros. Their scrolltexts — preserved across multiple entries — reveal an extensive network of contacts spanning the UK, Scandinavia, and Germany.

Sources: CSDb · docsnyderspage

htl-34.asm 516 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:18
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $dbff  (54272 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $09a1 (2465)
// IRQ handler:  $0b1f (irq_0b1f)
// IRQ handler:  $0a48 (nmi_0a48)
//
// Code: 488 bytes, Data: 53784 bytes
// Labels: 60, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $09a1-$0b7c ---
.pc = $09a1 "main_09a1"

main_09a1:
        sei
        lda #$77
        sta $01
        jsr $fda3
        jsr sub_0a92
        jsr sub_0ae7
        ldy #$00
        sty $d020
        sty $d021
        sty $dc0e
        iny
        sty $d01a
        sty $d019
        ldx #$2a
        ldy #$04
        lda #$09
        jsr sub_0a4c
        lda #$a6
        jsr sub_0d00
        lda #$1f
        ldx #$0b
        sta $0314
        stx $0315
        lda #$48
        ldx #$0a
        sta $0318
        stx $0319
        lda #$a4
        ldx #$0b
        sta $f6
        stx $f7
        ldx #$27

loc_09ed:
        lda #$07
        sta $da58,x
        lda #$20
        sta $0658,x
        dex
        bpl loc_09ed
        cli
        lda #$00
        sta $fb

loc_09ff:
        ldx $fb
        inx
        cpx #$0c
        bne loc_0a08
        ldx #$00

loc_0a08:
        stx $fb
        lda $0b98,x                                 // !SMC: modified by $0af2
        ldx #$01
        ldy #$04
        jsr sub_0a4c

loc_0a14:
        bit $d011
        bmi loc_0a14

loc_0a19:
        bit $d011
        bpl loc_0a19
        lda #$ef
        cmp $dc01
        bne loc_09ff
        jsr $ff5b
        lda #$08
        jsr $ffb1
        lda #$6f
        jsr $ff93
        lda #$49
        jsr $ffa8
        jsr $edfe
        ldx #$00

loc_0a3c:
        lda sub_0d00,x
        sta $02a7,x
        inx
        bne loc_0a3c
        jmp $fce2

nmi_0a48:
        lda $dc0d
        rti

// Referenced by: jsr from $09c7, $0a11
sub_0a4c: {
        sta $f8
        stx $fe
        sty $ff
        ldx #$00
        ldy #$09
        stx $fc
        sty $fd
        ldy #$00
loop:
        lda ($fc),y
        beq loc_0a88
        tax
        lsr
        lsr
        lsr
        lsr
        jsr sub_0a74
        txa
        jsr sub_0a74
        inc $fc
        bne skip
        inc $fd
skip:
        bne loop
}
// Referenced by: jsr from $0a65, $0a69

sub_0a74:
        and #$0f
        cmp #$03
        beq loc_0a82
        jsr sub_0a89
        lda $f8
        jsr sub_0a89