;Copyright (c) 1996 by Brett Greenfield
;redcode
;name Dwarf 4sa
;author Compudemon
;strategy simple shooter
;assert CORESIZE==8000

prm EQU (271)

MOV 7,4000
MOV 7,4000
MOV 7,4000
MOV 7,4000
MOV 7,4000
JMP 3996
JMP 2
kbl DAT <-5,<2
SPL 0,-2
rck MOV kbl,-2
ADD #5*prm,rck
JMP rck,-5
sdre fftr for 50
dat #fftr,#sdre
rof
END