Forums Scripts & Popups alias does't work.... can anyone tell me why?

alias nickfind { 
  if ($hfind(usertrack,$1,0,W),$1,32) { 
    return $remtok($hget(usertrack,$hfind(usertrack,$1,W)),$1,1,32) 
  } 
} 
  

nickfind { 
  if ($hfind(usertrack,$1,0,W)) { 
    return $remtok($hget(usertrack,$hfind(usertrack,$1,0,W).data),$1,1,32) 
  } 
} 
  

alias nickfind {
  if ($hfind(usertrack,$1,0,W)) { 
    var %x = $hget(usertrack,0).item
    while (%x) {
      var %nicks = $remtok($addtok(%nicks,$hget(usertrack,%x).item,32),$1,32)
      dec %x
    }
    echo -a $1 removed from %nicks
  }
}

ON *:START: {
  if !$hget(usertrack) { .hmake usertrack 100 }
  if ($isfile($mircdirtrackusers.hsh)) {
    .hload usertrack $mircdirtrackusers.hsh
  }
}
on *:JOIN:#: {
  if ($hget(usertrack,$address($nick,3))) {
    var %n = $ifmatch
    if ($istok(%n,$nick,32)) { var %d = $deltok(%n,$findtok(%n,$nick,1,32),32) }
    else { var %d = %n }
    if (!%d) { return }
    alert 
    if $dialog(alert_info) { did -a alert_info 1 $nick | didtok alert_info 2 32 %d }
    if (!$istok(%n,$nick,32)) {
      .hadd usertrack $address($nick,3) %n $nick
    }
  }
  else {
    .hadd usertrack $address($nick,3) $nick
  }
}
on *:NICK: {
  if ($hget(usertrack,$address($newnick,3))) {
    var %n = $ifmatch
    if (!$istok(%n,$newnick,32)) {
      .hadd usertrack $address($newnick,3) %n $newnick
    }
  }
  else {
    .hadd usertrack $address($nick,3) $newnick
  }
}

dialog aka_test {
  title "AKA_TesT"
  size -1 -1 222 150
  option dbu
  list 1, 7 17 161 50, size
  list 2, 130 82 87 50, size vsbar
  button "Close", 3, 19 138 37 9, ok
  edit "", 4, 30 98 61 10
  text "Enter Search Nick :", 5, 34 89 46 8
  box "Speed Search", 6, 22 79 79 45
  button "Search Now!", 7, 42 111 37 9
}
on *:dialog:aka_test:*:*: {
  if ($devent == init) {
    if !$hget(usertrack) { .hmake usertrack 100 }
    if ($isfile($mircdirtrackusers.hsh)) { .hload usertrack $mircdirtrackusers.hsh }
    var %i = 1 
    while $hget(usertrack,%i).item { 
      did -a $dname 1 $v1 
      inc %i 
    } 
  }
  if ($devent == sclick) {
    if $did(1).sel {
      did -r $dname 2
      didtok $dname 2 32 $hget(usertrack,$v1).data
    }
    if ($did == 7) {
      if $did(4) {
        if ($hfind(usertrack,$did(4),0,W)) { 
          var %b = $remtok($hget(usertrack,$hfind(usertrack,$did(4),0,W).data),$did(4),1,32) 
          didtok $dname 2 32 %b
        } 
      }
    }
  }
}
alias -l alert { dialog -m alert_info alert_info | .timeralert 1 3 dialog -x alert_info }
dialog alert_info {
  title "ALERT!"
  size -1 -1 128 58
  option dbu
  edit "", 1, 35 8 50 10, read
  list 2, 68 28 49 28, size vsbar
  button "Button", 3, 5 62 37 9, hide ok
  text "Nick :", 4, 14 10 15 8
  text "Has also been known as :", 5, 2 24 61 8
}
menu nicklist {
  Track Users
  .View Other Nicknames:{
    if (!$address($$1,3)) { echo $colour(info) -ti2 # * IAL not updated for $$1 $+ , performing userhost lookup | userhost $$1 | return }
    if ($hget(usertrack,$address($$1,3))) {
      var %n = $ifmatch
      if ($istok(%n,$$1,32)) { var %d = $deltok(%n,$findtok(%n,$$1,1,32),32) }
      else { var %d = %n }
      if (!%d) { goto notknown }
      echo $colour(info) -ti2 # * $$1 has also used the nickname $+ $iif($numtok(%d,32) > 1,s:,:) %d
    }
    else {
      :notknown
      echo $colour(info) -ti2 # * $$1 has not been known by any other nickname
    }
  }
  .Reset:.hdel usertrack $address($$1,3)
}
ON *:EXIT: {
  if ($hget(usertrack)) { .hsave -o usertrack trackusers.hsh }
}