Reverse secript

;        Name: Text Reverse
;     Code By: Modoc
;       Alias: Yes
;      Remote: No
;      Insert: No
; Load and go: No
;      Syntax: /rev TEXT
;     Example: /rev One Two Three
;     Version: 1.00
;
; Description: This is a alias that reverses text. So you type.
;              /rev One Two Three
;              You will see " eerhT owT enO " Back
;
;       Notes: None

alias rev {
  var %rev.000 = $1-
  var %rev.001 = $len(%rev.000)
  while %rev.001 > 0 {
    if ($mid(%rev.000,%rev.001,1) != $chr(32)) {
      var %rev.002 = %rev.002 $+ $mid(%rev.000,%rev.001,1)
    }
    else {
      var %rev.002 = %rev.002 $mid(%rev.000,%rev.001,1)
    }
    dec %rev.001
  }
  say %rev.002 
  ;echo 12 -a %rev.002
}