History
- Group
- Paninaro -- United Kingdom, founded May 1989
The third numbered intro from Paninaro, a short-lived British group founded in May 1989. CSDb lists multiple Paninaro releases under group ID 8122, including intros, a logo, and a "Paninaro88 Intro Remake" -- the latter suggesting later-era nostalgia for the group's original output. No individual credits for code, graphics, or music are confirmed for this specific intro. A comment on intros.c64.org from iAN CooG in July 2013 confirms the intro was examined during preservation efforts. The group name derives from Italian youth slang for a fashion-conscious subculture that emerged in 1980s Milan, popularised in the UK through the Pet Shop Boys' 1986 single of the same name. CSDb also catalogues a "Destiny Intro (Paninaro)," suggesting connections to other groups or a preceding identity. This joins #382 paninaro-01 in the collection, which identifies Tri-Dos as the coder and dates that intro to June 1989 -- just one month after the group's founding. Paninaro does not appear on Doc Snyder's page or Demozoo.
Sources: intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:27 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $281d (8222 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $1500 (5376) // IRQ handler: $15c1 (irq_15c1) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $1604 (irq_1604) // IRQ handler: $16ac (irq_16ac) // // Code: 1194 bytes, Data: 7028 bytes // Labels: 163, Subroutines: 14 // // Cross-references: all OK // ============================================ // --- Region $0805-$0816 --- .pc = $0805 "loc_0805" loc_0805: tya and #$07 ora #$d0 sta $17ba rts loc_080e: tya and #$07 ora #$d0 sta $1507 rts // --- Region $08f1-$095b --- .pc = $08f1 "sub_08f1" // Referenced by: jsr from $15d0 sub_08f1: .label smc_08f2 = * + 1 ldy #$01 // !SMC: modified by $090f bmi dat_095c beq loc_0952 dey tya asl asl asl tay lda $1132,y sec sbc $083b sta $096e lda $1133,y sta $0964 ldx #$ff stx smc_08f2 // SMC: modifies $08f2 inx stx $fc stx $d417 stx $d416 loc_091b: iny iny lda $1132,y sta $085f,x lda $1133,y sta $0862,x lda #$00 sta $0859,x sta $085c,x sta $0865,x sta $084a,x sta $0868,x lda #$01 sta $0841,x sta $0847,x sta $0877,x inx cpx #$03 bne loc_091b sta $fd lda #$0f sta $d418 rts loc_0952: sty $d404 sty $d40b sty $d412 rts // --- Region $0b7a-$0bda --- .pc = $0b7a "loc_0b7a" loc_0b7a: ldy $f9 lda $11b6,y sta $fe lda $11b7,y sta $ff ldy #$01 lda ($fe),y sta $0bd2 lda $fa bne loc_0b9c dey lda ($fe),y sta $086e,x lda #$02 sta $086b,x loc_0b9c: ldy $086b,x lda ($fe),y cmp #$fe bcc loc_0bb0 beq loc_0bb6 iny lda ($fe),y sta $086b,x tay lda ($fe),y loc_0bb0: sta $0868,x inc $086b,x loc_0bb6: ldy $086e,x lda ($fe),y bpl loc_0bce cmp #$82 bcs loc_0bce cmp #$80 beq loc_0be7 iny lda ($fe),y sta $086e,x tay lda ($fe),y loc_0bce: