← #22 Top 1024 #24 →
#23

Hotline [HTL] 28

Hotline [HTL]

5.305 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT
Disassemble Download .asm Download .prg intros.c64.org

History

Released
21 June 1990
Code
Custard and Boomboo
Graphics
Orc
Music
Tunes by JCH (Jens-Christian Huus) and EVS (Edwin van Santen)
Group
Hotline — Netherlands, founded August 1986

Ranked #23 on intros.c64.org, this is a late-era Hotline release — catalogued on CSDb as "Hotline Intro 28" and dated 21 June 1990. Custard and Boomboo share code credit, Orc produced the graphics, and the soundtrack is a multi-tune player drawing on two prolific scene composers. JCH — Jens-Christian Huus — contributed "X-Ray" and "Hitsong," while EVS — Edwin van Santen — supplied "Groove Is in the Heart," "Paradise" and "(S)addamski's Killer." All five tunes are preserved in the HVSC under their composer directories. Released nearly four years after Hotline's founding in August 1986, this intro sits within the group's long-running numbered sequence and demonstrates how later intros grew from simple single-tune cards into multi-SID jukebox players with multiple coders. Doc Snyder's page for Hotline lists many sibling intros but carries no section confirmed to match this specific release.

Sources: CSDb · docsnyderspage

htl-28.asm 5.305 lines
// ============================================
// output - Part 1 of 2
// ============================================
// 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:  $1914 (6420)
// IRQ handler:  $1955 (irq_1955)
//
// Code: 5396 bytes, Data: 58092 bytes
// Labels: 591, Subroutines: 24
//
// Cross-references: all OK
// ============================================


// --- Region $0e01-$0e01 ---
.pc = $0e01 "Program $0e01"
        .byte $02                                   // jam // ILLEGAL

// --- Region $0f06-$0f06 ---
.pc = $0f06 "Program $0f06"
        brk

// --- Region $0f14-$0f14 ---
.pc = $0f14 "Program $0f14"
        brk

// --- Region $1000-$11ed ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1936, $eed4

sub_1000:
        jmp loc_100d
// Referenced by: jsr from $1947, $eee5

sub_1003:
        jmp loc_1035

dat_1006:
        .byte $0f,$c2,$e2,$27,$16,$16,$17           // ...'...

loc_100d:
        ldx #$05

loc_100f:
        lda $1007,x
        sta $1007,x
        dex
        bpl loc_100f
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        ldy #$00
        tya

loc_1023:
        sta $d400,y
        sta dat_153e,y
        iny
        cpy #$1b
        bne loc_1023
        lda dat_1006
        sta $d418
        rts

loc_1035:
        lda $fb
        pha
        lda $fc
        pha
        ldx #$02
        dec $15a0
        bpl loc_1048
        lda $15a1
        sta $15a0

loc_1048:
        bne loc_104f
        dec $153b,x
        bmi loc_105a

loc_104f:
        lda $154a,x
        bne loc_1057
        jmp loc_121f

loc_1057:
        jmp loc_1139

loc_105a:
        lda $1553,x
        sta $153b,x
        lda #$00
        sta $1550,x

loc_1065:
        lda $1519,x
        sta $fb
        lda $151c,x
        sta $fc
        ldy #$00
        lda ($fb),y
        bpl loc_10a3
        cmp #$ff
        bne loc_1093
        lda $151f,x
        sta $1519,x
        sta $fb
        lda $1522,x
        sta $151c,x
        sta $fc
        ldy #$00
        lda ($fb),y
        bpl loc_10a3
        cmp #$ff
        beq loc_10a4

loc_1093:
        and #$7f
        asl
        sta $1541,x
        inc $1519,x
        bne loc_1065
        inc $151c,x
        bne loc_1065

loc_10a3:
        tay

loc_10a4:
        lda $169e,y
        sta $fb
        lda $16b0,y
        sta $fc

loc_10ae:
        ldy $1544,x
        lda ($fb),y
        bmi loc_10ef
        beq loc_10e4