Wickeycolumbus' Blog - more code

[RSS Bot]

hello again!

I have been doing more 2600 programming and have greatly inproved. I made my first arysmatical playfield!(or however you spell it) It is a square box arround the screen. there is one slight problem tho. at the top, there is a mistack where the sides of the wall begin (someone, please help!). enjoy!

 

source:

 

 

 

processor 6502

include "vcs.h"

include "macro.h"

 

org $F000

Reset

LDA #0

TAX

RAMCLR

STA 0,X

INX

BNE RAMCLR

 

 

STARTOFFRAME

 

LDA #0

STA VBLANK

 

LDA #2

STA VSYNC

 

STA WSYNC

STA WSYNC

STA WSYNC

 

LDA #0

STA VSYNC

 

LDA #$00

STA COLUBK

LDA #$60

STA COLUPF

LDX #0

VERT

INX

STA WSYNC

CPX #37

BNE VERT

LDX #0

PIC

LDA #$00

STA COLUBK

EIGHT

 

INX

 

LDA #%11111111

STA PF0

LDA #%11111111

STA PF1

LDA #%11111111

STA PF2

STA WSYNC

CPX #8

BNE EIGHT

 

LDA #000000

 

STA PF1

STA PF2

 

 

LDX #0

REST

INX

LDA #$A9

STA COLUBK

LDA #000000

STA PF2

 

LDA #010000

STA PF0

NOP

NOP

NOP

LDA #000000

STA PF0

LDA #%10000000

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

NOP

 

 

STA PF2

 

STA WSYNC

CPX #176

BNE REST

LDA #000000

STA PF0

STA PF2

LDX #0

EIGHTO

INX

LDA #%11111111

STA PF0

STA PF1

STA PF2

STA WSYNC

CPX #8

BNE EIGHTO

 

LDA #000000

STA PF0

STA PF1

STA PF2

 

LDA #$00

STA COLUBK

STA WSYNC

LDX #0

OVER

INX

STA WSYNC

CPX #29

BNE OVER

 

JMP STARTOFFRAME

 

 

 

 

 

 

org $FFFA

.word Reset

.word Reset

.word Reset

 

 

 

Attached File(s)

 

up.bin ( 4K )

Number of downloads: 0

 

 

 

 

http://www.atariage.com/forums/index.php?a...;showentry=3649