[PATTERN $400 SETi2 3377 CLR STAi2 XSK 2 JMP p-2 #1A SETi1 777 SETi2 3377 SETi3 -1 #1B LDAi2 DISi1 XSKi3 JMP p+2 JMP 1C #1D XSKi1 JMP 1B JMP 1A #1C DIS 1 SROi 3333 JMP p-3 SETi3 -40 SAM 7 ADAi 3577 STA 4 BCLi 7400 ROL 1 STC 5 SAM 1 ADAi 177 SNS 0 STA 4 DIS 5 JMP 1D [END PATTERN