/ScriptServ

menu nicklist {
  -
  -=Hex=-:hexnick $1
  -
}

alias hexnick {
  %n = 1 | :begin
  if (%n > $len($$1)) { echo 3 -a $timestamp *** $$1 = %hexnick | unset %hexnick %n | halt }
  if ($mid($$1,%n,1) === A) %hexnick = %hexnick $+ 41
  if ($mid($$1,%n,1) === B) %hexnick = %hexnick $+ 42
  if ($mid($$1,%n,1) === C) %hexnick = %hexnick $+ 43
  if ($mid($$1,%n,1) === D) %hexnick = %hexnick $+ 44
  if ($mid($$1,%n,1) === E) %hexnick = %hexnick $+ 45
  if ($mid($$1,%n,1) === F) %hexnick = %hexnick $+ 46
  if ($mid($$1,%n,1) === G) %hexnick = %hexnick $+ 47
  if ($mid($$1,%n,1) === H) %hexnick = %hexnick $+ 48
  if ($mid($$1,%n,1) === I) %hexnick = %hexnick $+ 49
  if ($mid($$1,%n,1) === J) %hexnick = %hexnick $+ 4A
  if ($mid($$1,%n,1) === K) %hexnick = %hexnick $+ 4B
  if ($mid($$1,%n,1) === L) %hexnick = %hexnick $+ 4C
  if ($mid($$1,%n,1) === M) %hexnick = %hexnick $+ 4D
  if ($mid($$1,%n,1) === N) %hexnick = %hexnick $+ 4E
  if ($mid($$1,%n,1) === O) %hexnick = %hexnick $+ 4F
  if ($mid($$1,%n,1) === P) %hexnick = %hexnick $+ 50
  if ($mid($$1,%n,1) === Q) %hexnick = %hexnick $+ 51
  if ($mid($$1,%n,1) === R) %hexnick = %hexnick $+ 52
  if ($mid($$1,%n,1) === S) %hexnick = %hexnick $+ 53
  if ($mid($$1,%n,1) === T) %hexnick = %hexnick $+ 54
  if ($mid($$1,%n,1) === U) %hexnick = %hexnick $+ 55
  if ($mid($$1,%n,1) === V) %hexnick = %hexnick $+ 56
  if ($mid($$1,%n,1) === W) %hexnick = %hexnick $+ 57
  if ($mid($$1,%n,1) === X) %hexnick = %hexnick $+ 58
  if ($mid($$1,%n,1) === Y) %hexnick = %hexnick $+ 59
  if ($mid($$1,%n,1) === Z) %hexnick = %hexnick $+ 5A
  if ($mid($$1,%n,1) === a) %hexnick = %hexnick $+ 61
  if ($mid($$1,%n,1) === b) %hexnick = %hexnick $+ 62
  if ($mid($$1,%n,1) === c) %hexnick = %hexnick $+ 63
  if ($mid($$1,%n,1) === d) %hexnick = %hexnick $+ 64
  if ($mid($$1,%n,1) === e) %hexnick = %hexnick $+ 65
  if ($mid($$1,%n,1) === f) %hexnick = %hexnick $+ 66
  if ($mid($$1,%n,1) === g) %hexnick = %hexnick $+ 67
  if ($mid($$1,%n,1) === h) %hexnick = %hexnick $+ 68
  if ($mid($$1,%n,1) === i) %hexnick = %hexnick $+ 69
  if ($mid($$1,%n,1) === j) %hexnick = %hexnick $+ 6A
  if ($mid($$1,%n,1) === k) %hexnick = %hexnick $+ 6B
  if ($mid($$1,%n,1) === l) %hexnick = %hexnick $+ 6C
  if ($mid($$1,%n,1) === m) %hexnick = %hexnick $+ 6D
  if ($mid($$1,%n,1) === n) %hexnick = %hexnick $+ 6E
  if ($mid($$1,%n,1) === o) %hexnick = %hexnick $+ 6F
  if ($mid($$1,%n,1) === p) %hexnick = %hexnick $+ 70
  if ($mid($$1,%n,1) === q) %hexnick = %hexnick $+ 71
  if ($mid($$1,%n,1) === r) %hexnick = %hexnick $+ 72
  if ($mid($$1,%n,1) === s) %hexnick = %hexnick $+ 73
  if ($mid($$1,%n,1) === t) %hexnick = %hexnick $+ 74
  if ($mid($$1,%n,1) === u) %hexnick = %hexnick $+ 75
  if ($mid($$1,%n,1) === v) %hexnick = %hexnick $+ 76
  if ($mid($$1,%n,1) === w) %hexnick = %hexnick $+ 77
  if ($mid($$1,%n,1) === x) %hexnick = %hexnick $+ 78
  if ($mid($$1,%n,1) === y) %hexnick = %hexnick $+ 79
  if ($mid($$1,%n,1) === z) %hexnick = %hexnick $+ 7A
  if ($mid($$1,%n,1) == 0) %hexnick = %hexnick $+ 30
  if ($mid($$1,%n,1) == 1) %hexnick = %hexnick $+ 31
  if ($mid($$1,%n,1) == 2) %hexnick = %hexnick $+ 32
  if ($mid($$1,%n,1) == 3) %hexnick = %hexnick $+ 33
  if ($mid($$1,%n,1) == 4) %hexnick = %hexnick $+ 34
  if ($mid($$1,%n,1) == 5) %hexnick = %hexnick $+ 35
  if ($mid($$1,%n,1) == 6) %hexnick = %hexnick $+ 36
  if ($mid($$1,%n,1) == 7) %hexnick = %hexnick $+ 37
  if ($mid($$1,%n,1) == 8) %hexnick = %hexnick $+ 38
  if ($mid($$1,%n,1) == 9) %hexnick = %hexnick $+ 39
  if ($mid($$1,%n,1) == $chr(96)) %hexnick = %hexnick $+ 60
  if ($mid($$1,%n,1) == $chr(94)) %hexnick = %hexnick $+ 5E
  if ($mid($$1,%n,1) == $chr(45)) %hexnick = %hexnick $+ 2D
  if ($mid($$1,%n,1) == $chr(95)) %hexnick = %hexnick $+ FA
  if ($mid($$1,%n,1) == $chr(91)) %hexnick = %hexnick $+ 5B
  if ($mid($$1,%n,1) == $chr(123)) %hexnick = %hexnick $+ 7B
  if ($mid($$1,%n,1) == $chr(93)) %hexnick = %hexnick $+ 5D
  if ($mid($$1,%n,1) == $chr(125)) %hexnick = %hexnick $+ 7D
  if ($mid($$1,%n,1) == $chr(39)) %hexnick = %hexnick $+ 27
  if ($mid($$1,%n,1) == $chr(92)) %hexnick = %hexnick $+ 5C
  if ($mid($$1,%n,1) == $chr(124)) %hexnick = %hexnick $+ 7C
  inc %n | goto begin
}