ICQTurk Forum

Kod: Tümünü seç

alias reverse {
  var %len = $len($1-)
  var %return = $null
  while (%len > 0) {
    var %return = %return $+ $mid($1-,%len,1) $+ $chr(32)
    dec %len
  }
  return %return
}

alias r{
  say $reverse($1-)
}