; 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
Gropaz: Lol. You do realise that your behaviour have put all of your requests to the backend of the queue, right? If you really are forced to use Kick Assembler, putting yourself in a position with no influence on future features, really seams like an excellent strategy. ;-)
