Unnamed

on *:text:*:#:{
  if (http:// isin $1-) {
    set %link.text $strip($1-)
    set %lastlink.test $wildtok(%link.text,http://*,1,32)
    if (%lastlink.test != %lastlink) {
      set %lastlink $wildtok(%link.text,http://*,1,32)
      write Link-History.txt %lastlink - $time - $nick
      echo -ta New Link Saved! - %lastlink ( $+ $chan $+ ( $+ $lines(Link-History.txt) $+ ))
    }
    else halt
  }
  elseif (www. isin $1-) {
    set %link.text $strip($1-)
    set %lastlink.test $wildtok(%link.text,www.*,1,32)
    if (%lastlink.test != %lastlink) {
      set %lastlink $wildtok(%link.text,www.*,1,32)
      write Link-History.txt %lastlink - $time - $nick
      echo -ta New Link Saved! - %lastlink ( $+ $chan $+ ( $+ $lines(Link-History.txt) $+ ))
    }
    else halt
  }
}
alias runlast {
  echo -ta Running %lastlink $+ ...
  run %lastlink
}
alias showlinks {
  run Link-History.txt
}