anchor.diff:  
   % APOCALYPSE WORLD
   
  -apoc(#{reply:=RT, ping:=P, nick:=Nick, params:=Params, selector:=Selector}) ->
  -	case Params of
  -		[] ->
  -			M = 0,
  -			Comment = "";
  -		_ ->
  -			M = list_to_integer(hd(Params)),
  -			Comment = case string:join(tl(Params), " ") of
  -				[] -> [];
  -				X -> [X,$:,$ ]
  -			end
  +apoc(#{reply:=RT, ping:=P, nick:=Nick, params:=[M, RawComment], selector:=Selector}) ->
  +	Comment = case RawComment of
  +		"" -> "";
  +		_ -> [RawComment, $:, $ ]
   	end,
   	Formatter = fun
   		([false,false,false]) -> [Comment, "\x034\x02Miss!\x03\x02"];
  
positive.code: 
  % RTD
  
  rtd(#{reply:=Reply, ping:=Ping, nick:=Nick, selector:=Selector, params:=Params}) ->
  	Comment = case string:join(Params, " ") of
  		[] -> [];
  		X -> [X,$:,$ ]
  	end,
  
negative.code: 
  get_commands() ->
  	[
  		{"dice", fun dice/1, [{"dice string", long, "d6"}], user},
  		{"edice", fun edice/1, [{"dice string", long, "d6"}], user},
  		{"gurps", fun gurps/1, [{"target",integer}, {"comment",long,""}], user},
  		{"srun", fun srun/1, [{"dice",integer}], user},
  		{"sredge", fun sredge/1, [{"dice",integer}], user},
  		{"sr3", fun sr3/1, [{"target",integer},{"dice",integer}], user},
  		{"fate", fun fate/1, [{"modifier",integer,0}], user},
  		{"rtd", fun rtd/1, [{"comment",long,""}], user},
  		{"apoc", fun apoc/1, [{"modifier",integer,0},{"comment",long,""}], user}
  	].
  
  get_help("dice") ->
  