Screen border WIP

boxgrid.asm

* Draw boxes across the screen.
* 
        ORG $4E21
        LDX #$600 ; Screen base address 
        LDB #$00 ;
 
BOXROW  LDA #$FF ;
        STA ,X ;        
        LDA #$81 ; 
        STA 32,X ; 
        STA 64,X ; 
        STA 96,X ; 
        STA 128,X ; 
        STA 160,X ; 
        STA 192,X ; 
        LDA #$FF ; 
        STA 224,X ; 
        ADDB #$01 ;
        LEAX 1,X ;
        CMPB #$1F ;
        BLE BOXROW ;

        LDB #$00 ; Reset counter.
        LDX #$700 ; Screen base address 

BOXCOL  LDA #$FF ;
        STA ,X ;        
        LDA #$81 ; 
        STA 32,X ; 
        STA 64,X ; 
        STA 128,X ; 
        STA 160,X ; 
        STA 192,X ;
        STA 96,X ; huh? 
        LDA #$FF ; 
        STA 224,X ; 
        ADDB #$01 ;
        LEAX 256,X ; Add row.
        CMPB #$16 ;
        BLE BOXCOL ;
        RTS