Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; da65 V2.13.3 - (C) Copyright 2000-2009, Ullrich von Bassewitz
- ; Created: 2012-06-21 01:09:19
- ; Input file: test.img
- ; Page: 1
- .setcpu "65C02"
- L050F := $050F
- L0512 := $0512
- L051C := $051C
- L051F := $051F
- L0522 := $0522
- L052A := $052A
- L053D := $053D
- L0558 := $0558
- L055F := $055F
- L0568 := $0568
- L058D := $058D
- ldx #$FF
- txs
- cld
- lda #$00
- sta $00
- lda #$FF
- sta $01
- jsr L0512
- jmp L050F
- jsr L055F
- ldx #$00
- lda #$23
- sta $0310
- jmp L0522
- jmp L051C
- ldx #$00
- lda #$20
- ldy #$00
- sta ($00),y
- ldy #$00
- ldx #$00
- lda ($00),y
- cmp #$80
- jsr L058D
- beq LFF9A
- jmp L053D
- LFF9A: jmp L0558
- ldy #$00
- ldx #$00
- lda ($00),y
- sta $0310
- ldy #$00
- ldx #$00
- lda ($00),y
- pha
- clc
- adc #$01
- ldy #$00
- sta ($00),y
- pla
- jmp L052A
- jmp L051F
- jsr L0568
- rts
- ldy $00
- bne LFFC5
- dec $01
- LFFC5: dec $00
- rts
- inc $00
- bne LFFCE
- inc $01
- LFFCE: rts
- bne LFFFB
- ldx #$00
- txa
- rts
- beq LFFFB
- ldx #$00
- txa
- rts
- beq LFFFB
- bmi LFFFB
- ldx #$00
- txa
- rts
- beq LFFE7
- bpl LFFFB
- LFFE7: ldx #$00
- txa
- rts
- beq LFFFB
- bcc LFFFB
- ldx #$00
- txa
- rts
- beq LFFF7
- bcs LFFFB
- LFFF7: ldx #$00
- txa
- rts
- LFFFB: ldx #$00
- lda #$01
- rts
Advertisement
Add Comment
Please, Sign In to add comment