;redcode-x ;name Shotgun 1.00 ;author Eric J. Schwertfeger ;strategy A Jumper with monitor. Jumper bombs with ;strategy JMP PIT instructions, where pit is ;strategy (SPL 0,2;MOV -1,>-1), you figure it out. ;strategy monitor kills jumper after 3 passes, and starts ;strategy core clear. ;strategy v 1.00 Finally got the obvious bugs worked out :-) ;strategy Submitted: @date@ ;kill Shotgun 0.80 STEP EQU 240 OFFS EQU 10 INC EQU 30 CSTEP EQU 24 RSTEP EQU -24 RLAUNCH MOV #-250-6+RSTEP,RBDST-RSTEP MOV #2+(RSTEP*2),RCDST-RSTEP MOV #-250-6+RSTEP,RBDST MOV #2+(RSTEP*2),RCDST SPL 1 SPL 1 SPL 1 JMP RCSRC DAT #0,#0 DAT #0,#0 DAT #0,#0 RCSRC MOV #8,#0 MOV RBDST-RSTEP,>RBDST-RSTEP MOV RBDST-RSTEP,>RBDST-RSTEP MOV RBDST-RSTEP,>RBDST-RSTEP MOV 0,@BOMBS JMP LOOP+STEP TRAP SPL 0,2 MOV -1,>-1 LAST DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 DAT #0,#0 CLAUNCH SPL RLAUNCH MOV #250-8+CSTEP,CBDST-CSTEP MOV #2+(CSTEP*2),CCDST-CSTEP MOV #250-8+CSTEP,CBDST MOV #2+(CSTEP*2),CCDST SPL 1 SPL 1 SPL 1 JMP CCSRC DAT #0,#0 CCSRC MOV #8,#0 MOV CBDST-CSTEP,