;PHP						; Preserve processor status/flags
		;SEP #$30				; Set processor 8-bit mode
		PHX						; Preserve X
		LDX #$03				;\
.loop	LDA $77C0,x				; | Check for smoke sprite number
		BNE .next				;/

		INC $77C0,x				; Increase sprite number
		LDA #$1B				;\ Set smoke timer
		STA $77CC,x				;/

		LDA $3216				;\
		AND #$F0				; | Set Y-Pos
		STA $77C4,x				;/
		LDA $322C				;\
		AND #$F0				; | Set X-Pos
		STA $77C8,x				;/
		BRA -

.next	DEX						;\ Check next slot
		BPL .loop				;/

-	;PLP						; Restore processor status/flags
.no		PLX
		RTL