1;redcode
2;name Cereal Killer
3;author Michal Janeczek
4;strategy oneshot
5;assert 1
6       ORG      START
7       DAT.F  $   132, $   119
8       DAT.F  $     0, $     0
9       DAT.F  $     0, $     0
10       DAT.F  $     0, $     0
11       DAT.F  $     0, $     0
12       DAT.F  $     1, $    14
13       SPL.B  #   113, $    14
14       MOV.I  *    -2, >    -7
15       MOV.I  *    -3, >    -8
16       DJN.F  $    -2, }    -3
17       DAT.F  $     0, $     0
18       DAT.F  $     0, $     0
19       DAT.F  $     0, $     0
20       DAT.F  $     0, $     0
21       DAT.F  $     0, $     0
22       DAT.F  $     0, $     0
23       DAT.F  $     0, $     0
24       DAT.F  $     0, $     0
25       DAT.F  $     0, $     0
26       DAT.F  $     0, $     0
27       DAT.F  $     0, $     0
28       DAT.F  $     0, $     0
29       DAT.F  $     0, $     0
30       DAT.F  $     0, $     0
31       SUB.X  $     2, $   -24
32START  SNE.F  *   -25, @   -25
33       SUB.F  #   -13, $   -26
34       JMZ.F  $    -3, @   -27
35       JMP.B  $   -22, <   -28
36
37