#698

Hotline [HTL] 11

Hotline [HTL]

933 lines of code

RasterbarsRSTRScrollerSCRL

History

Released
10 October 1987
Code
The Silver Surfer
Group
Hotline — Netherlands, founded August 1986

Released on 10 October 1987, this is the eleventh numbered crack intro from Hotline, the prolific Dutch group founded in August 1986 with the motto "Where cracking is an Art." The code is by The Silver Surfer, who served as one of Hotline's primary coders across multiple intros. No music credit is listed on CSDb, suggesting this may be a silent or sound-effect-only intro. Hotline is one of the most heavily represented groups in this collection, with entries spanning from #10 HTL-03 and #23 HTL-28 at the very top through a dozen more entries including #95 HTL-20 and #153 HTL-04. Doc Snyder's Page documents their extensive catalogue with credits for coders including BOD, Coco, The Mercenary Cracker, and Softhunter alongside The Silver Surfer. The group maintained a website at hotline9009.com and used a Dutch phone number for BBS contacts.

Sources: CSDb · Doc Snyder's Page

htl-11.asm 933 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: $15ff  (3584 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0f00 (3840)
// IRQ handler:  $0f6c (irq_0f6c)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 765 bytes, Data: 2819 bytes
// Labels: 119, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $0f00-$106d ---
.pc = $0f00 "main_0f00"

main_0f00:
        jsr sub_108a
        sei
        ldy #$00

loc_0f06:
        lda $0bc0,y
        sta $d000,y
        iny
        cpy #$2f
        bne loc_0f06
        ldy #$00

loc_0f13:
        lda txt_0bf0,y
        sta $07f8,y
        iny
        cpy #$08
        bne loc_0f13
        lda #$01
        sta $dc0d
        lda #$20
        sta $d012
        lda #$6c
        ldy #$0f
        sta $0314
        sty $0315
        lda #$c7
        sta $ff
        sta $fe
        ldx #$00
        stx $fd
        stx $fc
        stx $fb
        stx $fa
        stx $2d
        stx $2e

loc_0f46:
        lda $08e0,x
        sta $0599,x
        inx
        cpx #$16
        bne loc_0f46
        ldx #$00

loc_0f53:
        lda txt_09e0,x
        sta $05e5,x
        inx
        cpx #$1e
        bne loc_0f53
        lda #$1b
        sta $d011
        lda #$01
        sta $d019
        cli
        jmp loc_1117

irq_0f6c:
        lda #$01
        sta $d019
        lda #$1b
        sta $d011
        ldx $d012
.label smc_0f7a = * + 1
        ldy #$28                                    // !SMC: modified by $104a
.label loc_0f7c = * + 1
        bit $a8

loc_0f7d:
        lda dat_11fd,y
        beq loc_0f7c

loc_0f82:
        cpx $d012
        beq loc_0f82
        sta $d021
        sta $1230
        iny
        inx
        cpx #$a0
        bne loc_0f7d
        lda #$00
        sta $d021

loc_0f98:
        lda $d012
        cmp #$a2
        bne loc_0f98
        ldx #$03

loc_0fa1:
        dex
        bne loc_0fa1
        lda $1230
        sta $d021
        ldx #$a4
        ldy #$00
        sty $14

loc_0fb0:
        txa
        pha
        ldx $14
        inc $14
        lda dat_1050,x
        sta $15
        pla
        tax

loc_0fbd:
        lda $15
        beq loc_0ff1
        cpx #$d2
        bcs loc_0fcd
        lda $ff
        sta $d016
        jmp loc_0fda

loc_0fcd:
        nop
        nop
        nop
        nop
        nop