// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:42
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $153f  (3391 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $103e (4158)
// IRQ handler:  $11fc (irq_11fc)
//
// Code: 625 bytes, Data: 2766 bytes
// Labels: 77, Subroutines: 8
//
// Verification: 3 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $103e-$1189 ---
.pc = $103e "main_103e"

main_103e:
        jsr $ff5b
        sei
        lda #$00

loc_1044:
        sta $d400,y
        dey
        bne loc_1044
        sty $d011
        sty $0286
        sty $d021
        sty $d020
        sty $50
        sty $52
        iny
        sty $dc0d
        sty $51
        sty $d01a
        sty $01
        ldx #$d0
        sta $46
        stx $47
        ldx #$08
        sta $48
        stx $49
        ldx #$0a
        sta $4a
        stx $4b
        tay

loc_1078:
        ldx #$07

loc_107a:
        lda #$ff
        sec
        sbc ($46),y
        cpx #$04
        bcc $108f
        sta ($48),y
        jsr sub_1183
        sta ($48),y
        jsr sub_1183
        bne loc_109b
        sec
        rol
        sta ($4a),y
        jsr sub_11f5
        sta ($4a),y
        jsr sub_11f5

loc_109b:
        jsr sub_1174
        dex
        bne loc_107a
        sta ($4a),y
        jsr sub_11f5
        sta ($4a),y
        jsr sub_11f5
        jsr sub_1174
        lda $49
        cmp #$0a
        bne loc_1078
        ldx #$07
        stx $01

loc_10b8:
        lda $1036,x
        sta $0800,x
        tya
        sta $08f0,x
        dex
        bpl loc_10b8
        stx $d406
        stx $d40d
        stx $d418
        jsr $e544
        lda #$c1
        sta $0318
        ldy #$19

loc_10d8:
        lda $1318,y
        sta $06af,y
        clc
        adc #$40
        sta $06d7,y
        dey
        bpl loc_10d8
        iny
        jsr sub_11b3
        lda #$fc
        ldx #$11
        ldy #$a1
        sta $0314
        stx $0315
        sty $d012
        jsr sub_117b
        jsr sub_116d
        lda #$21
        sta $d404
        sta $d40b
        lda #$1b
        sta $d011
        cli

loc_110e:
.label smc_110f = * + 1
        jmp loc_110e                                // !SMC: modified by $12ab

loc_1111:
        sei
        jsr $fd15
        jsr $fda3
        jsr $ff5b
        lda #$01
        sta $0286
        sta $d021
        jsr $e544
        lda #$00
        sta $d020
        sta $d021
        lda #$43
        sta $11e3
        lda #$c8
        sta $11cc
        jsr sub_11cb
        jmp loc_153d
// Referenced by: jsr from $1236, $1239

sub_113e:
        dec $40
        lda $40
        cmp #$bf
        bne loc_1171
        ldy #$00

loc_1148:
        lda $0799,y
        sta $0798,y
        iny
        cpy #$4f
        bne loc_1148
        ldy #$00
        lda ($41),y
        sta $07bf
        clc
        adc #$40
        sta $07e7
        inc $41
        bne loc_1166
        inc $42

loc_1166:
        lda ($41),y
        bne sub_116d
        jsr sub_117b
// Referenced by: jsr from $10fd; branch from $1168

sub_116d:
        lda #$c7
        sta $40

loc_1171:
        sta $d016

// Referenced by: jsr from $109b, $10ab
sub_1174: {
        inc $46
        bne done
        inc $47
done:
        rts
}
// Referenced by: jsr from $10fa, $116a

sub_117b:
        lda #$32
        ldx #$13
        sta $41
        stx $42
// Referenced by: jsr from $1085, $108a

sub_1183:
        inc $48
        bne loc_1189
        inc $49

loc_1189:
        rts

// --- Region $11b3-$12d7 ---
.pc = $11b3 "sub_11b3"
// Referenced by: jsr from $10e8

sub_11b3:
        lda #$01
        sta $d022

loc_11b8:
        lda #$0d
        sta $d800,y
        sta $d900,y
        lda #$1e
        sta $0400,y
        sta $0500,y
        dey
        bne loc_11b8
// Referenced by: jsr from $1138

sub_11cb:
        lda #$28
        ldx #$04
        sta $4c
        stx $4d
        ldy #$00
        ldx #$00

loc_11d7:
        lda #$01
        sta $4e

loc_11db:
        lda dat_1000,x
        and $4e
        beq loc_11e6
        lda #$00
        sta ($4c),y

loc_11e6:
        inc $4c
        bne loc_11ec

dat_11ea:
        .byte $e6,$4d                               // .M

loc_11ec:
        asl $4e
        bne loc_11db
        inx
        cpx #$36
        bne loc_11d7

// Referenced by: jsr from $1093, $1098, $10a3, $10a8
sub_11f5: {
        inc $4a
        bne done
        inc $4b
done:
        rts
}

irq_11fc:
        lda #$15
        sta $d018
        ldy #$d0
        ldx #$a1

loc_1205:
        inx

loc_1206:
        cpx $d012
        bne loc_1206
        sty $d016
        dey
        cpx #$ab
        bne loc_1205
        lda #$12
        sta $d018
        ldy $52
        ldx #$b8

loc_121c:
        cpx $d012
        bne loc_121c
        lda $119a,y
        sta $d021
        dey
        bpl loc_122c
        ldy #$17

loc_122c:
        inx
        cpx #$d0
        bne loc_121c
        stx $d021
        nop
        nop
        jsr sub_113e
        jsr sub_113e
        ldx #$eb
        ldy #$00

loc_1240:
        lda dat_118a,y

loc_1243:
        cpx $d012
        bne loc_1243
        sta $d021
        inx
        iny
        cpy #$10
        bne loc_1240

loc_1251:
        cpx $d012
        bne loc_1251
        sty $d021
        lda #$d8
        sta $d016
        dec $51
        bne loc_1288

loc_1262:
        ldy $50
        lda dat_12d7,y
        bne loc_126d
        sta $50
        beq loc_1262

loc_126d:
        sta $d401
        lda $12e0,y
        sta $d400
        lda $12e8,y
        sta $d408
        lda $12f0,y
        sta $d407
        lda #$5d
        sta $51
        inc $50

loc_1288:
        inc $53
        ldy $53
        ldx #$1f

loc_128e:
        tya
        and #$0f
        tay
        lda txt_12f8,x
        sta $0634,x
        lda dat_118a,y
        sta $da34,x
        iny
        dex
        bpl loc_128e
        lda $dc01
        cmp #$ef
        bne loc_12ae
        lda #$11
        sta smc_110f                                // SMC: modifies $110f

loc_12ae:
        inc $52

loc_12b0:
        ldy $52
        ldx #$3b

loc_12b4:
        lda $119a,y
        bne loc_12bd
        sta $52
        beq loc_12b0

loc_12bd:
        inx

loc_12be:
        cpx $d012
        bne loc_12be
        sta $d023
        iny
        cpy #$18
        bne loc_12cd
        ldy #$00

loc_12cd:
        cpx #$94
        bne loc_12b4
        inc $d019
        jmp $ea7e

dat_12d7:
        .byte $08                                   // .

// --- Region $153d-$153f ---
.pc = $153d "loc_153d"

loc_153d:
        jmp $fce2

// ============================================
// Data blocks
// ============================================

// --- Region $0801-$0d1f ---
.pc = $0801 "dat_0801"

dat_0801:
        // === BASIC loader stub ===
        .byte $0b,$08                               // next line pointer ($080b)
        .byte $d3,$07                                                     // [corrected] was: .byte $00,$00                               // line number 0
        .byte $9e                                   // SYS token
        .byte $32,$30,$35,$39
        .byte $00                                   // end of line
        .byte $a0,$00                                                     // [corrected] was: .byte $00,$00                               // end of BASIC program
        .byte $78,$e6,$01,$ba,$bd,$37,$0c,$9d,$fc,$00,$ca,$d0,$f7,$4c,$ee,$0c // x....7.......L..
        .byte $80,$00,$36,$f7,$47,$64,$04,$37,$b6,$cf,$55,$3c,$b0,$61,$c3,$34 // ..6.Gd.7..U<.a.4
        .byte $5f,$0c,$be,$6f,$df,$f4,$7d,$fc,$08,$38,$96,$20,$21,$1b,$88,$e0 // _..o..}..8. !...
        .byte $8e,$c2,$c3,$21,$50,$4b,$fb,$06,$55,$dc,$08,$6b,$29,$6e,$78,$e3 // ...!PK..U..k)nx.
        .byte $11,$e6,$27,$d4,$cb,$a7,$fa,$ca,$4e,$33,$57,$b9,$cf,$f1,$20,$35 // ..'.....N3W... 5
        .byte $14,$50,$52,$c8,$eb,$0d,$dc,$56,$51,$8c,$1a,$af,$84,$01,$97,$d0 // .PR....VQ.......
        .byte $ae,$46,$ba,$47,$08,$eb,$48,$ae,$49,$a3,$0a,$85,$4a,$86,$4b,$a8 // .F.G..H.I...J.K.
        .byte $7f,$23,$a9,$ff,$38,$f1,$46,$e0,$3f,$04,$90,$e7,$08,$81,$48,$6a // .#..8.F.?.....Hj
        .byte $83,$d3,$6c,$0c,$38,$2a,$fa,$40,$ca,$d0,$d9,$07,$11,$91,$4a,$06 // ..l.8*.@......J.
        .byte $f5,$97,$d3,$74,$11,$a5,$49,$c9,$0a,$3f,$d0,$c4,$a2,$07,$86,$01 // ...t..I..?......
        .byte $bd,$36,$ff,$5b,$00,$2e,$98,$9d,$f0,$08,$5e,$a3,$f3,$f2,$06,$96 // .6.[......^.....
        .byte $0d,$89,$8e,$4b,$d4,$34,$53,$c1,$08,$d7,$03,$a0,$19,$b9,$9e,$13 // ...K.4S.........
        .byte $ae,$af,$ba,$bd,$99,$d7,$06,$8e,$1d,$f1,$c8,$e7,$b3,$fa,$aa,$fc // ................
        .byte $a2,$7b,$a0,$a1,$b7,$14,$d4,$8e,$15,$03,$8c,$bc,$f3,$c8,$d8,$20 // .{............. 
        .byte $6d,$c0,$21,$65,$04,$2a,$4a,$0b,$f2,$7c,$1b,$8d,$d0,$d5,$58,$4c // m.!e.*J..|....XL
        .byte $0e,$11,$78,$fa,$15,$5a,$a3,$fd,$26,$5b,$ff,$3b,$98,$86,$02,$e3 // ..x..Z..&[.;....
        .byte $71,$1a,$44,$e5,$e5,$71,$23,$c9,$2c,$f0,$43,$aa,$e3,$bc,$c8,$8d // q.D..q#.,.C.....
        .byte $33,$cc,$ba,$cb,$79,$11,$4c,$3d,$15,$c6,$fc,$a5,$40,$c9,$bf,$5e // 3...y.L=....@..^
        .byte $2b,$bb,$33,$c4,$49,$99,$98,$73,$b5,$3c,$4f,$be,$f5,$db,$63,$29 // +.3.I..s.<O...c)
        .byte $bf,$ae,$18,$69,$b9,$e7,$07,$53,$cb,$5b,$42,$b1,$23,$41,$8e,$03 // ...i...S.[B.#A..
        .byte $20,$7b,$11,$fd,$c7,$db,$40,$dd,$1e,$32,$46,$a9,$47,$17,$6c,$32 //  {....@..2F.G.l2
        .byte $a2,$13,$85,$41,$86,$42,$ff,$48,$95,$b3,$49,$60,$19,$e5,$c3,$96 // ...A.B.H..I`....
        .byte $19,$49,$2a,$07,$99,$0a,$a9,$3f,$02,$3e,$de,$44,$b2,$04,$8b,$22 // .I*....?.>.D..."
        .byte $10,$44,$1c,$11,$12,$70,$51,$5b,$fc,$d5,$8d,$22,$1b,$8e,$0d,$68 // .D...pQ[..."...h
        .byte $d8,$9e,$d9,$24,$1e,$76,$89,$99,$b7,$05,$88,$d0,$77,$ed,$ce,$28 // ...$.v......w..(
        .byte $cd,$c3,$4c,$86,$4d,$9c,$56,$a2,$74,$01,$85,$3b,$bd,$54,$10,$25 // ..L.M.V.t..;.T.%
        .byte $6f,$f0,$04,$a9,$77,$00,$91,$e2,$4c,$ca,$a4,$4d,$06,$4e,$77,$19 // o...w...L..M.Nw.
        .byte $23,$36,$39,$e2,$72,$4a,$fe,$e6,$4b,$60,$e7,$a9,$15,$de,$a0,$47 // #69.rJ..K`.....G
        .byte $a2,$a1,$e8,$5d,$c6,$16,$05,$d4,$e0,$ab,$f2,$f5,$a9,$ee,$67,$ce // ...]..........g.
        .byte $4c,$b8,$71,$75,$01,$47,$1a,$88,$10,$a3,$71,$17,$e8,$e0,$ce,$6a // L.qu.G....q....j
        .byte $2e,$8e,$9a,$81,$ea,$50,$20,$3e,$8c,$a2,$eb,$6d,$7b,$35,$30,$7b // .....P >...m{50{
        .byte $03,$14,$e8,$f3,$10,$67,$ef,$29,$60,$8c,$21,$a9,$d5,$d8,$fe,$16 // .....g.)`.!.....
        .byte $c6,$a5,$51,$26,$8d,$a4,$8d,$d7,$3b,$3b,$13,$50,$1f,$f5,$dd,$01 // ..Q&....;;.P....
        .byte $52,$e0,$52,$00,$52,$e8,$52,$08,$b9,$75,$f0,$12,$8d,$07,$d4,$a9 // R.R.R.R..u......
        .byte $5d,$85,$ff,$51,$50,$c5,$e6,$a4,$c5,$53,$a2,$1f,$98,$29,$0f,$a8 // ]..QP....S...)..
        .byte $bd,$ff,$f8,$12,$d2,$06,$b9,$8a,$7b,$9d,$34,$da,$c8,$ca,$df,$10 // ........{.4.....
        .byte $ec,$ad,$01,$dc,$c9,$ef,$ff,$05,$a9,$7b,$8d,$0f,$4b,$e6,$5b,$a4 // .........{..K.[.
        .byte $15,$a2,$3b,$b9,$9a,$6f,$11,$04,$ad,$85,$52,$f0,$f3,$e8,$ec,$12 // ..;..o....R.....
        .byte $fe,$16,$fb,$8d,$23,$5f,$c8,$c0,$18,$2f,$02,$a0,$00,$e0,$af,$94 // ....#_.../......
        .byte $e3,$e5,$ee,$19,$d0,$4c,$7e,$ea,$08,$ff,$07,$16,$05,$89,$ff,$00 // .....L~.........
        .byte $f9,$93,$a3,$a5,$ce,$b9,$4b,$6c,$0c,$0b,$0b,$4a,$0a,$97,$67,$09 // ......Kl...J..g.
        .byte $d8,$34,$72,$a9,$3c,$93,$61,$9f,$49,$38,$0e,$9f,$82,$19,$0f,$15 // .4r.<.a.I8......
        .byte $be,$8f,$58,$8a,$2f,$06,$bd,$bd,$0d,$93,$3a,$a2,$11,$48,$6b,$60 // ..X./.....:..Hk`
        .byte $00,$2d,$48,$10,$d4,$c0,$34,$7e,$38,$e3,$6f,$16,$33,$16,$34,$35 // .-H...4~8.o.3.45
        .byte $31,$7d,$81,$72,$b6,$3d,$13,$3a,$33,$c5,$c0,$21,$1e,$01,$51,$15 // 1}.r.=.:3..!..Q.
        .byte $cd,$28,$91,$3f,$29,$c9,$43,$d3,$09,$32,$b2,$77,$a9,$c4,$12,$04 // .(.?).C..2.w....
        .byte $78,$62,$60,$14,$a1,$e8,$0c,$05,$e9
        .text "02/1"
        .byte $17,$ac,$0b
        .byte $18,$75,$94,$d8,$b1,$76,$19,$51,$47,$8c,$0f,$6b,$33,$e8,$0a,$d6 // .u...v.QG..k3...
        .byte $7c,$06,$61,$93,$a8,$0d,$12,$bd,$e3,$77,$0e,$a2,$27,$98,$12,$46 // |.a......w..'..F
        .byte $db,$c3,$cf,$39,$45,$6e,$66,$79,$9b,$84,$5a,$23,$54,$0d,$74,$0e // ...9Enfy..Z#T.t.
        .byte $4e,$44,$d9,$28,$c7,$66,$04,$71,$31,$64,$0d,$ba,$c3,$51,$a9,$ca // ND.(.f.q1d...Q..
        .byte $ac,$01,$70,$dd,$07,$8f,$f4,$f5,$0b,$b9,$16,$a6,$38,$15,$32,$15 // ..p.........8.2.
        .byte $c8,$e8,$3b,$83,$8c,$33,$b5,$02,$8e,$e8,$0b,$e9,$21,$ca,$14,$10 // ..;..3......!...
        .byte $69,$cd,$16,$c1,$81,$af,$a7,$4e,$7e,$0e,$07,$de,$18,$81,$9e,$c6 // i......N~.......
        .byte $d3,$97,$09,$09,$47,$b2,$6f,$18,$06,$ad,$5a,$14,$65,$70,$7a,$1a // ....G.o...Z.epz.
        .byte $c9,$28,$3b,$db,$10,$3b,$52,$87,$82,$2e,$45,$b0,$94,$0d,$e7,$47 // .(;..;R...E....G
        .byte $20,$36,$7e,$91,$89,$3a,$46,$fe,$9d,$b0,$0a,$61,$05,$66,$f2,$28 //  6~..:F....a.f.(
        .byte $32,$84,$30,$ab,$2e,$04,$5d,$07,$93,$0c,$14,$18,$19,$6d,$02,$c9 // 2.0...]......m..
        .byte $01,$16,$4b,$db,$49,$62,$86,$98,$0b,$65,$40,$48,$05,$b7,$69,$35 // ..K.Ib...e@H..i5
        .byte $34,$31,$2f,$f4,$0e,$07,$e9,$08,$14,$06,$0f,$f5,$6e,$d5,$0a,$04 // 41/.........n...
        .byte $4a,$43,$1e,$0d,$49,$0c,$77,$47,$da,$1a,$22,$91,$68,$4a,$79,$0f // JC..I.wG..".hJy.
        .byte $17,$6b,$0c,$ac,$06,$dc,$ac,$04,$95,$18,$bb,$20,$08,$1a,$ea,$6a // .k......... ...j
        .byte $6d,$d7,$bf,$6a,$34,$15,$1a,$2a,$2a,$2c,$f5,$6b,$0f,$06,$de,$17 // m..j4..**,.k....
        .byte $ab,$12,$a9,$14,$2d,$05,$08,$e5,$09,$03,$d7,$e4,$01,$0e,$04,$e2 // ....-...........
        .byte $40,$06,$13,$58,$28,$15,$12,$0b,$21,$df,$29,$84,$20,$00,$4c,$e2 // @..X(...!.). .L.
        .byte $fc,$fe,$24,$20,$f5,$55,$15,$11,$66,$62,$02,$00,$b5,$31,$45,$12 // ..$ .U..fb...1E.
        .byte $16,$66,$26,$20,$00,$00,$04,$00,$40,$00,$00,$20,$40,$15,$e8,$a9 // .f& ....@.. @...
        .byte $00,$85,$fc,$85,$fb,$e0,$01,$90,$21,$a5,$fd,$4a,$d0,$11,$ad,$1c // ........!..J....
        .byte $01,$d0,$03,$ce,$1d,$01,$ce,$1c,$01,$ad,$38,$0c,$90,$1b,$6a,$26 // ..........8...j&
        .byte $fc,$26,$fb,$ca,$d0,$e5,$85,$fd,$a5,$fc,$60,$c6,$01,$58,$4c,$3e // .&........`..XL>
        .byte $10,$ca,$c6,$ff,$c6,$af,$88,$b1,$ae,$91,$fe,$98,$d0,$f8,$8a,$d0 // ................
        .byte $f0,$20,$00,$01,$f0,$0a,$a5,$fe,$d0,$02,$c6,$ff,$c6,$fe,$90,$be // . ..............
        .byte $c8,$20,$00,$01,$f0,$fa,$c0,$11,$b0,$d1,$be,$33,$03,$20,$01,$01 // . .........3. ..
        .byte $79,$67,$03,$85,$a7,$a5,$fb,$79,$9b,$03,$48,$d0,$06,$a4,$a7,$c0 // yg.....y..H.....
        .byte $04,$90,$02,$a0,$03,$be,$ac,$01,$20,$01,$01,$79,$af,$01,$a8,$38 // ........ ..y...8
        .byte $a5,$fe,$e5,$a7,$85,$fe,$b0,$02,$c6,$ff,$be,$34,$03,$20,$01,$01 // ...........4. ..
        .byte $79,$68,$03,$90,$03,$e6,$fb,$18,$65,$fe,$85,$ae,$a5,$fb,$79,$9c // yh......e.....y.
        .byte $03,$65,$ff,$85,$af,$a4,$a7,$68,$aa,$90,$90,$02,$04,$04,$30,$20 // .e.....h......0 
        .byte $10,$e8,$98,$29,$0f,$f0,$13,$8a,$4a,$a6,$fc,$2a,$26,$fb,$ca,$10 // ...)....J..*&...
        .byte $fa,$79,$67,$03,$aa,$a5,$fb,$79,$9b,$03,$99,$9c,$03,$8a,$99,$68 // .yg....y.......h
        .byte $03,$a2,$04,$20,$01,$01,$99,$34,$03,$c8,$c0,$34,$d0,$d3,$a0,$00 // ... ...4...4....
        .byte $4c,$43,$01                           // LC.

// --- Region $1000-$103d ---
.pc = $1000 "dat_1000"

dat_1000:
        .byte $be,$6f,$df,$f7,$7d,$00,$00,$00,$04,$00,$be,$61,$cf // .o..}......a.

txt_100d:
        .text "4<"
        .byte $b0                                   // '0' | $80 (end-of-string marker)
        .byte $61,$c3,$34,$0c,$be,$6f,$df,$f4,$7d,$00,$00,$00,$00,$00,$00,$20 // a.4..o..}...... 
        .byte $fb,$06,$00,$00,$20,$1b,$06,$00,$00,$e0,$fb,$06,$00,$00,$00,$c3 // .... ...........
        .byte $06,$00,$00,$00,$fb,$06,$55,$6b,$6b,$6b,$6b,$6b,$6b,$ff // ......Ukkkkkk.

// --- Region $118a-$11b2 ---
.pc = $118a "dat_118a"

dat_118a:
        .byte $06,$02,$04,$0e,$0a,$03,$07,$01,$01,$07,$03,$0a,$0e,$04,$02,$06 // ................
        .byte $05,$05,$03,$05,$03,$03,$0d,$03,$0d,$0d,$01,$0d,$01,$01,$0d,$01 // ................
        .byte $0d,$0d,$03,$0d,$03,$03,$05,$03,$00   // .........

// --- Region $12d8-$153c ---
.pc = $12d8 "Segment $12d8"
        .byte $06,$07,$06,$06,$05,$06,$06,$00,$93,$ce,$a3,$6c,$ce,$b9,$6c,$6c // ...........l..ll
        .byte $0c,$0a,$0b,$09,$0a,$08,$09,$09,$d8,$3c,$72,$9f,$3c,$93,$9f,$9f // .........<r.<...

txt_12f8:
        .encoding "screencode_mixed"
        .text "presents for your entertainment"
        .encoding "petscii_upper"

txt_1317:
        .text ":   --- "
        .byte $08,$01,$14,$20,$14,$12,$09,$03,$0b   // ... .....

txt_1328:
        .text "! ---     "

txt_1332:
        .encoding "screencode_mixed"
        .text "galleon of science"
        .encoding "petscii_upper"

txt_1344:
        .text " 451 "

txt_1349:
        .encoding "screencode_mixed"
        .text "presents: hat trick! cracked"
        .encoding "petscii_upper"

txt_1365:
        .text " (?) "

txt_136a:
        .encoding "screencode_mixed"
        .text "by esi, cleaned and crunched by galleon"
        .encoding "petscii_upper"

txt_1391:
        .text " 22/1... "

txt_139a:
        .encoding "screencode_mixed"
        .text "this intro by me too.  i just hate these megalong uncrunched games, so on this one i decided to improve it"
        .encoding "petscii_upper"

txt_1404:
        .text "... "

txt_1408:
        .encoding "screencode_mixed"
        .text "the original hat trick was over"
        .encoding "petscii_upper"

txt_1427:
        .text " 300 "

txt_142c:
        .encoding "screencode_mixed"
        .text "blocks!  special greetings to: xades sociecty, front and razor express"
        .encoding "petscii_upper"

txt_1472:
        .text "... "

txt_1476:
        .encoding "screencode_mixed"
        .text "normal ones to: orion, jewels"
        .encoding "petscii_upper"

txt_1493:
        .text ", 2000 "

txt_149a:
        .encoding "screencode_mixed"
        .text "a.d, galaxy, beavers, strike force, tg"
        .encoding "petscii_upper"

txt_14c0:
        .text " 1541, "

txt_14c7:
        .encoding "screencode_mixed"
        .text "the lightforce, radwar, mechanix, zetrex, new life, dexion, the austrian union, software technics and   ffs (urk"
        .encoding "petscii_upper"

txt_1537:
        .text "!)   "
        .byte $00                                   // string terminator