Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;
- ; File generated by cc65 v 2.13.3
- ;
- .fopt compiler,"cc65 v 2.13.3"
- .setcpu "6502"
- .smart on
- .autoimport on
- .case on
- .debuginfo off
- .importzp sp, sreg, regsave, regbank, tmp1, ptr1, ptr2
- .macpack longbranch
- .forceimport __STARTUP__
- .export _main
- ; ---------------------------------------------------------------
- ; void __near__ main (void)
- ; ---------------------------------------------------------------
- .segment "CODE"
- .proc _main: near
- .segment "CODE"
- jsr decsp1
- ldx #$00
- lda #$23
- sta $0310
- ldx #$00
- lda #$24
- sta $0311
- ldx #$00
- lda #$25
- sta $0312
- ldx #$00
- lda #$26
- sta $0313
- ldx #$00
- lda #$27
- sta $0314
- ldx #$00
- lda #$28
- sta $0315
- ldx #$00
- lda #$29
- sta $0316
- ldx #$00
- lda #$2A
- sta $0317
- ldx #$00
- lda #$2B
- sta $0318
- L001E: jmp L0021
- L0020: jmp L001E
- L0021: ldx #$00
- lda #$20
- ldy #$00
- sta (sp),y
- L0022: ldy #$00
- ldx #$00
- lda (sp),y
- cmp #$80
- jsr boolult
- jne L0025
- jmp L0023
- L0025: ldy #$00
- ldx #$00
- lda (sp),y
- sta $0310
- ldy #$00
- ldx #$00
- lda (sp),y
- pha
- clc
- adc #$01
- ldy #$00
- sta (sp),y
- pla
- jmp L0022
- L0023: jmp L0020
- L001F: jmp L0030
- L002F: jmp L001F
- L0030: jmp L002F
- jsr incsp1
- rts
- .endproc
Advertisement
Add Comment
Please, Sign In to add comment