← #580 Top 1024 #582 →
#581

Hotline [HTL] 35

Hotline [HTL]

2.752 lines of code

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

History

Released
20 July 1988
Code
The Silver Surfer
Music
Jeroen Tel — "S-Express"
Group
Hotline — Netherlands, founded August 1986

The Silver Surfer coded this Hotline intro, released on 20 July 1988, featuring Jeroen Tel's "S-Express" — preserved in the HVSC. Tel was one of the most celebrated SID musicians of the era, and his appearance in a Hotline intro underscores the Dutch group's connections to top-tier composers. Doc Snyder's page confirms The Silver Surfer as a key Hotline coder, credited on multiple intros alongside BOD, Coco, and The Mercenary Cracker. Hotline was founded in August 1986 under the tagline "Where cracking is an Art" and became one of the most prolific Dutch groups. This is one of many Hotline entries in the rankings, including #10 HTL-03, #23 HTL-28, and #95 HTL-20. The group's extensive catalogue reflects both their longevity and the depth of the Dutch cracking scene during the late 1980s.

Sources: CSDb · Doc Snyder

htl-35.asm 2.752 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:48
// 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:  $1800 (6144)
// IRQ handler:  $180c (irq_180c)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 2638 bytes, Data: 60850 bytes
// Labels: 304, Subroutines: 7
//
// Cross-references: all OK
// ============================================


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

// --- Region $1035-$103b ---
.pc = $1035 "sub_1035"
// Referenced by: jsr from $1888, $fdd7

sub_1035:
        jmp loc_1112
// Referenced by: jsr from $1901

sub_1038:
        jmp loc_111c

txt_103b:
        .text " "

// --- Region $10f0-$138d ---
.pc = $10f0 "sub_10f0"
// Referenced by: jsr from $1117; jmp from $1127

sub_10f0:
        lda #$ff
        sta $109e
        sta $109f
        sta $10a0
        lda #$00
        ldx #$02

loc_10ff:
        sta $1046,x
        sta $1049,x
        sta $104c,x
        sta $1649,x
        dex
        bpl loc_10ff
        sta $10cb
        rts

loc_1112:
        lda #$01
        sta $10cb
        jsr sub_10f0
        rts

dat_111b:
        .byte $60                                   // `

loc_111c:
        lda $10cb
        cmp #$02
        beq loc_112a
        cmp #$01
        bne loc_112b
        jmp sub_10f0

loc_112a:
        rts

loc_112b:
        inc $109e
        inc $109f
        inc $10a0
        ldx #$02
        dec $10ca
        bpl loc_1141
        lda $1042
        sta $10ca

loc_1141:
        stx $48
        lda $1043,x
        sta $177d
        tay
        lda $10ca
        cmp $1042
        bne loc_1166
        lda $15d3,x
        sta smc_116d                                // SMC: modifies $116d
        lda $15d6,x
        sta smc_116e                                // SMC: modifies $116e
        dec $104c,x
        bmi loc_1169
        jmp loc_12c8

loc_1166:
        jmp loc_12f6

loc_1169:
        ldy $1046,x
.label smc_116d = * + 1
.label smc_116e = * + 2
        lda $10cc,y                                 // !SMC: modified by $1155, $115b
        cmp #$ff
        bne loc_1181
        lda #$00
        sta $104c,x
        sta $1046,x
        sta $1049,x
        jmp loc_1169

loc_1181:
        sta $10bf
        cmp #$80
        bcc loc_1193
        and #$1f
        sta $1779,x
        inc $1046,x
        jmp loc_1169

loc_1193:
        lda $10bf
        cmp #$40
        bcc loc_11a5
        and #$3f
        sta $10d7,x
        inc $1046,x
        jmp loc_1169

loc_11a5:
        lda $10bf
        asl
        tay
        lda $15d9,y
        sta $46
        lda $15da,y
        sta $47
        lda #$00