Dave Neuman's Blog - New Game - Better Big Dipper code?

[RSS Bot]

I didn't' like the kludgey code for the Big Dipper so I came up with an alternate method. It saves space but it does not give the same effect. Here is the first constellation code ... pretty lame but made a nice looking display.

 

	LDX #2
;Turn on Missile		
STX ENAM1
STA WSYNC
STA WSYNC
SLEEP 44
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
STA WSYNC
SLEEP 47
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

;Delay 2 Lines
STA WSYNC
STA WSYNC

;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
STA WSYNC
SLEEP 40
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
STA WSYNC
SLEEP 50
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

;Delay 2 Lines
STA WSYNC
STA WSYNC

;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
SLEEP 55
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

LDY #10     
Lines2	
STA WSYNC
DEY
BNE Lines2
;Right two Stars of Big Dipper	
;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
STA WSYNC
SLEEP 51
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1

;Delay 2 Lines
STA WSYNC
STA WSYNC

;Turn on Missile	X has 2
STX ENAM1
STA WSYNC
SLEEP 55
STY RESM1
;Turn off Missile	Y has 0
STY ENAM1	

This bin shows a fairly good depiction of the Big Dipper as coded above.

BackStars8_8_07.bin ( 4K )

Number of downloads: 0

 

 

Here is the alternate code ... saves space but doesn't look as good.

 

;Show Big Dipper 	
LDA #2			;used to enable missile
LDX #7			;Number of stars
BigDipperLoop	
LDY StarTable,X	;get delay for loop (star placement)
STA WSYNC		;always start loop at same time
;Delay loop positions stars	
DipperDelay
DEY
BNE DipperDelay

STA ENABL		;Turn missile on
STY RESBL		;strobe missile position
DEX 
STA WSYNC
STA WSYNC	
STY ENABL		;Turn missile off
BNE BigDipperLoop	;Start loop over


StarTable

.byte 10,8,5,9,8,7,6,9

This bin shows a bad depiction of the Big Dipper as coded above.

BackStars8_11_07.bin ( 4K )

Number of downloads: 0

 

 

Anybody got an ideas?

 

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