#197

Hotline [HTL] 41

Hotline [HTL]

3.752 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
3 November 1988
Code
The Silver Surfer
Music
Charles Deenen — "Smooth Criminal"
Graphics
The Syndicate
Group
Hotline — Netherlands, founded August 1986

Identical team to #10 HTL-03 — The Silver Surfer coding, Charles Deenen on music, The Syndicate providing graphics. CSDb lists this as "Hotline Intro 41" — the highest numbered Hotline intro in the ranking, indicating the group produced over forty intros across their active years. The same "Smooth Criminal" SID and November 1988 release date as HTL-03 confirm these are visual variants from the same production session. Hotline's prolific numbering system — reaching 41+ intros — reflects their extraordinary output over two years of continuous activity since their August 1986 founding. The HVSC preserves Deenen's composition. Doc Snyder's page documents the complete numbered Hotline sequence. The group's consistent team of Silver Surfer/Deenen/Syndicate represents one of the scene's most stable production units.

Sources: CSDb · docsnyderspage

htl-41.asm 3.752 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59: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:  $1700 (5888)
// IRQ handler:  $170c (irq_170c)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 3700 bytes, Data: 59788 bytes
// Labels: 389, Subroutines: 16
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0818 ---
.pc = $0814 "Program $0814"
        clv
        txs
        inx
        txs
        brk

// --- Region $090d-$090d ---
.pc = $090d "Program $090d"
        brk

// --- Region $09f0-$09f2 ---
.pc = $09f0 "Program $09f0"
        lda ($00,x)
        brk

// --- Region $0a2b-$0f5e ---
.pc = $0a2b "loc_0a2b"

loc_0a2b:
        ldx #$01
        stx $0a69
        inx
        stx $49
        ldy #$f1
        sty $d417
        ldy #$1f
        sty $d418
        ldx #$2f

loc_0a3f:
        sta $02,x
        sta $cf,x
        dex
        bpl loc_0a3f
        ldx #$21

loc_0a48:
        sta $2e,x
        dex
        bpl loc_0a48
        inx
        stx $e8
        stx $e9
        stx $ea
        sta $0a69
        lda #$00
        ldx #$14

loc_0a5b:
        sta $d400,x
        dex
        bpl loc_0a5b
        rts

dat_0a62:
        .byte $ee,$69,$0a,$4c,$57,$0a               // .i.LW.
// Referenced by: jsr from $1884

sub_0a68:
        lda #$00
        beq loc_0a6d

dat_0a6c:
        .byte $60                                   // `

loc_0a6d:
        lda #$02
        tax
        dec $49
        bpl loc_0a76
        sta $49

loc_0a76:
        stx $0a
        inc $e8,x
        ldy $0a28,x
        sty $0b
        lda $49
        cmp #$02
        beq loc_0a88
        jmp loc_0c4c

loc_0a88:
        txa
        asl
        tax
        lda $1138,x
        sta smc_0aa3                                // SMC: modifies $0aa3
        lda $1139,x
        sta smc_0aa4                                // SMC: modifies $0aa4
        ldx $0a
        dec $fa,x
        bmi loc_0aa0
        jmp loc_0c2a

loc_0aa0:
        ldy $1f,x
.label smc_0aa3 = * + 1
.label smc_0aa4 = * + 2
        lda $133d,y                                 // !SMC: modified by $0a8e, $0a94
        cmp #$ff
        bne loc_0ab3
        lda #$00
        sta $fa,x
        sta $1f,x
        sta $f7,x
        beq loc_0aa0

loc_0ab3:
        sta $44
        cmp #$40
        bcc loc_0ad4

loc_0ab9:
        cmp #$80
        bcc loc_0ac9
        and #$1f
        clc
        adc #$00
        sta $eb,x
        inc $1f,x
        jmp loc_0aa0

loc_0ac9:
        lda $44
        and #$3f
        sta $4b,x