Sephiroth :: Thema anzeigen - /reverse & $reverse

Code: Alles auswählen

;; reverse alias
;; /reverse [-s] text => txet
;; $reverse(text) => txet

alias reverse {
  var %x = $iif($1 == -s,$2-,$1-),%i,%out
  %x = $replace(%x,$chr(32),†) | %i = $len(%x)
  while (%i) { %out = %out $+ $mid(%x,%i,1) | dec %i }
  %out = $replace(%out,†,$chr(32))
  if ($isid) return %out
  elseif ($1 == -s) say %out
  else echo $color(info) -a %out
}

Autor:	Sephiroth [ 18. März 2008 00:17 ]
Betreff des Beitrags:	/reverse & $reverse
Code: Alles auswählen `;; reverse alias ;; /reverse [-s] text => txet ;; $reverse(text) => txet alias reverse { var %x = $iif($1 == -s,$2-,$1-),%i,%out %x = $replace(%x,$chr(32),†) \| %i = $len(%x) while (%i) { %out = %out $+ $mid(%x,%i,1) \| dec %i } %out = $replace(%out,†,$chr(32)) if ($isid) return %out elseif ($1 == -s) say %out else echo $color(info) -a %out }`

Sephiroth http://sephiroth.scifi-action.de/board/

/reverse & $reverse http://sephiroth.scifi-action.de/board/viewtopic.php?f=4&t=23	Seite 1 von 1

Seite 1 von 1	Alle Zeiten sind UTC + 1 Stunde
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/