Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

Untitled

By: a guest on Jun 21st, 2012  |  syntax: None  |  size: 2.77 KB  |  hits: 10  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. ; da65 V2.13.3 - (C) Copyright 2000-2009,  Ullrich von Bassewitz
  2. ; Created:    2012-06-21 13:59:55
  3. ; Input file: test.img
  4. ; Page:       1
  5.  
  6.  
  7.         .setcpu "6502"
  8.  
  9. L050F           := $050F
  10. L0512           := $0512
  11. L0554           := $0554
  12. L0557           := $0557
  13. L055A           := $055A
  14. L0562           := $0562
  15. L0575           := $0575
  16. L0590           := $0590
  17. L0593           := $0593
  18. L0596           := $0596
  19. L0599           := $0599
  20. L05A0           := $05A0
  21. L05A9           := $05A9
  22. L05CE           := $05CE
  23.         ldx     #$FF
  24.         txs
  25.         cld
  26.         lda     #$00
  27.         sta     $00
  28.         lda     #$FF
  29.         sta     $01
  30.         jsr     L0512
  31.         jmp     L050F
  32.         jsr     L05A0
  33.         ldx     #$00
  34.         lda     #$23
  35.         sta     $0310
  36.         ldx     #$00
  37.         lda     #$24
  38.         sta     $0311
  39.         ldx     #$00
  40.         lda     #$25
  41.         sta     $0312
  42.         ldx     #$00
  43.         lda     #$26
  44.         sta     $0313
  45.         ldx     #$00
  46.         lda     #$27
  47.         sta     $0314
  48.         ldx     #$00
  49.         lda     #$28
  50.         sta     $0315
  51.         ldx     #$00
  52.         lda     #$29
  53.         sta     $0316
  54.         ldx     #$00
  55.         lda     #$2A
  56.         sta     $0317
  57.         ldx     #$00
  58.         lda     #$2B
  59.         sta     $0318
  60.         jmp     L055A
  61.         jmp     L0554
  62.         ldx     #$00
  63.         lda     #$20
  64.         ldy     #$00
  65.         sta     ($00),y
  66.         ldy     #$00
  67.         ldx     #$00
  68.         lda     ($00),y
  69.         cmp     #$80
  70.         jsr     L05CE
  71.         beq     LFF91
  72.         jmp     L0575
  73. LFF91:  jmp     L0590
  74.         ldy     #$00
  75.         ldx     #$00
  76.         lda     ($00),y
  77.         sta     $0310
  78.         ldy     #$00
  79.         ldx     #$00
  80.         lda     ($00),y
  81.         pha
  82.         clc
  83.         adc     #$01
  84.         ldy     #$00
  85.         sta     ($00),y
  86.         pla
  87.         jmp     L0562
  88.         jmp     L0557
  89.         jmp     L0599
  90.         jmp     L0593
  91.         jmp     L0596
  92.         jsr     L05A9
  93.         rts
  94.         ldy     $00
  95.         bne     LFFC5
  96.         dec     $01
  97. LFFC5:  dec     $00
  98.         rts
  99.         inc     $00
  100.         bne     LFFCE
  101.         inc     $01
  102. LFFCE:  rts
  103.         bne     LFFFB
  104.         ldx     #$00
  105.         txa
  106.         rts
  107.         beq     LFFFB
  108.         ldx     #$00
  109.         txa
  110.         rts
  111.         beq     LFFFB
  112.         bmi     LFFFB
  113.         ldx     #$00
  114.         txa
  115.         rts
  116.         beq     LFFE7
  117.         bpl     LFFFB
  118. LFFE7:  ldx     #$00
  119.         txa
  120.         rts
  121.         beq     LFFFB
  122.         bcc     LFFFB
  123.         ldx     #$00
  124.         txa
  125.         rts
  126.         beq     LFFF7
  127.         bcs     LFFFB
  128. LFFF7:  ldx     #$00
  129.         txa
  130.         rts
  131. LFFFB:  ldx     #$00
  132.         lda     #$01
  133.         rts
create a new version of this paste RAW Paste Data