diff --git a/projects/oorexx/dist.rex b/projects/oorexx/dist.rex
index b630fd3..0550a38 100644
--- a/projects/oorexx/dist.rex
+++ b/projects/oorexx/dist.rex
@@ -32,9 +32,9 @@ Call MathLoadFuncs
 /* -oldradius = 6366710 */
 googleradius = 6378137 /* -- Equatorial earth radius used by Google */
 
-Say "Enter 4 values. (FROM) latitude longitude (TO) latitude longitude:"
-Parse Value Linein() With flat flon tlat tlon
-If (tlat<>'' & tlon<>'') Then Say Distance(flat,flon,tlat,tlon)
+Say "Enter 4 values: FROM(latitude,longitude) TO(latitude,longitude)"
+Parse Upper Value Linein() With "FROM(" flat "," flon ") TO(" tlat "," tlon ")"
+If (tlat<>'' & tlon<>'') Then Say "Distance: "||Distance(flat,flon,tlat,tlon)
 Do While Lines()>0
   Parse Value Linein() With tlat tlon .
   Say Distance(flat,flon,tlat,tlon)
diff --git a/projects/oorexx/hello.rex b/projects/oorexx/hello.rex
old mode 100644
new mode 100755
index 777cf2d..b37f219
--- a/projects/oorexx/hello.rex
+++ b/projects/oorexx/hello.rex
@@ -1,8 +1,4 @@
-/* Rexx 
-call RxFuncAdd 'SysGetPid', 'rxunixsys', 'SysGetPid'
-call RxFuncAdd 'SysGethostname', 'rxunixsys', 'SysGethostname'
-call RxFuncAdd 'SysUname', 'rxunixsys', 'SysUname'
-*/
+#!/usr/bin/env rexx
 
 Address system "pwd" with output stem pwd.
 say pwd.1
diff --git a/projects/oorexx/sayos.rex b/projects/oorexx/sayos.rex
index cd61d08..97e8f2a 100755
--- a/projects/oorexx/sayos.rex
+++ b/projects/oorexx/sayos.rex
@@ -1,5 +1,5 @@
 #!/usr/bin/env rexx
 
-parse source os
+parse source os .
 
 say os