// Random hexadecimal color generator by DES|Bukz
// Useful for finding the right fog color you're looking for on your map.
// Use /fogcolour (genhex)
alias hex_alpha_list [A B C D E F]
alias genhex [
  fog 64
  tmp_hex = [0x]
  loop genhexloop 6 [
    tmp_hex_int = (rnd 10)
    tmp_hex_chr = (at $hex_alpha_list (rnd 6))
    tmp_hex_rnd = (rnd 2)
    if $tmp_hex_rnd [
      tmp_hex = (concatword $tmp_hex $tmp_hex_int)
    ] [
      tmp_hex = (concatword $tmp_hex $tmp_hex_chr)
    ]
  ]
  echo Trying hexadecimal color: $tmp_hex
  result $tmp_hex
]