on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:absolut($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      $x:absolut($1,1)
    }
  }
}

alias -l X:absolut {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
    .os akill add $+(*,$left(%q,%x)) :4Banlandin. 
    echo 0,12( Bu ipi Attin ona GÖre )1 $+(*,$left(%q,%x))
  }
}