lda #fname2-fname1 ldx #<fname1 ldy #>fname1 jsr $ffbd // call setname lda #$01 ldx $ba // last used device number bne !skip+ ldx #$08 // default to device 8 !skip: ldy #$01 // not $00 means: load to address stored in file jsr $ffba // call setlfs lda #$00 // $00 means: load to memory (not verify) jsr $ffd5 // call load bcs error // if carry set, a load error has happened jmp unpackfile1 error: rts unpackfile1: // unpack the first file // Then load next file etc. ... fname1: .text "0.*" fname2: .text "1.*" ...