lda spriteColor
.for (var i=0; i<8; i++) {
	sta $d027 + i
}

;                 x1    y1      etc
effect1: .byte Param1, Param2, Param3, Param4  ;circle1
effect2: .byte Param1, Param2, Param3, Param4  ;circle2

init

lda #<effect1
sta zp+0
lda #>effect1
sta zp+1
rts

setupeffect

ldy #$00
lda (zp),y
sta durationlo
iny
lda (zp),y
sta durationhi
iny
lda (zp),y
sta xadd1
iny
lda (zp),y
sta xadd2
iny
lda (zp),y
asl
asl
asl
asl
iny
ora (zp),y
sta xstart1&xstart2
iny
lda (zp),y
sta yadd1
iny
lda (zp),y
sta yadd2
iny
lda (zp),y
asl
asl
asl
asl
iny
ora (zp),y
sta ystart1&ystart2
iny
lda (zp),y
sta xeor
iny
lda (zp),y
sta xand
iny
lda (zp),y
sta yeor
iny
lda (zp),y
sta yand
iny
lda (zp),y
clc
adc #>scaletab
sta xscale1
iny
lda (zp),y
clc
adc #>scaletab
sta xscale2
iny
lda (zp),y
clc
adc #>scaletab
sta yscale1
iny
lda (zp),y
clc
adc #>scaletab
sta yscale2
iny
tya
clc
adc zp
sta zp
bcc *+4
inc zp+1