alias ha {
  if ($1 == $null) {
    say 1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a
  }
  else {
    say1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a1H12a
  }
}
alias ty {
  if ($1 == $null) {
    say 1D12ank 1U4,  1Oh 12Nee4........ 1D12ank 1J12ij 4!!
  }
  else {
    say 1D12ank 1U4,  1Oh 12Nee4........ 1D12ank 1J12ij 4 $1- !!
  }
}
alias us {
  if ($1 == $null) {
    say 1U 1S12preekt 1M12et 1H12et 1A12utomatische 1T12oetsenbord 1V12an 4 $me 1I12k 1B12en 1E12r 1O12p 1M12oment 1N12iet 1A12anwezig 1L12aat 1E12en 1B12ericht 1A12chter 1N12a 1D12e 1P12unt 4....................................................................................................................................
  }
  else {
    say 1U 1S12preekt 1M12et 1H12et 1A12utomatische 1T12oetsenbord 1V12an 4 $1- 1I12k 1B12en 1E12r 1O12p 1M12oment 1N12iet 1A12anwezig 1L12aat 1E12en 1B12ericht 1A12chter 1N12a 1D12e 1P12unt 4....................................................................................................................................
  }
}
alias roken {
  if ($1 == $null) {
    say 10 4Je 12Bent 1Een 10Stoomboot 4En 12Een 10Slukker 4Dusssss
  }
  else {
    say 10 $+ $1- 4Je 12Bent 1Een 10Stoomboot 4En 12Een 10Slukker 4Dusssss
  }
}
alias geit {
  if ($1 == $null) {
    say 1N4iet  1Z4o  1M4ekkeren  1H4oor  1A4nders  1H4ad 1I4k  1W4el 1E4en 1G4eit 1G4ekocht!!
  }
  else {
    say 12 $1-  1N4iet  1Z4o  1M4ekkeren  1H4oor  1A4nders  1H4ad 1I4k  1W4el 1E4en 1G4eit 1G4ekocht!!
  }
}
alias vita {
  if ($1 == $null) {
    say 104Ik 12Ga 1Even 10Mijn 4Vitamines 12N en T 1Gehalte 10Op 4Niveau 12Brengen 1H12o1PP12aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
  }
  else {
    say 10 $+ $1- 4Ik 12Ga 1Even 10Mijn 4Vitamines 12N en T 1Gehalte 10Op 4Niveau 12Brengen 1H12o1PP12aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
  }
}
alias lol {
  if ($1 == $null) {
    say 1L12OL4, 1A12ls 1J12e 1M12e 1M12ist 1L12ig 1I12k 1O12nder 1M12ijn 1B12ureau 1P4uuuuuuuuuuuuuuuuuuw
  }
  else {
    say 1L12OL4, 1A12ls 1J12e 1M12e 1M12ist 1L12ig 1I12k 1O12nder 1M12ijn 1B12ureau 1P4uuuuuuuuuuuuuuuuuuw
  }
}
alias hand {
  if ($1 == $null) { say  1,0 H 00,01 A 01,00 A 00,01 N 01,00 N 00,01 D 01,00 Z 00,01 Z 01,00 Z 00,01 ! 01,00 ©KOE }
  else { say  1,0 H 00,01 A 01,00 A 00,01 N 01,00 N 00,01 D 01,00 Z 00,01 Z 01,00 Z 00,01 $$1- 01,00 ! 00,01 ©KOE }
}

alias kuss {
  if ($1 == $null) { say  1,0 K 00,01 U 01,00 U 00,01 U 01,00 S 00,01 S 01,00 S 00,01 Z 01,00 Z 00,01 ! 01,00 ©KOE }
  else { say  1,0 K 00,01 U 01,00 U 00,01 U 01,00 S 00,01 S 01,00 S 00,01 Z 01,00 Z 00,01 $$1- 01,00 ! 00,01 ©KOE }
}

alias doei {
  if ($1 == $null) { say  1,0 M 00,01 A 01,00 Z 00,01 Z 01,00 E 00,01 L 01,00 L 00,01 Z 01,00 Z 00,01 Z 01,00 ! 00,01 ©KOE }
  else { say  1,0 M 00,01 A 01,00 Z 00,01 Z 01,00 E 00,01 L 01,00 L 00,01 Z 01,00 Z 00,01 Z 01,00 $$1 00,01 ! 01,00 ©KOE }
}
alias peuk {
  if ($1 == $null) { say 7(_¯_¯_)1_¯_¯_¯_¯_¯_¯_)1)))1~~~~~ 4,1 RoOkPaUzE }
  else { say Het is 7(_¯_¯_)1_¯_¯_¯_¯_¯_¯_)1)))1~~~~~ 4,1 RoOkPaUzE $$1- }
}
alias hoppa {
  if ($1 == $null) { say 4H12o4PP12aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa }
  else { say 10 $+ $1- 4H12o4PP12aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa }
}
alias akick {
  if ($1 ison #) {
    if ($2 == $null) {
      echo -ta 4 $+ $me Je moet een reden opgeven: /akick nicknaam reden
    }
    else {
      msg chanserv akick # add $address($1,2) [Stanley] ( $+ $1 $+ ) $2-
    }
  }
  else {
    if ($2 == $null) {
      echo -ta 4 $+ $me Je moet een reden opgeven: /akick hostmasker reden
    }
    else {
      msg chanserv akick # add $1 [Stanley] $2-
    }
  }
}

alias puw {
  if (!$1) { say 1P12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1w12w }
  else {
    set %Var3 $1-
    unset %Var1 %Var2
    set %Var1 1 | set %Var2  $+ $upper($mid(%Var3,1,1))
    if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand }
    if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt }
    :Start1
    inc %Var1 1
    if ($mid(%Var3,%Var1,1) != $chr(32)) { set %Var2 %Var2 $+ 4 $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } }
    if ($mid(%Var3,%Var1,1) == $chr(32)) { set %Var2 %Var2 $+ 1 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } }
    if ($len(%Var3) != %Var1) { goto Start1 }
    say %Var2 1P12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1u12u1w12w
    halt
    :ServerCommand
  }
}

alias wb {
  if ($1 == $null) { say 1W4elkom 1T4erug! }
  else { set %Var3 $1-
    unset %Var1 %Var2
    set %Var1 1 | set %Var2  $+ $upper($mid(%Var3,1,1))
    if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand }
    if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt }
    :Start1
    inc %Var1 1
    if ($mid(%Var3,%Var1,1) != $chr(32)) { set %Var2 %Var2 $+ 12 $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } }
    if ($mid(%Var3,%Var1,1) == $chr(32)) { set %Var2 %Var2 $+ 1 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } }
    if ($len(%Var3) != %Var1) { goto Start1 }
    say 1W4elkom 1T4erug %Var2 $+ !
    halt
    :ServerCommand
  }
}

alias hoi {
  var %nicks, %i = 1
  while ($nick(#,%i,a) != $null) {
    if ($nick(#,%i) != $me) {
      if ($len(%nicks) > 485) { me 12,8:4)8,1H1,8o8,1i1,8i8,111 $left(%nicks,$calc($len(%nicks) - 1)) 1,8H8,1o1,8i8,1i4,8(12: | unset %nicks }
    %nicks = %nicks $nick(#,%i) $+ ,    }
    inc %i
  }
  if (%nicks != $null) { say 12,8:4)8,1H1,8o8,1i1,8i8,111 $left(%nicks,$calc($len(%nicks) - 1)) 1,8H8,1o1,8i8,1i4,8(12: }
}

alias koe {
  var %input = $1-
  var %output
  while ($len(%input) > 0) {
    if ($asc($left(%input,1)) == 32) {
      %output = $+(%output,$+(),$chr(32),)
    }
    else {
      %output = $+(%output,$+($chr(32),$+(),$chr(32)),$left(%input,1),$chr(32))
    }
    %input = $right(%input,-1)
  }
  say  $+ %output $+ $chr(32)
}

menu nicklist {
  Akicks
  .Akick $$1 $+ : akick $$1 $$?"Reden"
  .Akick nonlisted: akick $$?"Hostmasker Voorbeeld: *!*@CW-1234.dynamic.ziggo.nl" $$?"Reden"
}