champ/examples/example03.s

        DSK test
        MX %11
        ORG $6000
        
FOO     EQU $8000 ; @u8
    
        JSR TEST
        BRK
    
TEST    LDX #$FF
        LDA #1
LOOP    TAY
        TXA
        EOR #$FF
        LSR
        LSR
        STA FOO
        TYA
        CLC
        ADC FOO     ; @Au(post)
        DEX         ; @Xu(post) @Au,FOO(post)
        BNE LOOP
        RTS
documentation 2018-02-16 15:05:05 +01:00			`DSK test`
			`MX %11`
			`ORG $6000`

			`FOO EQU $8000 ; @u8`

			`JSR TEST`
documentation for subroutine cycle watches 2018-02-16 21:50:01 +01:00			`BRK`
documentation 2018-02-16 15:05:05 +01:00
			`TEST LDX #$FF`
			`LDA #1`
			`LOOP TAY`
			`TXA`
			`EOR #$FF`
			`LSR`
			`LSR`
			`STA FOO`
			`TYA`
documentation 2018-02-16 18:44:27 +01:00			`CLC`
documentation 2018-02-16 15:05:05 +01:00			`ADC FOO ; @Au(post)`
			`DEX ; @Xu(post) @Au,FOO(post)`
			`BNE LOOP`
documentation for subroutine cycle watches 2018-02-16 21:50:01 +01:00			`RTS`